;Super Zap
;By Kenny Kopecky
;Very high lag.  You have been warned.
{ "!)Boom" MOUSEPOS SAYAT
           255 0 0 PENCOLOR 2 PENSIZE
           0 0 POSX 30 - POSY 30 - LINE
           512 0 POSX 30 + POSY 30 - LINE
          512 384 POSX 30 + POSY 30 + LINE
           0 384 POSX 30 - POSY 30 + LINE
   ")yes" SAY
   PAINTUNDO  PAINTUNDO  PAINTUNDO  PAINTUNDO
 255 0 0 PENCOLOR 2 PENSIZE
     POSX 30 - POSY 30 - POSX 30 + POSY 30 - LINE
255 0 0 PENCOLOR 2 PENSIZE
 POSX 30 - POSY 30 - POSX 30 - POSY 30 + LINE
255 0 0 PENCOLOR 2 PENSIZE
POSX 30 + POSY 30 + POSX 30 + POSY 30 - LINE
255 0 0 PENCOLOR 2 PENSIZE
     255 50 0 PENCOLOR 4 PENSIZE
    POSX 30 - POSY 30 - POSX 30 + POSY 30 - LINE
255 50 0 PENCOLOR 4 PENSIZE
 POSX 30 - POSY 30 - POSX 30 - POSY 30 + LINE
255 50 0 PENCOLOR 4 PENSIZE
POSX 30 + POSY 30 + POSX 30 + POSY 30 - LINE
255 50 0 PENCOLOR 4 PENSIZE
     255 0 0 PENCOLOR 6 PENSIZE
     POSX 30 - POSY 30 - POSX 30 + POSY 30 - LINE
255 100 0 PENCOLOR 6 PENSIZE
 POSX 30 - POSY 30 - POSX 30 - POSY 30 + LINE
255 100 0 PENCOLOR 6 PENSIZE
POSX 30 + POSY 30 + POSX 30 + POSY 30 - LINE
255 100 0 PENCOLOR 6 PENSIZE
 POSX 30 + POSY 30 + POSX 30 - POSY 30 + LINE
     255 175 0 PENCOLOR 8 PENSIZE
     POSX 30 - POSY 30 - POSX 30 + POSY 30 - LINE
255 175 0 PENCOLOR 8 PENSIZE
 POSX 30 - POSY 30 - POSX 30 - POSY 30 + LINE
255 175 0 PENCOLOR 8 PENSIZE
POSX 30 + POSY 30 + POSX 30 + POSY 30 - LINE
255 175 00 PENCOLOR 8 PENSIZE
     255 255 0 PENCOLOR 10 PENSIZE
     POSX 30 - POSY 30 - POSX 30 + POSY 30 - LINE
255 255 0 PENCOLOR 10 PENSIZE
 POSX 30 - POSY 30 - POSX 30 - POSY 30 + LINE
255 255 0 PENCOLOR 10 PENSIZE
POSX 30 + POSY 30 + POSX 30 + POSY 30 - LINE
255 255 0 PENCOLOR 10 PENSIZE
 POSX 30 + POSY 30 + POSX 30 - POSY 30 + LINE
255 0 0 PENCOLOR 3 PENSIZE
POSX 30 - POSY 30 - MOUSEPOS LINE
           POSX 30 + POSY 30 + MOUSEPOS LINE
           POSX 30 - POSY 30 + MOUSEPOS LINE
           POSX 30 + POSY 30 - MOUSEPOS LINE
        PAINTCLEAR
")no" SAY
255 255 0 PENCOLOR 100 PENSIZE
POSX 30 - POSY 30 - MOUSEPOS LINE
           POSX 30 + POSY 30 + MOUSEPOS LINE
           POSX 30 - POSY 30 + MOUSEPOS LINE
           POSX 30 + POSY 30 - MOUSEPOS LINE
  PAINTCLEAR
100 0 25 PENCOLOR 1 PENSIZE
     MOUSEPOS 100 - 0 - MOUSEPOS 100 + 0 + line
     150 0 25 PENCOLOR 2 PENSIZE
     MOUSEPOS 90 - 0 - MOUSEPOS 90 + 0 + line
     200 0 25 PENCOLOR 3 PENSIZE
     MOUSEPOS 80 - 0 - MOUSEPOS 80 + 0 + line
     250 0 25 PENCOLOR 4 PENSIZE
     MOUSEPOS 70 - 0 - MOUSEPOS 70 + 0 + line
     250 0 25 PENCOLOR 5 PENSIZE
     MOUSEPOS 60 - 0 - MOUSEPOS 60 + 0 + line
     250 30 25 PENCOLOR 6 PENSIZE
     MOUSEPOS 50 - 0 - MOUSEPOS 50 + 0 + line
     250 60 25 PENCOLOR 7 PENSIZE
     MOUSEPOS 40 - 0 - MOUSEPOS 40 + 0 + line
250 90 25 PENCOLOR 8 PENSIZE
     MOUSEPOS 30 - 0 - MOUSEPOS 30 + 0 + line
     250 120 25 PENCOLOR 9 PENSIZE
     MOUSEPOS 20 - 0 - MOUSEPOS 20 + 0 + line
     250 150 25 PENCOLOR 10 PENSIZE
     MOUSEPOS 10 - 0 - MOUSEPOS 10 + 0 + line
PAINTUNDO PAINTUNDO PAINTUNDO PAINTUNDO PAINTUNDO PAINTUNDO PAINTUNDO 
PAINTUNDO
PAINTUNDO PAINTUNDO
"" CHATSTR =
        } CHATSTR "szap" == IF