[HaBo]

;also: in cx die basis
;in SI der Wert,in BX die Adresse der Zeichen-Tabelle, in DI die Adresse des Outputbuffers
WORD2x_LOOP:
   xor dx,dx
   mov ax,si
   div cx
   mov si,ax ;neuer Wert   
   
   ;Rest ausgeben
    push bx
    add bx,dx                               ; Tabellenindex+rest =ASCII-Wert Position für den Wert
    mov dl,byte ptr [bx]                ;ASCII Zeichen aus  Tabelle[Restindex] lesen
    dec di                                       ;Output wird "verkehrt herum" beschrieben
    mov byte ptr [di],dl                  ;ASCII Zeichen schreiben 
    pop bx   
   test ax,ax                     ;wenn 0 dann sind wir fertig
   je ende_ 
jmp WORD2x_LOOP
ende_:

CSEG segment
org 100h
MAX_INPUT equ 10
Begin:
 
call einlesen ;basis
push si
call einlesen ;zahl
;in si wert

;in cx ist die Basis
pop cx
mov di,offset output
add di,100
mov byte ptr [di],'$'
mov bx,offset tabelle

;also: in cx die basis
;in SI der Wert,in BX die Zeichen-Tabelle, in DI der Outputbuffer
WORD2x_LOOP:
   xor dx,dx
   mov ax,si
   div cx
   mov si,ax ;neuer Wert   
   
   ;ausgeben
    push bx
    add bx,dx ;Zeichen aus  Tabelle[Rest] lesen
    mov dl,byte ptr [bx]
    dec di    
    mov byte ptr [di],dl    
    pop bx   
   test ax,ax
   je ende_ 
jmp WORD2x_LOOP

ende_: 
    ;ergebnis ausgeben
    mov ah,9
    mov dx,di
    int 21h
    mov ah,1
    int 21h  
    int 20h



einlesen:
;//Einlesen
    mov bx,offset input
    
    mov ah,0ah
    mov dx,bx
    int 21h
    ;gleich einen Zeilenumbruch nachschieben
     mov ah,06
     mov dl,10
     int 21h

    ;umrechenen Ascii2Number, in BX ist input_offset
    
     xor cx,cx
     mov cl,byte ptr[bx+1] ;wieviele Zeichen eingelesen
    
     add bx,1 ;offset in position bringen
     add bx,cx

     xor ax,ax
     mov di,1
     xor si,si
     
     ASCII2WORD_LOOP:
        xor ax,ax
        mov al,byte ptr [bx]
        sub al,'0' 
        mul di
        add si,ax
        mov ax,di
        mov di,10
        mul di
        mov di,ax      
        dec bx
        dec cx       
      jnz ASCII2WORD_LOOP
;in SI ist jetzt die umgerechnete Eingabe
retn

tabelle db "01234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ"
input db MAX_INPUT
output db ?

CSEG ends
end Begin

#include <iostream>

using namespace std;

int potenz(int x, int n)
{
    int potenz = 1;
    for(int k=1; k<n; k++)
    {
        potenz *= x;
    }

    return potenz;
}

int sys2dez(char* value, int sys)
{
    string digits = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";
    int val_len = strlen(value);
    int out = 0;

    for(int i=0; i<val_len; i++)
    {
        short j = 0;
        while(value[i] != digits[j])
        {
            j++;
            if(j > 36)
            {
                cerr << "ERROR: input value is incorrect" << endl;
                return -1;
            }
        }

        out += j * potenz(sys, val_len-i);
    }

    return out;
}

string dez2sys(int value, int sys)
{
    string digits = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";
    string out = "";
    while(value != 0) {
        out = digits[value % sys] + out;
        value /= sys;
    }

    return out;
}

int main(int argc, char* argv[])
{
    if(argc < 4)
    {
        cerr << "Usage: " << argv[0] << " input output value" << endl
             << "\texample: " << argv[0] << " 16 10 FF (returns 255)" << endl;
        return -1;
    }

    // Arguments
    bool verbose = true;

    char* value = argv[3];
    int input = atoi((char *)argv[1]);
    int output = atoi((char *)argv[2]);

    int dez = sys2dez(value, input);
    string out = dez2sys(dez, output);

    if(verbose)
    {
        cout << "Berechne " << value << " vom " << input << "er-System ins " << output << "er-System..." << endl
             << input << "er-System:\t" << value << endl;

        if(input != 10)
            cout << "10er-System:\t" << dez << endl;

        if(output != 10)
            cout<< output << "er-System:\t" << out << endl;
    }
    else
    {
        cout << out << endl;
    }
}