projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
b46146358c777eac082d8e04b2123a3562072225
[YACASL2.git]
/
as
/
exam_fe
/
2011_10
/
Q12
/
btod2.casl
1
BTOD START
2
RPUSH
3
LAD GR6,4,GR3
4
LD GR7,GR3
5
LAD GR3,DAT
6
LP CALL DIV
7
OR GR5,='0'
8
ST GR5,0,GR6
9
CPL GR6,GR7
10
JZE FIN
11
LAD GR6,-1,GR6
12
JUMP LP
13
FIN RPOP
14
RET
15
DAT DC 0
16
DC 10
17
END