X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=test%2Fsystem%2Fcomet2%2Flib_outa_q15%2Fouta_q15.casl;fp=test%2Fsystem%2Fcomet2%2Flib_outa_q15%2Fouta_q15.casl;h=0000000000000000000000000000000000000000;hb=473906d23322ef829ee8dad807895235d645981c;hp=1ea1f1242080d2489a80486a9d48157fad952f79;hpb=7ac339dcd755848e9820142422752fbdc8186b5c;p=YACASL2.git diff --git a/test/system/comet2/lib_outa_q15/outa_q15.casl b/test/system/comet2/lib_outa_q15/outa_q15.casl deleted file mode 100644 index 1ea1f12..0000000 --- a/test/system/comet2/lib_outa_q15/outa_q15.casl +++ /dev/null @@ -1,21 +0,0 @@ -;; outd_q15.caslを呼び出し、33個の数値を表示する -MAIN START - LAD GR2,0 -LOOP LD GR1,VAL,GR2 - CALL OUTAQ15 - LAD GR2,1,GR2 - CPA GR2,CNT - JZE FIN - JUMP LOOP -FIN RET -VAL DC #7FFF,#4000,#2000,#1000 - DC #0800,#0400,#0200,#0100 - DC #0080,#0040,#0020,#0010 - DC #0008,#0004,#0002,#0001 - DC #8000 - DC #8001,#C000,#E000,#F000 - DC #F800,#FC00,#FE00,#FF00 - DC #FF80,#FFC0,#FFE0,#FFF0 - DC #FFF8,#FFFC,#FFFE,#FFFF -CNT DC 33 - END