;Aura
;a little, non violent script which gives the user, or anyone he
;points the mouse at
;a lovely golden glow....hope you like it...any comments are welcome,
;i m sure i could do with some hints on things like 'stack management';)
; but anyway, here ya go...see yooooo, at the palace....
{
MOUSEPOS SWAP x= y=
40 grid =
8 unit =
255 max =
140 min =
min max 0 PENCOLOR 1 PENSIZE PENBACK
x x2 =
x x2 =
y grid - y2 =
{x2 grid - y2 MOUSEPOS LINE
unit grid -=
10 max -=
10 min +=
max min 0 PENCOLOR
} {grid -40 >=} WHILE
40 grid =
y y2 =
x grid + x2 =
{x2 y2 grid - MOUSEPOS LINE
unit grid -=
10 max +=
10 min -=
max min 0 PENCOLOR
} {grid -40 >=} WHILE
40 grid =
x x2 =
y grid + y2 =
{x2 grid + y2 MOUSEPOS LINE
unit grid -=
10 max -=
10 min +=
max min 0 PENCOLOR
} {grid -40 >=} WHILE
40 grid =
y y2 =
x grid - x2 =
{x2 y2 grid + MOUSEPOS LINE
unit grid -=
10 max +=
10 min -=
max min 0 PENCOLOR
} {grid -40 >=} WHILE
"fazein" SOUND
"" CHATSTR =
} CHATSTR "aura" == IF
(
geocities.com/siliconvalley/network/8524) (
geocities.com/siliconvalley/network) (
geocities.com/siliconvalley)