projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
e8eaa6199dab29eb7e034eebe81db3b6fd532e21
[YACASL2.git]
/
as
/
FUNC
/
mula_call1.casl
1
;;; casl2 mula_call0.casl mula.casl outa.casl
2
MAIN START
3
LAD GR1,151
4
LAD GR2,255
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