X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2FCMD%2Fliteralstr.casl;h=0fa3fd42bc5ac53e80d38a11b33a19db8adbbb78;hp=bd1bbccf0d98e1ff8f41c85e5b3e696e3b1fd160;hb=ffe8e22a52a385d795889c5cabbde2f277342e32;hpb=fb54b1c9d2fbc3d4a62c6b4d38ff68e9d3b25c26 diff --git a/as/CMD/literalstr.casl b/as/CMD/literalstr.casl index bd1bbcc..0fa3fd4 100644 --- a/as/CMD/literalstr.casl +++ b/as/CMD/literalstr.casl @@ -1,13 +1,13 @@ -MAIN START - LAD GR1,='abcdeABCDE' - LAD GR2,10 -LOOP CPA GR2,=0 - JZE LEND - JMI LEND - LD GR3,0,GR1 - ADDA GR1,=1 - SUBA GR2,=1 - JUMP LOOP -LEND RET -LEN DC 5 - END +MAIN START + LAD GR1,='a' + LAD GR2,10 +LOOP CPA GR2,=0 + JZE LEND + JMI LEND + LD GR3,0,GR1 + ADDA GR1,=1 + SUBA GR2,=1 + JUMP LOOP +LEND RET +LEN DC 5 + END