X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2FFUNC%2Foutl_call.casl;fp=as%2FFUNC%2Foutl_call.casl;h=0000000000000000000000000000000000000000;hp=d20214ec9b324ab70371564c738ce6c10532424e;hb=58ee37be62a5e359d0f6eb603cc86b5692f74b90;hpb=85744703060a90c21ee325d3a692f80233bc281f diff --git a/as/FUNC/outl_call.casl b/as/FUNC/outl_call.casl deleted file mode 100644 index d20214e..0000000 --- a/as/FUNC/outl_call.casl +++ /dev/null @@ -1,22 +0,0 @@ -;;; casl2 outl_call.casl outl.casl -MAIN START - LAD GR2,0 -LOOP LD GR1,VAL,GR2 - CALL OUTL - LAD GR2,1,GR2 - CPA GR2,CNT - JZE FIN - JUMP LOOP -FIN RET -VAL DC 0 - DC #0001,#0002,#0004,#0008 - DC #0010,#0020,#0040,#0080 - DC #0100,#0200,#0400,#0800 - DC #1000,#2000,#4000,#7FFF - DC #8000 - DC #8001,#C000,#E000,#F000 - DC #F800,#FC00,#FE00,#FF00 - DC #FF80,#FFC0,#FFE0,#FFF0 - DC #FFF8,#FFFC,#FFFE,#FFFF -CNT DC 34 - END