~ DarkHorse Pterid's 24-hr Clock ~

This script operates an adjustable 24-hour clock made from objects 369-378. The script allows you to "plug-in" map coordinates for the location of your clock, and uses a digital-style clock display. (Script updated March 2003) *** Settable 24-hour clock script *** * This script will make a graphical clock appear in you dream, starting at * midnight when the dream is loaded. You can set it "in real time" by * walking into the 2 switches that will have appeared next to the clock. * To choose where the clock will appear in your dream, have a look at the * "Variables" section. * Variables: * %change - a flag to stop 2 triggers being set off by one flick of the switch * %hourswitch - position of hour switch (66,94) * %minswitch - position of minute switch (72,88) * %hourtens - position of hours reading (tens) (68,93) * %hourunits - position of hours reading (units) (68,92) * %mintens - position of minutes reading (tens) (70,90) * %minunits - position of minutes reading (units) (72,89) * %divider - position of the ":" divider between hours and minutes (70,91) * * To set the positions of any (or all) parts of the clock, * simply change the corresponding numbers in the "Initialisation" * section, marked below. :) * Timers: * 49 (to reset levers automatically) * Technical note: The more "special-case" rollovers are done first, to make sure * they are recognised.(e.g. 24-hour rollovers first, 1-minute rollovers last) ***Initialisation ***Positions (CHANGE THE FOLLOWING LINES TO MOVE THE CLOCK :)) (0:0) When everything is starting up, (5:300) set variable %hourswitch.x to the value 66. (5:300) set variable %hourswitch.y to the value 94. (5:300) set variable %minswitch.x to the value 72. (5:300) set variable %minswitch.y to the value 88. (5:300) set variable %hourtens.x to the value 68. (5:300) set variable %hourtens.y to the value 93. (5:300) set variable %hourunits.x to the value 68. (5:300) set variable %hourunits.y to the value 92. (5:300) set variable %mintens.x to the value 70. (5:300) set variable %mintens.y to the value 90. (5:300) set variable %minunits.x to the value 72. (5:300) set variable %minunits.y to the value 89. (5:300) set variable %divider.x to the value 70. (5:300) set variable %divider.y to the value 91. ***Place objects (3:2) at position (%hourswitch) on the map, (5:4) place object type 162. (3:2) at position (%minswitch) on the map, (5:4) place object type 162. (3:2) at position (%hourtens) on the map, (5:4) place object type 378. (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%divider) on the map, (5:4) place object type 379. ***Make levers react when pushed (0:7) When somebody moves into position (%hourswitch), (3:2) at position (%hourswitch) on the map, (5:4) place object type 161. (5:50) set countdown timer 49 to go off in 1 seconds. (0:7) When somebody moves into position (%minswitch), (3:2) at position (%minswitch) on the map, (5:4) place object type 161. (5:50) set countdown timer 49 to go off in 1 seconds. (0:50) When countdown timer 49 goes off, (3:2) at position (%hourswitch) on the map, (5:4) place object type 162. (3:2) at position (%minswitch) on the map, (5:4) place object type 162. ***Set hours, with exclusive 10-hour and 24-hour rollovers ***Start process (0:7) When somebody moves into position (%hourswitch), (5:300) set variable %change to the value 1. ***24-hour rollover (0:7) When somebody moves into position (%hourswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%hourunits) is object type 371, (1:1013) and position (%hourtens) is object type 370, (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%hourtens) on the map, (5:4) place object type 378. (5:300) set variable %change to the value 0. ***10-hour rollover, 0 to 1 (09 to 10) (0:7) When somebody moves into position (%hourswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%hourunits) is object type 377, (1:1013) and position (%hourtens) is object type 378, (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%hourtens) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***10-hour rollover, 1 to 2 (19 to 20) (0:7) When somebody moves into position (%hourswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%hourunits) is object type 377, (1:1014) and position (%hourtens) is not object type 378, (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%hourtens) on the map, (5:26) add 1 to the object number. (5:300) set variable %change to the value 0. *** 0 to 1 (0:7) When somebody moves into position (%hourswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%hourunits) is object type 378, (3:2) at position (%hourunits) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***1 to 9 (0:7) When somebody moves into position (%hourswitch), (1:200) and variable %change is equal to 1, (1:1014) and position (%hourunits) is not object type 377, (1:1014) and position (%hourunits) is not object type 378, (3:2) at position (%hourunits) on the map, (5:26) add 1 to the object number. (5:300) set variable %change to the value 0. ***Set minutes, with exclusive 10-minute, 60-minute, 10-hour and 24-hour rollovers ***Start process (0:7) When somebody moves into position (%minswitch), (5:300) set variable %change to the value 1. ***1-hour rollover, 1 to 9 (0:7) When somebody moves into position (%minswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 373, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (5:300) set variable %change to the value 0. ***10-minute rollover, 0 to 1 (09 to 10) (0:7) When somebody moves into position (%minswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***10 minute rollover, others (0:7) When somebody moves into position (%minswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1014) and position (%mintens) is not object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:26) add 1 to the object number (5:300) set variable %change to the value 0. ***0 to 1 (0:7) When somebody moves into position (%minswitch), (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***1 to 9 (0:7) When somebody moves into position (%minswitch), (1:200) and variable %change is equal to 1, (1:10143) and position (%minunits) is not object type 378, (3:2) at position (%minunits) on the map, (5:26) add 1 to the object number (5:300) set variable %change to the value 0. ***Jump timer every minute (99:99), with exclusive 10-minute, 60-minute, 10-hour and 24-hour rollovers ***Start process (0:101) When the time is 99:99 FST, (5:300) set variable %change to the value 1. ***24-hour rollover (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 373, (1:1013) and position (%hourunits) is object type 371, (1:1013) and position (%hourtens) is object type 370, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%hourtens) on the map, (5:4) place object type 378. (5:300) set variable %change to the value 0. ***10-hour rollover, 0 to 1 (09 to 10) (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 373, (1:1013) and position (%hourunits) is object type 377, (1:1013) and position (%hourtens) is object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%hourtens) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***10-hour rollover, 1 to 2 (19 to 20) (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 373, (1:1013) and position (%hourunits) is object type 377, (1:1014) and position (%hourtens) is not object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (3:2) at position (%hourunits) on the map, (5:4) place object type 378. (3:2) at position (%hourtens) on the map, (5:26) add 1 to the object number. (5:300) set variable %change to the value 0. ***1-hour rollover, 0 to 1 (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 373, (1:1013) and position (%hourunits) is object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (3:2) at position (%hourunits) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***1-hour rollover, 1 to 9 (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 373, (1:1014) and position (%hourunits) is not object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 378. (3:2) at position (%hourunits) on the map, (5:26) add 1 to the object number. (5:300) set variable %change to the value 0. ***10-minute rollover, 0 to 1 (09 to 10) (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1013) and position (%mintens) is object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***10 minute rollover, others (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 377, (1:1014) and position (%mintens) is not object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 378. (3:2) at position (%mintens) on the map, (5:26) add 1 to the object number (5:300) set variable %change to the value 0. ***0 to 1 (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:1013) and position (%minunits) is object type 378, (3:2) at position (%minunits) on the map, (5:4) place object type 369. (5:300) set variable %change to the value 0. ***1 to 9 (0:101) When the time is 99:99 FST, (1:200) and variable %change is equal to 1, (1:10143) and position (%minunits) is not object type 378, (3:2) at position (%minunits) on the map, (5:26) add 1 to the object number (5:300) set variable %change to the value 0.