assorted Cyborg scripts 6

Knowledgebase

Storm Palace Hosting > Storm Hosting Help Desk > Knowledgebase

assorted Cyborg scripts 6

Solution ;colorfull kiss - SPKISS1

{ x GLOBAL y GLOBAL whome whopos y = x = mousepos setpos prop1 GLOBAL
"[ " p = 0 i = { p i USERPROP itoa & " " & p = i ++ } { i
NBRUSERPROPS < } WHILE p " ]" & prop1 =
[ 1468253046 ] SETPROPS "!heres a sweet kiss just for You From Me in shades of color !!!" SAY
255 051 255 PENCOLOR 2 PENSIZE PENFRONT MOUSEPOS PENPOS 4 2 LINETO -4 3 LINETO 051 255 204 PENCOLOR 2 PENSIZE PENFRONT MOUSEPOS PENPOS -4 2 LINETO 4 3 LINETO
{ x GLOBAL y GLOBAL x y setpos } 150 ALARMEXEC { prop1 GLOBAL { NAKED } {prop1 GLOBAL prop1
" SETPROPS" & xpropo = xpropo STRTOATOM EXEC } "[ ]" prop1 == IFELSE } 160 ALARMEXEC
"" CHATSTR = } CHATSTR "spkiss1" == IF

; rose shower
{ MOUSEPOS Y = X =
Y 42 - A1 = Y 0 + A2 = X 72 - B = A 120 + C =
384 Y - A3 =
0 i = { "r1" B 100 RANDOM + A1 40 RANDOM + ADDLOOSEPROP i++ } { i 16 <
} WHILE
{ "rose2" B 100 RANDOM + A2 A3 RANDOM + ADDLOOSEPROP i++ } { i 60 < }
WHILE ")kiss !A Rose Shower for Someone Special!" CHATSTR = }
CHATSTR "rshower" == IF

ON ALARM ; ---- ew ----
;EW Face
{ x GLOBAL y GLOBAL whome whopos y = x = mousepos setpos prop1 GLOBAL
"[ " p = 0 i = { p i USERPROP itoa & " " & p = i ++ } { i
NBRUSERPROPS < } WHILE p " ]" & prop1 =
[ 1108549015 ] SETPROPS
")pop ewwwwwwwwwwwwwwwwwwww..Men.*THEY STINK*" SAY
{ x GLOBAL y GLOBAL x y setpos } 290 ALARMEXEC { prop1 GLOBAL { NAKED }
{prop1 GLOBAL prop1
" SETPROPS" & xpropo = xpropo STRTOATOM EXEC } "[ ]" prop1 == IFELSE } 290
ALARMEXEC
"" CHATSTR = } CHATSTR "ew" == IF

;cbheart
{ CLEARLOOSEPROPS PAINTCLEAR
{ CLEARLOOSEPROPS PAINTCLEAR } 300 ALARMEXEC
x GLOBAL y GLOBAL whome whopos y = x = mousepos setpos prop1 GLOBAL
")kiss !Hope this heart show you how much you mean to me!! "SAY
"[ " p = 0 i = { p i USERPROP itoa & " " & p = i ++ } { i
NBRUSERPROPS < } WHILE p " ]" & prop1 =
[ 986050443 986050146 986050965 986050465 986050994 986050977] SETPROPS
PENFRONT
255 RANDOM 255 RANDOM 255 RANDOM PENCOLOR 2 PENSIZE mousepos penpos -1 0
pento -2 -4 lineto -4 -6 lineto -6 -8 lineto 4 -7 lineto 4 0 lineto 6 3
lineto
mousepos penpos -1 0 pento 2 -4 lineto 4 -6 lineto 6 -8 lineto -4 -7
lineto -4 0 lineto -6 3 lineto 0 5
{ x GLOBAL y GLOBAL x y setpos } 250 ALARMEXEC { prop1 GLOBAL { NAKED }
{prop1 GLOBAL prop1
" SETPROPS" & xpropo = xpropo STRTOATOM EXEC } "[ ]" prop1 == IFELSE } 260
ALARMEXEC
"" CHATSTR = } CHATSTR "cbheart" == IF

;love - paints I LOVE YOU on screen sealed with a kiss

{ 255 0 0 PENCOLOR 5 PENSIZE MOUSEPOS PENPOS
10 0 LINETO -5 0 PENTO 0 20 LINETO -5 0 PENTO 10 0 LINETO 20 -20 PENTO 0 20 LINETO 10 0 LINETO 10 0 PENTO
10 0 LINETO 0 -20 LINETO -10 0 LINETO 0 20 LINETO 20 -20 PENTO 5 20 LINETO 5 -20 LINETO 20 0 PENTO
-10 0 LINETO 0 20 LINETO 10 0 LINETO -5 -10 PENTO -5 0 LINETO 30 -10 PENTO 5 10 LINETO 5 -10 LINETO -5 10 PENTO
0 10 LINETO 15 0 PENTO 10 0 LINETO 0 -20 LINETO -10 0 LINETO 0 20 LINETO 25 0 PENTO 10 0 LINETO
0 -20 LINETO -10 0 PENTO 0 20 LINETO
")kiss" CHATSTR =
} CHATSTR "love" == IF

;HKISS: heart kiss
{ { GLOBAL } [ x y prop1 ] FOREACH
WHOME WHOPOS y = x =
MOUSEPOS my = mx =
mx 0 + tx = my 0 + ty =
tx ty SETPOS
"[ " p = 0 i = { p i USERPROP ITOA & " " & p = i ++ } { i NBRUSERPROPS < }
WHILE p " ]" & prop1 =
[ 1895399154 ] SETPROPS
")KISS !KIssesss From My Heart!!!" SAY
255 RANDOM 255 RANDOM 255 RANDOM PENCOLOR 2 PENSIZE PENFRONT
MOUSEPOS PENPOS
3 -3 lineto 2 0 lineto 3 3 lineto 0 2 lineto -8 8 lineto
-8 -8 lineto 0 -2 lineto 3 -3 lineto 2 0 lineto 3 3 lineto
0 2 lineto 3 -3 lineto 2 0 lineto -6 6 lineto 0 2 lineto 7 -7 lineto
0 1 lineto -6 6 lineto -6 -6 lineto 2 -2 lineto 2 2 lineto 0 2 lineto -2 -2 lineto
{ x GLOBAL y GLOBAL x y SETPOS } 150 ALARMEXEC
{ prop1 GLOBAL { NAKED } { prop1 GLOBAL prop1 " SETPROPS" & xpropo =
xpropo STRTOATOM EXEC } "[ ]" prop1 == IFELSE } 160 ALARMEXEC
"" CHATSTR =
} CHATSTR "hkiss" == IF

Was this article helpful? yes / no

Article details

Article ID:	361
Category:	Knowledgebase
Date added:	04-24-2014 06:11:47
Views:	589
Rating (Votes):	(0)

<< Go back