home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS 1992 December
/
simtel1292_SIMTEL_1292_Walnut_Creek.iso
/
msdos
/
crossasm
/
uasm.arc
/
51VAL.MAC
< prev
next >
Wrap
Text File
|
1986-03-21
|
7KB
|
373 lines
; ASM51 Validation File
; 15 June 1985
* Alternate Comment Line
*
radix 16
nop ; No operands
;
ajmp 57 ; ajmp & jmp alternate forms
jmp 57
;
ljmp 5757
;
rr a
;
inc a
;
inc 55
;
inc @r0
inc @r1
;
inc r0
inc r1
inc r2
inc r3
inc r4
inc r5
inc r6
inc r7
;
jbc 55,20
bbc 55,20
;
acall 57
call 57
bsr 57
;
lcall 5757
;
rrc a
;
dec a
;
dec 55
;
dec @r0
dec @r1
;
dec r0
dec r1
dec r2
dec r3
dec r4
dec r5
dec r6
dec r7
;
jb 55,30
bb 55,30
;
ajmp 157
jmp 157
;
ret
;
rl a
;
add a,#88
add a,88
add a,@r0
add a,@r1
add a,r0
add a,r1
add a,r2
add a,r3
add a,r4
add a,r5
add a,r6
add a,r7
;
jnb 55,50
bnb 55,50
;
acall 157
call 157
;
reti
;
rlc a
;
addc a,#88
addc a,88
addc a,@r0
addc a,@r1
addc a,r0
addc a,r1
addc a,r2
addc a,r3
addc a,r4
addc a,r5
addc a,r6
addc a,r7
;
jc 70
bc 70
;
ajmp 257
jmp 257
;
orl 55,a
orl 55,#88
orl a,#88
orl a,88
orl a,@r0
orl a,@r1
orl a,r0
orl a,r1
orl a,r2
orl a,r3
orl a,r4
orl a,r5
orl a,r6
orl a,r7
;
jnc 90
bnc 90
;
acall 257
call 257
;
anl 55,a
anl 55,#88
anl a,#88
anl a,88
anl a,@r0
anl a,@r1
anl a,r0
anl a,r1
anl a,r2
anl a,r3
anl a,r4
anl a,r5
anl a,r6
anl a,r7
;
jz 0B0
bz 0B0
;
ajmp 357
jmp 357
;
xrl 55,a
xrl 55,#88
xrl a,#88
xrl a,88
xrl a,@r0
xrl a,@r1
xrl a,r0
xrl a,r1
xrl a,r2
xrl a,r3
xrl a,r4
xrl a,r5
xrl a,r6
xrl a,r7
;
jnz 0E0
bnz 0E0
;
acall 357
call 357
;
orl c,55
;
jmp @a+dptr
;
mov a,#55
mov 55,#45
mov @r0,#55
mov @r1,#55
mov r0,#55
mov r1,#54
mov r2,#53
mov r3,#52
mov r4,#51
mov r5,#50
mov r6,#4f
mov r7,#4e
;
sjmp 140
br 140
;
ajmp 457
jmp 457
;
anl c,55
;
movc a,@a+pc
div ab
;
mov 55,45
mov 55,@r0
mov 55,@r1
mov 55,r0
mov 55,r1
mov 55,r2
mov 55,r3
mov 55,r4
mov 55,r5
mov 55,r6
mov 55,r7
;
mov dptr,#9876
;
acall 457
call 457
;
mov 55,c
;
movc a,@a+dptr
;
subb a,#88
subb a,88
subb a,@r0
subb a,@r1
subb a,r0
subb a,r1
subb a,r2
subb a,r3
subb a,r4
subb a,r5
subb a,r6
subb a,r7
;
orl c,/55
;
ajmp 557
jmp 557
;
mov c,55
;
inc dptr
;
mul ab
;
; reserved instruction @ A5
;
mov @r0,55
mov @r1,55
mov r0,55
mov r1,55
mov r2,55
mov r3,55
mov r4,55
mov r5,55
mov r6,55
mov r7,55
;
anl c,/55
;
acall 557
call 557
;
cpl 55
cpl c
;
cjne a,#55,190
cjne a,55,190
cjne @r0,#55,190
cjne @r1,#55,190
cjne r0,#55,190
cjne r1,#55,190
cjne r2,#55,190
cjne r3,#55,190
cjne r4,#55,190
cjne r5,#55,190
cjne r6,#55,190
cjne r7,#55,190
;
push 55
;
ajmp 657
jmp 657
;
clr 55
clr c
;
swap a
;
xch a,88
xch a,@r0
xch a,@r1
xch a,r0
xch a,r1
xch a,r2
xch a,r3
xch a,r4
xch a,r5
xch a,r6
xch a,r7
;
pop 55
;
acall 667
call 667
;
setb 55
setb c
;
da a
;
djnz 55,1A0
;
xchd a,@r0
xchd a,@r1
;
djnz r0,1C0
djnz r1,1C0
djnz r2,1C0
djnz r3,1C0
djnz r4,1C0
djnz r5,1C0
djnz r6,1C0
djnz r7,1C0
;
movx a,@dptr
;
ajmp 757
jmp 757
;
movx a,@r0
movx a,@r1
;
clr a
;
mov a,88
mov a,@r0
mov a,@r1
mov a,r0
mov a,r1
mov a,r2
mov a,r3
mov a,r4
mov a,r5
mov a,r6
mov a,r7
;
movx @dptr,a
;
acall 757
call 757
;
movx @r0,a
movx @r1,a
;
cpl a
;
mov 55,a
mov @r0,a
mov @r1,a
mov r0,a
mov r1,a
mov r2,a
mov r3,a
mov r4,a
mov r5,a
mov r6,a
mov r7,a
;
; End of Validation Suite
;
