;WonderZap
;Author: CHEF
;I was bored one day so I made this.
;Goes in ON OUTCHAT
{ PENFRONT 5 PENSIZE 0 0 0 PENCOLOR
MOUSEPOS x = y =
;Aim
y x 150 - y x 135 - LINE
y x 100 - y x 84 - LINE
y 40 - x 120 - y 20 - x 120 - LINE
y 40 + x 120 - y 20 + x 120 - LINE
PAINTCLEAR
y 165 - x y 145 - x LINE
y 100 - x y 80 - x LINE
y 122 - x 35 - y 122 - x 20 - LINE
y 122 - x 35 + y 122 - x 20 + LINE
PAINTCLEAR
y 50 + x 60 - y 30 + x 60 - LINE
y 110 + x 60 - y 90 + x 60 - LINE
y 71 + x 95 - y 71 + x 80 - LINE
y 71 + x 40 - y 71 + x 25 - LINE
PAINTCLEAR
y 35 - x y 15 - x LINE
y 35 + x y 15 + x LINE
y x 35 - y x 15 - LINE
y x 35 + y x 15 + LINE
PENFRONT 6 PENSIZE 255 0 0 PENCOLOR
y 35 - x y 15 - x LINE
y 35 + x y 15 + x LINE
y x 35 - y x 15 - LINE
y x 35 + y x 15 + LINE
PAINTCLEAR
")yes" SAY
y 35 - x y 15 - x LINE
y 35 + x y 15 + x LINE
y x 35 - y x 15 - LINE
y x 35 + y x 15 + LINE
;Lock On
PENFRONT 5 PENSIZE 0 0 0 PENCOLOR
y 30 - x 30 - y 30 + x 30 - LINE
y 30 - x 30 - y 30 - x 30 + LINE
y 30 + x 30 + y 30 + x 30 - LINE
y 30 + x 30 + y 30 - x 30 + LINE
;CORNERS
PENFRONT 3 PENSIZE 255 0 0 PENCOLOR
0 0 y x LINE
0 384 y x LINE
512 0 y x LINE
512 384 y x LINE
")no" SAY
PAINTCLEAR
PENFRONT 7 PENSIZE 200 255 0 PENCOLOR
0 0 y x LINE
512 384 y x LINE
PENFRONT 7 PENSIZE 255 100 0 PENCOLOR
512 0 y x LINE
0 384 y x LINE
")no" SAY
PAINTCLEAR
;X em
PENFRONT 6 PENSIZE 255 0 0 PENCOLOR
y 100 - x 100 - y 100 + x 100 + LINE
y 100 + x 100 - y 100 - x 100 + LINE
PENFRONT 4 PENSIZE 0 0 0 PENCOLOR
y 99 - x 99 - y 100 + x 100 + LINE
y 99 + x 97 - y 98 - x 100 + LINE
")crunch" SAY
PAINTCLEAR
PENFRONT 4 PENSIZE 0 0 255 PENCOLOR
;box
y 80 - x 85 - y 80 - x 85 + LINE
y 80 + x 85 - y 80 + x 85 + LINE
y 80 - x 85 - y 80 + x 85 - LINE
y 80 - x 85 + y 80 + x 85 + LINE
")fazein" SAY
PENFRONT 4 PENSIZE 0 80 20 PENCOLOR
y 60 - x 65 - y 60 - x 65 + LINE
y 60 + x 65 - y 60 + x 65 + LINE
y 60 - x 65 - y 60 + x 65 - LINE
y 60 - x 65 + y 60 + x 65 + LINE
PENFRONT 4 PENSIZE 255 100 0 PENCOLOR
y 40 - x 45 - y 40 - x 45 + LINE
y 40 + x 45 - y 40 + x 45 + LINE
y 40 - x 45 - y 40 + x 45 - LINE
y 40 - x 45 + y 40 + x 45 + LINE
PENFRONT 4 PENSIZE 150 0 150 PENCOLOR
y 25 - x 30 - y 25 - x 30 + LINE
y 25 + x 30 - y 25 + x 30 + LINE
y 25 - x 30 - y 25 + x 30 - LINE
y 25 - x 30 + y 25 + x 30 + LINE
PENFRONT 6 PENSIZE 255 0 0 PENCOLOR
;X
y 80 - x 85 - y x LINE
y 80 + x 85 - y x LINE
y 80 - x 85 + y x LINE
y 80 + x 85 + y x LINE
")pop" SAY
PENFRONT 5 PENSIZE 200 255 0 PENCOLOR
;+ sign
y x 20 - y x LINE
y x 20 + y x LINE
y 20 - x y x LINE
y 20 + x y x LINE
")no" SAY
PAINTCLEAR
"" CHATSTR =
} CHATSTR "wzap" == IF
               (
geocities.com/siliconvalley/network/8524)                   (
geocities.com/siliconvalley/network)                   (
geocities.com/siliconvalley)