| Welcome to Shadows In The Mist. We hope you enjoy your visit. You're currently viewing our forum as a guest. This means you are limited to certain areas of the board and there are some features you can't use. If you join our community, you'll be able to access member-only sections, and use many member-only features such as customizing your profile, sending personal messages, and voting in polls. Registration is simple, fast, and completely free. Join our community! If you're already a member please log in to your account to access all of our features: |
- Pages:
- 1
- 2
| Palace Scripts Collection; This area is dedicated to palace scripts that are used to create interesting rooms within the palace realm. | |
|---|---|
| Tweet Topic Started: Mar 31 2010, 08:06 PM (3,568 Views) | |
| ka'li_Deverin_SiM_bm | Mar 31 2010, 08:24 PM Post #11 |
|
Administrator
|
Music 2 ON SELECT { "200angels.wav" SOUND ") "Angels" SAY } |
![]() |
|
| ka'li_Deverin_SiM_bm | Mar 31 2010, 08:24 PM Post #12 |
|
Administrator
|
Night and Day Script ;Alan's Day/Night script ;Changes the spot picture based on time of day. ;- the first picture shows during the day, the second picture shows at night. ON ENTER { 0 ME SETALARM } ON ALARM { ;***Set your time data here*** 630 daystart = ;time day starts in 2400 format 1630 nightstart = ;time night starts in 2400 format -8 tz = ;time zone change from Zulu (GMT or Universal) in hours 0 dst = ;0 = standard, 1 = daylight savings ;***end of time data*** ; ;get current time DATETIME mytime =1319 { 2085978496 mytime += } { tz dst + 3600 * mytime += } DATETIME 0 < IFELSE mytime 86400 % myday =Wednesday myday DUP 3600 / hours = 3600 % mins_secs =1319 mins_secs 60 / minutes =19 hours 100 * minutes + timenow =13 ;turn picture on/off { 1 ME SETSPOTSTATELOCAL } timenow daystart < timenow nightstart >= OR ME GETSPOTSTATE NOT AND IF { 0 ME SETSPOTSTATELOCAL } timenow daystart >= timenow nightstart < AND ME GETSPOTSTATE AND IF 3600 ME SETALARM } |
![]() |
|
| ka'li_Deverin_SiM_bm | Mar 31 2010, 08:25 PM Post #13 |
|
Administrator
|
Password Script : part 1 ;Place the following script in each password protected room. ON ENTER { rejected GLOBAL ;***************************************************** ;set where to send people if they haven't said the password 162 accessroom = ;***************************************************** "pw" ROOMID ITOA & pw = pw STRTOATOM EXEC GLOBAL { "You have been given access to this room." LOCALMSG } { "'page I attempted entry into " ROOMNAME & "." & SAY 1 rejected = accessroom GOTOROOM } pw STRTOATOM EXEC ISWIZARD OR IFELSE } |
![]() |
|
| ka'li_Deverin_SiM_bm | Mar 31 2010, 08:26 PM Post #14 |
|
Administrator
|
Rain/Snow Script ;Alan's Rain/snow script ;Create a rain or snow picture that is taller than the room. ;Put the picture in the spot multiple (e.g., 10) times. ;Customize the information between the lines of asterisks. ;Then say "setpictures <door number>" to automatically set the picture locations. ;Note, you must be an owner/operator to do this. ;Other useful commands provided are: ;Say "reset <doornumber>" to set the spot to the first picture. ;Say "mp" to find the current mouse position. ON ENTER { nbrpics GLOBAL ;***Set the number of pictures*** 15 nbrpics = ;***end of data*** 0 ME SETSPOTSTATELOCAL 0 ME SETALARM } ON OUTCHAT { nbrpics GLOBAL { { ;************************************************* ;Set the picture parameters. ;Start and stop positions are relative to the door. ;You must be an Owner/Operator for the script to work. 0 start_x = -50 start_y = 0 stop_x = 0 stop_y = ;************************************************* nbrpics 1 - steps = stop_x start_x - range_x = stop_y start_y - range_y = ; ;Move the pictures. Multiply before divide to reduce error! ; 0 i = { i ME SETSPOTSTATE start_x range_x i * steps / + start_y range_y i * steps / + ME SETPICLOC i ++ } { i nbrpics 1 - <= } WHILE 0 ME SETSPOTSTATE 0 inout = "" CHATSTR = } "$1" GREPSUB ATOI ME == IF } CHATSTR "^setpictures ([0-9]+)" GREPSTR IF ; { { 0 ME SETSPOTSTATE 0 inout = "" CHATSTR = } "$1" GREPSUB ATOI ME == IF } CHATSTR "^reset ([0-9]+)" GREPSTR IF ; { MOUSEPOS y = x = "@" x ITOA & " " & y ITOA & " x = " & x ITOA & ", y = " & y ITOA & LOCALMSG "" CHATSTR = } CHATSTR "mp" == IF } ON ALARM { nbrpics GLOBAL ME GETSPOTSTATE 1 + nbrpics % ME SETSPOTSTATELOCAL ;cycle up 30 ME SETALARM } ;********End Script*********** |
![]() |
|
| ka'li_Deverin_SiM_bm | Mar 31 2010, 08:27 PM Post #15 |
|
Administrator
|
Trap ON SELECT { 269 107 SETPOS NAKED [ 1025979818 1025979409 1025979702 1025979927 1025979846 1025979546 1242293532 ] SETPROPS |
![]() |
|
| ka'li_Deverin_SiM_bm | Mar 31 2010, 08:28 PM Post #16 |
|
Administrator
|
Slide Room Script (6+ pics) ON ENTER { linkspot GLOBAL ME linkspot = ME GETSPOTSTATE 1 } ON ALARM { cmd GLOBAL ;***Set number of pictures here*** 10 nbrpics = ;***End of data*** { ME GETSPOTSTATE 1 + nbrpics % ME SETSPOTSTATE } cmd "next" == IF { ME GETSPOTSTATE 1 - nbrpics + nbrpictures % ME SETSPOTSTATE } cmd "previous" == IF } ;{ ON SELECT { 10 pics = ME GETSPOTSTATE 1 + DUP pics / pics * - ME SETSPOTSTATELOCAL } } that is where the pictures goes ON SELECT { linkspot GLOBAL cmd GLOBAL "next" cmd = 4 linkspot SETALARM } this is to turn the pictures Special thanks to takara for this one |
![]() |
|
| ka'li_Deverin_SiM_bm | Jun 28 2011, 06:37 PM Post #17 |
|
Administrator
|
For Elite ON OUTCHAT { { PAINTCLEAR CLEARLOOSEPROPS "" CHATSTR = } CHATSTR "props" == IF } |
![]() |
|
| 1 user reading this topic (1 Guest and 0 Anonymous) | |
| « Previous Topic · Palace Information Section · Next Topic » |
- Pages:
- 1
- 2
| Track Topic · E-mail Topic |
4:30 AM Jul 11
|






4:30 AM Jul 11