ORG 800H - początek programu
MVI D,1 - modyfikuje rejestr d na 01
MVI E,34 - modyfikuje rejestr e na 22
MVI H,6 - modyfikuje rejestr h na 06
MVI L,70 modyfikuje rejestr l na 46
SKOK MVI B,32 modyfikuje rejestr b na 20
MOV C,E - przenosi wartość rejestru e do rejestru c
CALL WZ przejście do etykiety wz.
MOV C,H przenosi wartość rejestru h do rejestru c
CALL WZ2 przenosi nas do etykiety wz2
MOV A,D przenosi wartość rejestru b do rejestru a
CPI 6
JZ KON
CALL WNL przechodźmy do etykiety wnl
INR D
INR E dodaje wartości rejestrów o jeden mniejsze niż na początku
DCR H
DCR L
JMP SKOK
KON HLT
WZ PUSH PSW
SK1 MOV A,B - przenosi wartość rejestru b do rejestru a
RST 1 - tworzy spacje
DCR C - zmniejsza rejestr c do wartości 0 ( ilość spacji)
JNZ SK1 powrót do etykiety sk1 do momentu wyzerowania rejestru c
POP PSW
RET
WZ2 PUSH PSW –zeruje akumulator
SK2 MOV B,L przenosi wartość rejestru l do rejestru b
MOV A,B przenosi wartość rejestru b do akumulatora
RST 1 tworzy litery
MVI B,32 daje spacje między literami
MOV A,B przenosi wartość rejestru b do akumulatora
RST 1 twprzy spacje
DCR C zmniejsza rejestr c o 1
JNZ SK2
POP PSW zeruje akumulator
RET wracamy do mov a,d
WNL PUSH PSW
MVI A,10 tworzy nową linię
RST 1
MVI A,13
RST 1
POP PSW
RET