X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fyakuwa%2Fbinout_test%2F0.txt;fp=as%2Fyakuwa%2Fbinout_test%2F0.txt;h=0000000000000000000000000000000000000000;hb=05965ee87822b44616998d347d8f91fbf550eb2e;hp=79aa0e77114a0ddcfc19a2debba258c93c89b0a2;hpb=e53b9aa2cd0e67ff64c52fa1b83e16c048283dbd;p=YACASL2.git diff --git a/as/yakuwa/binout_test/0.txt b/as/yakuwa/binout_test/0.txt deleted file mode 100644 index 79aa0e7..0000000 --- a/as/yakuwa/binout_test/0.txt +++ /dev/null @@ -1,198 +0,0 @@ -../../../../casl2 -la ../../../../as/YAKUWA/binout.casl - -Assemble ../../../../as/YAKUWA/binout.casl (0) - -Label:::: -BINOUT.OBUF ---> #0060 -BINOUT.ZERO ---> #002D -BINOUT.OUT1 ---> #0041 -BINOUT.OUT2 ---> #0047 -BINOUT.STORE ---> #0033 -MAIN.MLOOP ---> #0002 -BINOUT.NZERO ---> #0071 -BINOUT.LOOP1 ---> #0023 -BINOUT.LOOP2 ---> #002B -MAIN.MFIN ---> #000E -MAIN ---> #0000 -BINOUT.OLNG ---> #0070 -MAIN.MWORD ---> #000F -MAIN.MLEN ---> #0013 -BINOUT ---> #0014 -BINOUT.ONE ---> #0031 - -Assemble ../../../../as/YAKUWA/binout.casl (1) -../../../../as/YAKUWA/binout.casl: 1:;;; BINOUT: 主プログラムから渡された1語の内容を、 -../../../../as/YAKUWA/binout.casl: 2:;;; ゼロ抑制を行った2進表記で出力する -../../../../as/YAKUWA/binout.casl: 3:;;; 八鍬幸信『基本情報処理試験 らくらく突破 CASL II』172ページ -../../../../as/YAKUWA/binout.casl: 4:;;; BINOUTを呼び出す -../../../../as/YAKUWA/binout.casl: 5:MAIN START -../../../../as/YAKUWA/binout.casl: 6: LAD GR2,0 - #0000 #1220 - #0001 #0000 -../../../../as/YAKUWA/binout.casl: 7:MLOOP CPA GR2,MLEN - #0002 #4020 - #0003 #0013 -../../../../as/YAKUWA/binout.casl: 8: JZE MFIN - #0004 #6300 - #0005 #000E -../../../../as/YAKUWA/binout.casl: 9: LD GR1,MWORD,GR2 - #0006 #1012 - #0007 #000F -../../../../as/YAKUWA/binout.casl: 10: CALL BINOUT - #0008 #8000 - #0009 #0014 -../../../../as/YAKUWA/binout.casl: 11: LAD GR2,1,GR2 - #000A #1222 - #000B #0001 -../../../../as/YAKUWA/binout.casl: 12: JUMP MLOOP - #000C #6400 - #000D #0002 -../../../../as/YAKUWA/binout.casl: 13:MFIN RET - #000E #8100 -../../../../as/YAKUWA/binout.casl: 14:MWORD DC #0000,#0001,#09CD,#8001 - #000F #0000 - #0010 #0001 - #0011 #09CD - #0012 #8001 -../../../../as/YAKUWA/binout.casl: 15:MLEN DC 4 - #0013 #0004 -../../../../as/YAKUWA/binout.casl: 16: END -../../../../as/YAKUWA/binout.casl: 17:;;; BINOUT -../../../../as/YAKUWA/binout.casl: 18:BINOUT START -../../../../as/YAKUWA/binout.casl: 19: PUSH 0,GR1 ; レジスタの退避 - #0014 #7001 - #0015 #0000 -../../../../as/YAKUWA/binout.casl: 20: PUSH 0,GR2 ; ↓ - #0016 #7002 - #0017 #0000 -../../../../as/YAKUWA/binout.casl: 21: PUSH 0,GR3 ; ↓ - #0018 #7003 - #0019 #0000 -../../../../as/YAKUWA/binout.casl: 22: PUSH 0,GR4 ; ↓ - #001A #7004 - #001B #0000 -../../../../as/YAKUWA/binout.casl: 23: LAD GR2,0 ; 出力ポインタの初期化 - #001C #1220 - #001D #0000 -../../../../as/YAKUWA/binout.casl: 24: LAD GR3,15 ; カウンタの初期化 - #001E #1230 - #001F #000F -../../../../as/YAKUWA/binout.casl: 25: LD GR4,GR1 ; 全ビット = 0？ - #0020 #1441 -../../../../as/YAKUWA/binout.casl: 26: JZE OUT1 - #0021 #6300 - #0022 #0041 -../../../../as/YAKUWA/binout.casl: 27:LOOP1 JMI ONE ; 先行するビット処理 - #0023 #6100 - #0024 #0031 -../../../../as/YAKUWA/binout.casl: 28: LAD GR3,-1,GR3 ; ↓ - #0025 #1233 - #0026 #FFFF -../../../../as/YAKUWA/binout.casl: 29: SLL GR1,1 ; ↓ - #0027 #5210 - #0028 #0001 -../../../../as/YAKUWA/binout.casl: 30: JUMP LOOP1 - #0029 #6400 - #002A #0023 -../../../../as/YAKUWA/binout.casl: 31:LOOP2 JMI ONE ; 符号ビットの判定 - #002B #6100 - #002C #0031 -../../../../as/YAKUWA/binout.casl: 32:ZERO LAD GR0,48 ; '0'→GR0 - #002D #1200 - #002E #0030 -../../../../as/YAKUWA/binout.casl: 33: JUMP STORE - #002F #6400 - #0030 #0033 -../../../../as/YAKUWA/binout.casl: 34:ONE LAD GR0,49 ; '1'→GR1 - #0031 #1200 - #0032 #0031 -../../../../as/YAKUWA/binout.casl: 35:STORE ST GR0,OBUF,GR2 - #0033 #1102 - #0034 #0060 -../../../../as/YAKUWA/binout.casl: 36: LAD GR2,1,GR2 - #0035 #1222 - #0036 #0001 -../../../../as/YAKUWA/binout.casl: 37: LAD GR3,-1,GR3 - #0037 #1233 - #0038 #FFFF -../../../../as/YAKUWA/binout.casl: 38: CPA GR3,NZERO - #0039 #4030 - #003A #0071 -../../../../as/YAKUWA/binout.casl: 39: JMI OUT2 ; 全ビット終了？ - #003B #6100 - #003C #0047 -../../../../as/YAKUWA/binout.casl: 40: SLL GR1,1 - #003D #5210 - #003E #0001 -../../../../as/YAKUWA/binout.casl: 41: JUMP LOOP2 - #003F #6400 - #0040 #002B -../../../../as/YAKUWA/binout.casl: 42:OUT1 LAD GR0,48 - #0041 #1200 - #0042 #0030 -../../../../as/YAKUWA/binout.casl: 43: ST GR0,OBUF,GR2 - #0043 #1102 - #0044 #0060 -../../../../as/YAKUWA/binout.casl: 44: LAD GR2,1,GR2 - #0045 #1222 - #0046 #0001 -../../../../as/YAKUWA/binout.casl: 45:OUT2 ST GR2,OLNG - #0047 #1120 - #0048 #0070 -../../../../as/YAKUWA/binout.casl: 46: OUT OBUF,OLNG - #0049 #7001 - #004A #0000 - #004B #7002 - #004C #0000 - #004D #1210 - #004E #0060 - #004F #1220 - #0050 #0070 - #0051 #F000 - #0052 #0002 - #0053 #1210 - #0054 #0072 - #0072 #000A - #0055 #1220 - #0056 #0073 - #0073 #0001 - #0057 #F000 - #0058 #0002 - #0059 #7120 - #005A #7110 -../../../../as/YAKUWA/binout.casl: 47: POP GR4 ; レジスタの復元 - #005B #7140 -../../../../as/YAKUWA/binout.casl: 48: POP GR3 ; ↓ - #005C #7130 -../../../../as/YAKUWA/binout.casl: 49: POP GR2 ; ↓ - #005D #7120 -../../../../as/YAKUWA/binout.casl: 50: POP GR1 ; ↓ - #005E #7110 -../../../../as/YAKUWA/binout.casl: 51: RET - #005F #8100 -../../../../as/YAKUWA/binout.casl: 52:OBUF DS 16 - #0060 #0000 - #0061 #0000 - #0062 #0000 - #0063 #0000 - #0064 #0000 - #0065 #0000 - #0066 #0000 - #0067 #0000 - #0068 #0000 - #0069 #0000 - #006A #0000 - #006B #0000 - #006C #0000 - #006D #0000 - #006E #0000 - #006F #0000 -../../../../as/YAKUWA/binout.casl: 53:OLNG DS 1 - #0070 #0000 -../../../../as/YAKUWA/binout.casl: 54:NZERO DC 0 - #0071 #0000 -../../../../as/YAKUWA/binout.casl: 55: END -0 -1 -100111001101 -1000000000000001