ヘッダーファイル呼び出しの整理
[YACASL2.git] / as / cmd / JZE / jze__o.casl
1 ;;; JZE adr OF:1/SF:0/ZF:0
2 MAIN    START
3         LD      GR1,A
4         SRL     GR1,1
5         JZE     TO
6         LAD     GR1,0
7         JUMP    FIN
8 TO      LAD     GR1,#FFFF
9 FIN     RET
10 A       DC      #0003
11         END