projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
da362bd0d004d0227963e234361daa4512e8f334
[YACASL2.git]
/
mula_call1.casl
1
;;; casl2 mula_call0.casl mula.casl outa.casl
2
MAIN START
3
LAD GR1,9
4
LAD GR2,23
5
CALL MULA
6
JOV WAN
7
LD GR1,GR0
8
CALL OUTA
9
JUMP FIN
10
WAN OUT MSG,MLEN
11
FIN RET
12
MSG DC 'OF'
13
MLEN DC 2
14
END