MNEMONICS
MOV R0, 40
MOV R1,#01
MOV R2,#01
MOV A.#00
MOV DPTR,9000
CJNE R0,#00,LOOP1
LJMP HLT
LOOP1:MOV X @DPTR ,A
INC DPTR
LOOP2:MOV R2,A
ADD A,R1
MOV 01,02
MOV X @DPTR ,A
INC DPTR
DJNZ R0,LOOP2
HLT :LCALL00BB
Sunday, February 7, 2010
32.CONTROL OF DIRECTION OF ROTATION OF STEPPER MOTOR
ADDRESS MNEMONICS
9000 MOV DPTR,#6003
9003 MOV A,#80
9005 MOV X @DPTR,A
9006 START:MOV DPTR,#60000
9009 MOV A,# O4
900B MOV X @ DPTR,A
900C LCALL 8900
900F MOV A,06
9011 MOV X @ DPTR,A
9012 LCALL 8900
9015 MOV A,07
9017 MOV X @DPTR,A
9018 LCALL 8900
901B MOV A,05
901E LCALL 8900
9021 LJMP START
DELAY:
8900 MOV R1,#0A
8902 L2:MOV A,#40
8904 L1:NOP
8905 NOP
8906 NOP
8907 NOP
8908 DEC A
8909 JNZ L1
890B DJNZ R1,L2
880D RET
9000 MOV DPTR,#6003
9003 MOV A,#80
9005 MOV X @DPTR,A
9006 START:MOV DPTR,#60000
9009 MOV A,# O4
900B MOV X @ DPTR,A
900C LCALL 8900
900F MOV A,06
9011 MOV X @ DPTR,A
9012 LCALL 8900
9015 MOV A,07
9017 MOV X @DPTR,A
9018 LCALL 8900
901B MOV A,05
901E LCALL 8900
9021 LJMP START
DELAY:
8900 MOV R1,#0A
8902 L2:MOV A,#40
8904 L1:NOP
8905 NOP
8906 NOP
8907 NOP
8908 DEC A
8909 JNZ L1
890B DJNZ R1,L2
880D RET
26.16 BIT SUBTRACTION IN MC
ADDRESS MNEMONICS
8500 CLR C
8501 MOV A,#DATA1(LSB1)
8503 SUB B A,#DATA(LSB2)
8505 MOV DPTR,#8600
8508 MOV X @DPTR,A
8509 MOV A,DATA 1(MSB1)
850B SUB B A,#DATA2(MSB2)
850D INC DPTR
850E MOV X @DPTR,A
850F SJMP 850F
8500 CLR C
8501 MOV A,#DATA1(LSB1)
8503 SUB B A,#DATA(LSB2)
8505 MOV DPTR,#8600
8508 MOV X @DPTR,A
8509 MOV A,DATA 1(MSB1)
850B SUB B A,#DATA2(MSB2)
850D INC DPTR
850E MOV X @DPTR,A
850F SJMP 850F
25.16 BIT ADDITION IN MC
ADDRESS MNEMONICS
8300 CLR C
8301 MOV A,#DATA1(LSB1)
8303 ADD C A,#DATA2(LSB2)
8305 MOV DPTR,#8400
8308 MOV X@DPTR,A
8309 MOV A,#DATA1(MSB1)
830B ADD C A,#DATA2(MSB2)
830D INC DPTR
830E MOV X@DPTR,A
830F SJMP 830F
8300 CLR C
8301 MOV A,#DATA1(LSB1)
8303 ADD C A,#DATA2(LSB2)
8305 MOV DPTR,#8400
8308 MOV X@DPTR,A
8309 MOV A,#DATA1(MSB1)
830B ADD C A,#DATA2(MSB2)
830D INC DPTR
830E MOV X@DPTR,A
830F SJMP 830F
24.PROGRAM FOR BLINKING THE GIVEN MESSAGE IN LED
ADDRESS MNEMONICS

8100 START:LXI H,8200
8103 MVI C,O5
8105 MVI A,00
8107 OUT C2
8109 MVI A,CC
810B OUT C2
810D MVI A,90
810F OUT C2
8111 L1:MOV A,M
8112 OUT CO
8114 INX H
8115 DCR D
8116 JNZ L1
8119 CALL 8500
811C MVI A,CC
811E OUT C2
8120 MVI A,90
8122 OUT C2
8123 MVI A,FF
8126 OUT C0
8127 OUT C0
8128 OUT C0
8129 OUT C0
812A OUT C0
812B OUT C0
812C CALL 8500
812F DCR C
8130 JMP START
8133 HLT
DELAY:
8500 LXI B,8004
8503 L2:MVI D,0F
8505 L1:NOP
8506 DCR D
8507 JNZ L1
850A DCR B
850B MOV A,C
850C ORA B
850D JNZ L2
8510 RET

8100 START:LXI H,8200
8103 MVI C,O5
8105 MVI A,00
8107 OUT C2
8109 MVI A,CC
810B OUT C2
810D MVI A,90
810F OUT C2
8111 L1:MOV A,M
8112 OUT CO
8114 INX H
8115 DCR D
8116 JNZ L1
8119 CALL 8500
811C MVI A,CC
811E OUT C2
8120 MVI A,90
8122 OUT C2
8123 MVI A,FF
8126 OUT C0
8127 OUT C0
8128 OUT C0
8129 OUT C0
812A OUT C0
812B OUT C0
812C CALL 8500
812F DCR C
8130 JMP START
8133 HLT
DELAY:
8500 LXI B,8004
8503 L2:MVI D,0F
8505 L1:NOP
8506 DCR D
8507 JNZ L1
850A DCR B
850B MOV A,C
850C ORA B
850D JNZ L2
8510 RET
Subscribe to:
Comments (Atom)
