Mutant Ant Attack: ANT ATTACK.B

  1 CLEAR 35000: INVERSE 0: FLASH 0: BORDER 0: PAPER 0: INK 4: BRIGHT 0: OVER 0: FLASH 0: CLS 
  2 PRINT  BRIGHT 1; PAPER 0; INK 6; INVERSE 1;AT 10,11;"ANT ATTACK"; PAPER 0; INVERSE 0;AT 12,10;"By S.Allaway"
  3 PRINT #0; PAPER 1; INK 5; FLASH 1; BRIGHT 1;"        LOADING GRAPHICS        "
  4 INK 5: PAPER 1: PRINT AT 20,0;
  5 BEEP .73,20: LOAD ""CODE 
  6 CLS : FOR n=0 TO 21
  7 PRINT  INK 4; PAPER 0;"[E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E][E]"
  8 NEXT n
  9 PAPER 2: INK 6: BRIGHT 1
  10 PRINT AT 1,7;"▞▚▖ ▖▟▖"
  12 PRINT AT 2,7;"▘";AT 2,10;"";AT 2,20;"▞▘"
  14 PRINT AT 3,10;"▟▖"
  16 PRINT AT 4,4;"▗▖▙";AT 4,10;"▝▙▙▘▙"
  18 PRINT AT 5,4;"▖▘";AT 5,21;"▚▖"
  20 PRINT AT 6,4;"";AT 6,6;"▟▞▙";AT 6,22;"▝"
  22 PRINT AT 7,4;"▛▙▜▞▛▙";AT 7,24;""
  24 PRINT AT 8,4;"▚▞";AT 8,18;"▚";AT 8,20;""
  26 PRINT AT 9,3;"▗▘▛▟▘";AT 9,18;"▝";AT 9,21;""
  28 PRINT AT 10,3;"▞ ▞▝▞▘"
  30 PRINT AT 11,9;""
  32 PRINT AT 12,8;"▝"
  40 INK 5: PAPER 1
  50 PRINT AT 10,17;"▗"
  52 PRINT AT 11,17;"▝▖";AT 11,26;"▗▖"
  54 PRINT AT 12,19;"▙▖";AT 12,26;"▛▜▙▖"
  56 PRINT AT 13,21;"▙▖▗▞▜▙"
  58 PRINT AT 14,23;"▙▖ ▟▞▜"
  60 PRINT AT 15,21;"▗▗▘ ▝▚"
  62 PRINT AT 16,20;"▗▜▖ ▝▛  "
  64 PRINT AT 17,20;"▗▝▖ ▜ ▚"
  66 PRINT AT 18,20;"▝▞▝▖▚▝▖"
  68 PRINT AT 19,21;"▚ ▙▝▞▖▚▞▘"
  70 PRINT AT 20,22;"▚▝▗▝▞▚▝▚"
  72 PRINT AT 21,23;"▚▝▝▖"
  90 BRIGHT 1: PAPER 7: INK 0
  100 PRINT AT 13,6;" ▖▖▗▗ "
  105 PRINT AT 14,6;" ▙▟  "
  110 PRINT AT 15,6;" ▜  "
  150 PRINT AT 16,3;" ▖▖▖▖▖▖▗ "
  155 PRINT AT 17,3;" ▙  ▙▘▙▘ "
  160 PRINT AT 18,3;"   ▙▚ "
  165 PRINT AT 19,3;""
  170 PRINT AT 20,3;" By S.Allaway "
  200 PRINT #0; PAPER 1; INK 5; FLASH 1; BRIGHT 1;"        LOADING PROGRAM         "
  205 INK 5: PAPER 1
  210 BEEP .73,20
  215 PRINT AT 20,0;
  220 LOAD ""CODE 
  225 PRINT AT 20,0;
  230 LOAD ""CODE 
  240 BORDER 0: INK 4: PAPER 0: CLS 
  245 PRINT #0; PAPER 1; INK 5; FLASH 1; BRIGHT 1;"   PRESS ANY KEY TO CONTINUE    "
  250 INK 5: PAPER 1
  252 PRINT AT 7,7;"▗▗▗▗  ▖▖▖▖"
  254 PRINT AT 8,7;" ▟   ▙▙▙▖"
  256 PRINT AT 9,7;"        "
  258 PRINT AT 10,7;"▝ ▘▝▝   ▝ ▘▘▘ ▘"
  275 BEEP .73,20: PAUSE 0
  280 RANDOMIZE USR 40000
  300 STOP 
  60928