基本情報処理試験のフォルダを変更し、2018年春の分を追加

[YACASL2.git] / as / exam_fe / 2008_04 / Q09 / token_call.casl

diff --git a/as/exam_fe/2008_04/Q09/token_call.casl b/as/exam_fe/2008_04/Q09/token_call.casl
new file mode 100644 (file)
index 0000000..9ed899b
--- /dev/null
+++ b/as/exam_fe/2008_04/Q09/token_call.casl
@@ -0,0 +1,9 @@
+MAIN    START
+        LAD     GR1,STR
+        LAD     GR2,TBL
+        CALL    TOKEN
+        RET
+        DS      93
+STR     DC      '  THIS 1234  AN9999.'
+TBL     DS      100
+        END