基本情報処理試験のフォルダを変更し、2018年春の分を追加
[YACASL2.git] / as / fe_tests / 2008_10 / Q09 / ptn4.casl
diff --git a/as/fe_tests/2008_10/Q09/ptn4.casl b/as/fe_tests/2008_10/Q09/ptn4.casl
deleted file mode 100644 (file)
index 4c24fd8..0000000
+++ /dev/null
@@ -1,16 +0,0 @@
-;;; 平成20年 秋期 基本情報技術者 午後 問09
-;;; 与えられたビット番号B1からB2(15>B1≧B2>0)までのビットを0、それ以外を1に設定
-PTN4    START
-        ST      GR1,WRK
-        LD      GR1,GR2
-        CALL    PTN1
-        PUSH    0,GR2       ; PTN1 の結果を一時保存
-        LD      GR1,WRK
-        LAD     GR1,1,GR1   ; ビット番号の調整
-        CALL    PTN2
-        POP     GR1         ; 保存していた PTN1 の結果を GR1 ヘ
-        XOR     GR2,GR1
-        LD      GR1,WRK
-        RET
-WRK     DS      1
-        END