skip to main |
skip to sidebar
ADDRESS MNEMONICS
8200 START :LXI H,8300
8203 MVI C,OF
8205 MVI A,10
8207 OUT C2
8209 MVI A,CC
820B OUT C2
820D MVI A,90
820F OUT C2
8211 L1:MOV A,M
8212 OUT C0
8214 CALL 8500
8217 INX H
8218 DCR C
8219 JNZ L1
821C JMP START
DELAY:
8500 MVI B,A0
8502 L1:MVI C,FF
8504 L2:DCR C
8505 JNZ L2
8508 DCR B
8509 JNZ L1
850C RET
ADDRESS MNEMONICS
9000 MVI A,80
9002 OUT 23
9004 L1:MVI A,0F
9006 OUT 21
9008 MVI A,83
900A OUT 20
900C CALL 9600
900F MVI A,A0
9011 OUT 20
9013 MVI A,4C
9015 OUT 20
9017 CALL 9600
901A MVI A,50
901C OUT 20
901E MVI A,C0
9020 OUT 20
9022 MVI A,02
9024 OUT 22
9026 CALL 9600
9029 MVI A,01
902B OUT 22
902D CALL 9600
9030 MVI A,00
9032 OUT 22
9034 MVI A,FO
9036 OUT 21
9038 HLT
DELAY:
9600 LXI H,50FF
9603 L2:DCX B
9605 NOP
9606 L2:DCR D
9607 JNZ L2
960A DCX H
960B MOV A,L
960C ORA H
960D JNZ L1
9610 RET
8511 RET
8100 MVI A,80
8102 OUT 23
8104 START:MVI A,FF
8106 OUT 21
8108 CALL 8500
810B MVI A,00
810D OUT 21
810F CALL 8500
8112 JMP START
DELAY:
8500 MVI A,80
8502 OUT 23
8504 START:MVI A,00
8506 L1:OUT 21
8508 INR A
8509 JNZ L1
850C JMP START
ADDRESS MNEMONICS
8100 MVI A,80
8102 OUT 23
8104 START:MVI A,FF
8106 OUT 21
8108 CALL 8500
810B MVI A,00
810D OUT 21
810F CALL 8500
8112 JMP START
DELAY:
8500 MVI A,80
8502 OUT 23
8504 START:MVI L,00
8506 L1:MOV A,L
8507 OUT 21
8509 INR L
850A JNZ L1
850D MVI L,FF
850F L2:MOV A,L
8510 OUT 21
8512 DCR L1
8513 JNZ L2
8516 JMP START
ADDRESS MNEMONICS
8100 MVI A,80
8102 OUT 23
8104 START:MVI A,FF
8106 OUT 21
8108 CALL 8500
810B MVI A,00
810D OUT 21
810F CALL 8500
8112 JMP START
DELAY:
8500 MVI B,FF
8502 L2:MVI C,OF
8504 NOP
8505 L1:DCR C
8506 JNZ L1
8509 DCR B
850A JNZ L2
850D RET
ADDRESS MNEMONICS
8100 MVI A,90
8102 OUT 23
8104 MVI A,00
8106 OUT 22
8108 MVI A,FF
810A OUT 22
810C CALL 8500
810F IN 20
8111 STA 8600
8114 HLT
DELAY:
8500 MVI B,FF
8502 L2:MVI C,FF
8504 NOP
8505 L1:DCR C
8506 JNZ L1
8509 DCR B
850C JNZ L2
850D RET
