Transcription of CASLⅡプログラミング
{{id}} {{{paragraph}}}
Example: stock market
CASLⅡプログラミング
Copyright 2004.. EXMPL START BEGIN ; EXMPL . ; . ; BEGIN . BEGIN LD GR1,A ; GR1 (A) . LD GR2,A ; GR2 (A) . SUBA GR1,B ; GR1 (B) . ; (GR1)=(A)-(B) . JPL DONE ; (A)>(B) DONE (GR2)=(A). LD GR2,B ; (A) (B) (GR2) (B) . DONE ST GR2,MAX ; (A),(B) MAX . RET ; . MAX DS 1 ; MAX . A DC 123 ; 123 A . B DC 45 ; 45 B . END.. START .. MAIN START FROMHERE. FROMHERE LD GR0,A.. ADD GR0,B.. 1. ST GR0,C. RET. A DC 123. B DC -15. C DS 1. END. END . END . END . DC (define constant). 10 16 .. DC 12 ; 0000000000001100 10 . DC -12 ; 1111111111110100 10 . DC #A1 ; 0000000010100001 16 . DC #FFFF : 1111111111111111 16 . DC A*2' ; 0000000001000001 1 1 8 . ; 0000000000101010 ( 8 ) . ; 0000000000110010 . COMET JIS X0210 .. 0 @ P. ! 1 A Q. 2 B R. # 3 C S. $ 4 D T. % 5 E U. & 6 F V. 7 G W. ( 8 H X. ) 9 I Y. 2. A * : J Z. B + ; K [. C , < L \. D - = M ].
dc #ffff : 内部表現は 1111111111111111 最大の 16進数 1 文字を 1 語の下位 8 ビットで 表す(上位 8 ビットは0)。文字 数分の語数を使う。 dc ‘a*2’ ; 内部表現は 00 0001 01; 0000000000101010 ; 0000000000110010 cometⅡにおける文字コード（jis x0210） 上位4ビット
Loading..
Tags:
Information
Domain:
Source:
Link to this page:
Please notify us if you found a problem with this document: