projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
eea01110c5f6ea6a0b0a3785ed098a6c7bb023d1
[YACASL2.git]
/
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,GR0
7
CALL OUTL
8
MFIN RET
9
END