;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