From fe2de04b9021faae69c6b98d401797c9728e15dc Mon Sep 17 00:00:00 2001 From: j8takagi <j8takagi@nifty.com> Date: Fri, 1 Jun 2018 15:14:18 +0900 Subject: [PATCH] =?utf8?q?=E6=83=85=E5=A0=B1=E5=87=A6=E7=90=86=E8=A9=A6?= =?utf8?q?=E9=A8=932011=E5=B9=B4=E7=A7=8B=E3=81=AE=E5=95=8F=E9=A1=8C?= =?utf8?q?=E3=82=92=E8=BF=BD=E5=8A=A0?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- as/fe_tests/2011_10/Q12/Q12.txt | 28 +++++++++++++++++++++++++++ as/fe_tests/2011_10/Q12/btod1.casl | 28 +++++++++++++++++++++++++++ as/fe_tests/2011_10/Q12/btod2.casl | 18 +++++++++++++++++ as/fe_tests/2011_10/Q12/call_div.casl | 3 +++ as/fe_tests/2011_10/Q12/div.casl | 26 +++++++++++++++++++++++++ 5 files changed, 103 insertions(+) create mode 100644 as/fe_tests/2011_10/Q12/Q12.txt create mode 100644 as/fe_tests/2011_10/Q12/btod1.casl create mode 100644 as/fe_tests/2011_10/Q12/btod2.casl create mode 100644 as/fe_tests/2011_10/Q12/call_div.casl create mode 100644 as/fe_tests/2011_10/Q12/div.casl diff --git a/as/fe_tests/2011_10/Q12/Q12.txt b/as/fe_tests/2011_10/Q12/Q12.txt new file mode 100644 index 0000000..fa089cb --- /dev/null +++ b/as/fe_tests/2011_10/Q12/Q12.txt @@ -0,0 +1,28 @@ +次ã®ã¢ã»ã³ãã©ããã°ã©ã ã®èª¬æåã³ããã°ã©ã ãèªãã§ï¼è¨å1ï¼2ã«çããã + +ãããã°ã©ã 1ã®èª¬æã + +é¤ç®ãè¡ãå¯ããã°ã©ã DIV ã§ããã + +(1) DIV ã¯è¡¨ï¼ã«ç¤ºãã¬ã¸ã¹ã¿ãä»ãã¦ï¼è¢«é¤æ°ã¨é¤æ°ãåãåãï¼åã¨å°ä½ãè¿ãã æ°å¤ã¯å ¨ã¦ 32 ãããã®ç¬¦å·ãªãæ´æ°ã¨ãï¼é¤æ°ã¯ï¼ã§ãªããã®ã¨ããã + +表1 ãã©ã¡ã¿ã®åæ¸¡ãæ¹æ³ + ä¸ä½èªï¼ä¸ä½ 16 ãããï¼ ä¸ä½èªï¼ä¸ä½ 16 ãããï¼ +å ¥å è¢«é¤æ° GR1 GR2 + 餿° é£ç¶ãã2èªã«ï¼ä¸ä½ 16 ãããï¼ä¸ä½ 16 ãããã®é ã«æ ¼ç´ãï¼ä¸ä½èªã®ã¢ãã¬ã¹ã GR3 ã«è¨å® +åºå å GR1 GR2 + å°ä½ GR4 GR5 + +(2) å¯ããã°ã©ã DIV ããæ»ãã¨ãï¼æ±ç¨ã¬ã¸ã¹ã¿ GR6, GR7 ã®å 容ã¯å ã«æ»ãã + +ããã°ã©ã 1ä¸ã® ã«å ¥ããæ£ããçããï¼è§£ç群ã®ä¸ããé¸ã¹ã + +a ã«é¢ããè§£ç群 + +㢠ADDL GR1,0,GR3 㤠ADDL GR1,=1 㦠ADDL GR2,1,GR3 +㨠ADDL GR2,=1 㪠ADDL GR4,0,GR3 ã« ADDL GR5,1,GR3 + +b ã«é¢ããè§£ç群 + +㢠JMI ADJ2 㤠JMI CONT 㦠JOV ADJ2 +㨠JOV CONT 㪠JPL ADJ2 ã« JPL CONT diff --git a/as/fe_tests/2011_10/Q12/btod1.casl b/as/fe_tests/2011_10/Q12/btod1.casl new file mode 100644 index 0000000..f67c7f4 --- /dev/null +++ b/as/fe_tests/2011_10/Q12/btod1.casl @@ -0,0 +1,28 @@ + BTOD START + RPUSH + LD GR6,GR3 + LAD GR7,4,GR3 + LAD GR3,UDAT ; 餿°ã®åæè¨å® + LP CALL DIV + OR ,='0' + ST ,0,GR6 ; 10 鲿°åï¼æåæ ¼ç´ + CPL GR6,GR7 + JZE FIN + LAD GR6,1,GR6 + LD GR1,GR4 ; è¢«é¤æ°ã®åè¨å® + LD GR2,GR5 + + JUMP LP + FIN RPOP + RET + UDAT DC 0 + DC 10000 + DC 0 + DC 1000 + DC 0 + DC 100 + DC 0 + DC 10 + DC 0 + DC 1 + END diff --git a/as/fe_tests/2011_10/Q12/btod2.casl b/as/fe_tests/2011_10/Q12/btod2.casl new file mode 100644 index 0000000..073898e --- /dev/null +++ b/as/fe_tests/2011_10/Q12/btod2.casl @@ -0,0 +1,18 @@ + BTOD START + RPUSH + LAD GR6,4,GR3 + LD GR7,GR3 + LAD GR3,DAT + LP CALL DIV + OR ,='0' + ST ,0,GR6 + CPL GR6,GR7 + JZE FIN + LAD GR6,-1,GR6 + JUMP LP + FIN RPOP + RET + DAT DC 0 + DC + END + diff --git a/as/fe_tests/2011_10/Q12/call_div.casl b/as/fe_tests/2011_10/Q12/call_div.casl new file mode 100644 index 0000000..87f12a3 --- /dev/null +++ b/as/fe_tests/2011_10/Q12/call_div.casl @@ -0,0 +1,3 @@ +MAIN START + RPUSH + diff --git a/as/fe_tests/2011_10/Q12/div.casl b/as/fe_tests/2011_10/Q12/div.casl new file mode 100644 index 0000000..bfc5630 --- /dev/null +++ b/as/fe_tests/2011_10/Q12/div.casl @@ -0,0 +1,26 @@ +DIV START ; æ¸ç®ãç¨ãã 32 ãããé¤ç® + PUSH 0,GR6 + PUSH 0,GR7 + LD GR6,GR1 + LD GR7,GR2 + LD GR1,=#FFFF ; åã®åæå + LD GR2,=#FFFF + LP LD GR4,GR6 + LD GR5,GR7 + ADDL GR2,=1 ; åã®ã«ã¦ã³ãã¢ãã + JOV ADJ1 + JUMP CONT + ADJ1 + CONT SUBL GR6,0,GR3 + J0V FIN + SUBL GR7,1,GR3 + + JUMP LP + ADJ2 SUBL GR6,=1 + J0V FIN + JUMP LP + FIN POP GR7 + POP GR6 + RET + END + -- 2.18.0