1からNまで足すプログラムなのですが、CASL(CASLⅡじゃなくて)で動作しません。
どうすればいいでつか？
RSUM START
LD GR1,N
CALL SUM
ST GR1,S
RET
SUM CPA GR1,=0
JNZ CAL
RET
CAL PUSH 0,GR1
SUBA GR1,=1
CALL SUM
POP GR2
ADDA GR1,GR2
RET

N DC 100
S DS 1
END