projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
a98362360ab5a80c4262a3eb33789e3eecca6c4a
[YACASL2.git]
/
as
/
FUNC
/
sum_call.casl
1
;;; sum.caslを呼び出し、1から361までの数値の合計を求める
2
;;; casl2 sum_call.casl sum.call outl.casl
3
MAIN START
4
LAD GR1,361
5
CALL SUM
6
LD GR1,GR2
7
CALL OUTL
8
MFIN RET
9
END