X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fcasl2lib%2Fsample%2Fcall_outbw.casl;fp=as%2Fcasl2lib%2Fsample%2Fcall_outbw.casl;h=0000000000000000000000000000000000000000;hp=c77368ece8686fe73930e73b67979b73c5c517ce;hb=20134ec3ebf911ef241284c6bd9145c04a75c6ca;hpb=5be8def29beb565c49e7268f71add4a7758ba77b diff --git a/as/casl2lib/sample/call_outbw.casl b/as/casl2lib/sample/call_outbw.casl deleted file mode 100644 index c77368e..0000000 --- a/as/casl2lib/sample/call_outbw.casl +++ /dev/null @@ -1,22 +0,0 @@ -;;; casl2 outb_call.casl outb.casl -MAIN START - LAD GR2,0 -LOOP LD GR1,VAL,GR2 - CALL OUTBW - 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