New Years Eve Party

Knowledgebase

Storm Palace Hosting > Storm Hosting Help Desk > Knowledgebase

New Years Eve Party

Solution ROOM
ID 259
NOCYBORGS
NAME "New Years Eve Party"
PICT "anjelzbar3.gif"
PICTURE ID 1 NAME "confettifall.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 2 NAME "blank.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 4 NAME "bjuk1.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 5 NAME "bjuk2.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 6 NAME "bjuk3.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 7 NAME "bjuk4.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 8 NAME "arrowll.gif" TRANSCOLOR 0 ENDPICTURE
PICTURE ID 9 NAME "arrowrr.gif" TRANSCOLOR 0 ENDPICTURE
SPOT
ID 200
NAME "frame by frame"
OUTLINE 238,188 288,188 288,228 238,228
LOC 302,0
PICTS 2,0,0 1,0,12 1,0,24 1,0,36 1,0,48 1,0,60 1,0,72 1,0,84 1,0,96 1,0,108 1,0,120 1,0,132 1,0,144 1,0,156 1,0,168 1,0,180 1,0,192 1,0,204 1,0,216 1,0,228 1,0,240 1,0,252 1,0,264 1,0,276 1,0,288 1,0,300 1,0,312 1,0,324 1,0,336 1,0,348 1,0,360 1,0,372 ENDPICTS
ENDSPOT
SPOT
ID 10
NAME "on/off"
DONTMOVEHERE
OUTLINE 433,288 490,288 490,319 433,319
LOC 461,296
SCRIPT
ON ENTER { "Say on to start the confetti falling. Say it again to make it fall faster.Say off to stop it and/or the music" LOCALMSG
"Party Talk will be on upon entering this room. To turn it off say party's off , to turn it back on say party's on" LOCALMSG }
ON ALARM {
{0 200 SETSPOTSTATELOCAL}
{{200 GETSPOTSTATE 1 + 200 SETSPOTSTATELOCAL}
{1 200 SETSPOTSTATELOCAL} 200 GETSPOTSTATE 31 < IFELSE
10 ME SETALARM
} ME GETSPOTSTATE 0 == IFELSE
}
ON OUTCHAT {
{1 ME SETSPOTSTATELOCAL 10 ME SETALARM} CHATSTR LOWERCASE "on" == IF
{0 ME SETSPOTSTATELOCAL} CHATSTR LOWERCASE "off" == IF
}
ENDSCRIPT
ENDSPOT
DOOR
LOCKABLE
ID 6
NAME "sound"
DONTMOVEHERE
OUTLINE 367,159 400,159 400,198 367,198
LOC 385,179
PICTS 0,22816,30565 24933,20512,8307 ENDPICTS
SCRIPT
;~MediaList~;silentwav,auldlangsyne
ON ENTER {
"silentwav" SOUND
"auldlangsyne" SOUND
"@400,175 Say off to stop the music. Click on the jukebox to restart song.OR DELETE THE SOUND PARTS ABOVE AND CHANGE THIS TO SAY CLICK THE DJ'S LINK OR OR OR" LOCALMSG
}
ON SELECT{
"auldlangsyne" SOUND
}
ON OUTCHAT {
{ ME UNLOCK
} CHATSTR "off" == IF
}
ENDSCRIPT
ENDSPOT
SPOT
ID 8
OUTLINE 370,128 395,125 395,143 372,145
LOC 384,169
PICTS 4,0,0 5,0,0 6,0,0 7,0,0 ENDPICTS
SCRIPT
;simple looping animation, by Foxy
ON ENTER { 1 ME SETALARM }
ON ALARM {
4 pics = ;change 6 to the number of pictures you have
ME GETSPOTSTATE 1 + DUP pics / pics * -
ME SETSPOTSTATELOCAL
30 ME SETALARM
;make 30 higher to slow down, lower to speed up
}
ENDSCRIPT
ENDSPOT
SPOT
ID 9
NAME "partytalk"
DONTMOVEHERE
OUTLINE 481,6 503,6 503,26 481,26
LOC 507,44
SCRIPT
ON ENTER {
party GLOBAL
1 party =
}
ON OUTCHAT {
party GLOBAL
{ 1 party = "Party Enabled" LOCALMSG } CHATSTR "party'*s on" GREPSTR IF
{ 0 party = "Party Disabled" LOCALMSG } CHATSTR "party'*s off" GREPSTR IF
{
{
{
[ "Awesome!"
"Cool!"
"Groovy!"
"Bitchin!"
"Radical!"
"Totally!"
"Rad!"
"Bad!"
] 8 RANDOM GET CHATSTR =
}
{
"!" PUNCT =
{"$1" GREPSUB CHATSTR = "$2" GREPSUB PUNCT = }
CHATSTR "^(.*)([!.?])$" GREPSTR IF
CHATSTR LOWERCASE CHATSTR =
"Cheers, " CHATSTR +
[ ", another round for the house" ",drink up bro" ", let's party cutie" ", wanna dance sweety?" ",Ooo check HIM out sis!" ", let's party til dawn luv" ", Happy New Year!!"] 7 RANDOM GET +
PUNCT +
CHATSTR =
} 8 RANDOM 0 == IFELSE
} CHATSTR " " SUBSTR CHATSTR "^[:!^@]" GREPSTR NOT AND IF
} party IF
}
ENDSCRIPT
ENDSPOT
DOOR
ID 1
DONTMOVEHERE
DEST 313
OUTLINE 4,354 62,354 62,380 4,380
LOC 33,366
PICTS 8,0,0 ENDPICTS
ENDDOOR
DOOR
ID 2
DONTMOVEHERE
DEST 115
OUTLINE 448,354 508,354 508,379 448,379
LOC 480,368
PICTS 9,0,0 ENDPICTS
SCRIPT
ON INCHAT { nDoIt GLOBAL nDoIt EXEC }
ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF }
ENDSCRIPT
ENDDOOR
ENDROOM

Was this article helpful? yes / no

Article details

Article ID:	67
Category:	Room Scripts
Date added:	04-02-2011 15:58:12
Views:	506
Rating (Votes):	(0)

<< Go back