projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
95975d11985e5d7375f2fb7f3c0c144d92a6bbca
[YACASL2.git]
/
as
/
cmd
/
JNZ
/
jnz_p.casl
1
;;; JNZ adr OF:0/SF:0/ZF:0
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 1
11
END