projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
5f3f7580f45fec613cb76ae0b8796f836100add2
[YACASL2.git]
/
as
/
cmd
/
JNZ
/
jnz_z.casl
1
;;; JNZ adr OF:0/SF:0/ZF:1
2
MAIN START
3
LD GR1,A
4
AND GR1,GR1
5
JNZ TO
6
LAD GR1,0
7
JUMP FIN
8
TO LAD GR1,#FFFF
9
FIN RET
10
A DC 0
11
END