Contents:
Watch
Day/Night - Time
Screen Tone
Extra! Stop timer to enter places
WATCH:
Alright go into the Database (F8) and go into items -
Create an items called "Watch" or whatever you want to call it.
Classification is "Switch"
Explaination is whatever you want to call it (Ex. tells the time.)
Price: how much the watch is
Use number of times: Limitless
Then where it says ON Switch: I want you to make a switch and call it "Time"
- Select it and make it only Available at Field
WE WILL USE THIS LATER DONT FORGET ABOUT IT!!
Now switch over to common events
DAY/NIGHT - TIME
NOTE: THIS WILL RUN WHILE IN A BUILDING!!!
Read under this code for stopping of timer!
Put an event in a map where you start in with autostart
PSUEDOCODE:
<>Timer operations: Cost Creat0m.01s.
<>Timer operations: StartTmr
[NOW USE A SWITCH THAT WILL TURN THIS EVENT OFF
(USE ON SECOND PAGE TOO!!]
Here 1 REALIFE second is 5 mins on the game....
Here we will have 60 mins - hour. 24 hours - day. 30 days
- month. 12 months - year.
Use this as number 1! call it midnight to day.
Paralell Proces - Check the box and make a switch
called "Midnight to Mid-day"
Now follow the code!
Here is the psuedocode.
[brackets] are my text
* are intendations
NOTE: ALWAYS WHEN CREATING A FORK KEEP THE BOX CHECKED AT THE BOTTOM!!!!!!!
<>Fork optn: Timer - 0m.00s.less [Select "Below"]
*<>Timer Operations:Cost Creat0m.01s.
*<>Timer operations:StartTmr
[CREATE A VARIABLE called "Minutes"]
*<>Variable Op:(####: Minutes) + ,5
*<>For Optn:Varbl(####: Minutes)-60 [Select "SAME"]
**<>Variable Op:(####: Minutes) - ,60
[CREATE A VARIABLE called "Total Hours" NOT HOURS!!]
**<>Variable Op:(####: Total Hours) + ,1
[CREATE A VARIABLE called "Hours" NOW YOU CAN!!
]
**<>Variable Op:(####: Hours) + ,1
**<>For Optn:Varbl(####: Hours)-13 [Select "SAME"]
[CREATE A SWITCH called "AM"]
***<>Change Switch: (####: AM)-ON/OFF Triger
***<>Variable Op:(####: Hours) - ,13
***<>Variable Op:(####: Hours) + ,1
[Yes that's right -13, +1 so the clocks will read it
as a 12 hour clock instead of 24]
***<>Fork Optn: Varbl(####:Total Hours)-25 [Select "SAME"]
[CREATE A VARIABLE called "Total Days"]
[This is for keeping track how many days you've played]
****<>Variable Op:(####: Total Days) + ,1
[CREATE A VARIABLE called "Days"]
****<>Variable Op:(####: Days) + ,1
****<>Fork Optn:Varbl(####: Days)-30
*****<>Variable Op:(####: Days)- ,30
[CREATE A VARIABLE called "Months" No need for total months unless
you want to - if so just follow the basic psuedocode and use your
brain to figure out whre to insert it.]
*****<>Variable Op:(####: Months)+ ,1
*****<>Fork Optn:Varbl(####: Months)-12 [Select "SAME"]
******<>Variable Op:(####: Months) - ,12
[CREATE YET ANOTHER VARIABLE called "Years" no need for Total years
yadi yadi yada.....]
******<>Variable Op:(####: Years) + ,1
[now if you scroll down you will see a <> and then a bunch of
excepting case and end cases - now what I want you to do is scroll
down way underneith all of them and click on the <> at the bottom]
[CREATE A SWITCH called "Mid-day to Midnight"]
insert it into it:
<>Change Switch: (####: Mid-day to Midnight)-On Set
[Now turn off the last one]
<>Change Switch: (####: Midnight to Mid-day)-Off Set
That's all for this half - now to make it rotate through the day.
[VERY VERY EASY!!]
Now on the left side in Common Events Hi-lite the one you just
made and press Control+C to copy it.
Now underneith the one you just made Go Control+V to paste it
now simply where it says "Appearance Conditions Switch"
With the box checked change it to the "Mid-day to midnight" switch.
and now at the bottom where you have:
<>Change Switch: (####: Mid-day to Midnight)-On Set
<>Change Switch: (####: Midnight to Mid-day)-Off Set
Change The mid-day to midnight to off and Midnight to mid-day on.
There you have it a pure 5 minute changing system!
Now we will do the watch event.
Now this is as simple as can be.
Name the Event "Watch" Select Parallel Process and set the switch to time.
all above the events commands.
In the Events Commands
follow the psuedocode as shows:
<>Fork Optn:Varbl(####: Minutes)-0 [Select "SAME"]
*<>Fork Optn:Switch (####:AM)- ON
**<>Messg:\v(####):00 AM.
**<>Change Switch: (####: Time)-OFF Set
**<>
[This whole command is to prevent it from showing "3:0 AM or whatever
the hour is"]
:Excepting Case
**<>Messg:\v(####):00 PM.
**<>Change switch: (####: Time)-OFF Set
**<>
:End Case
*<>
:Excepting Case
*<>Fork Optn:Varbl(####: Minutes)-5
**<>Fork Optn:Varbl(####: AM)- ON
***<>Messg:\v(####):05 AM
***<>Change Switch: (####: Time)-OFF Set
***<>
:Excepting Case
***<>Messg:\v(####):05 PM
***<>Change Switch: (####: Time)-OFF Set
***<>
:End Case
**<>
:Excepting Case
[Now we're done correcting the "12:0 AM and 12:5 AM"
[Note for the next part the first \v is hours and the second \v is minutes.
Variable numbers]
**<>Fork Optn:Switch (####: AM)- ON
***<>Messg:\v(####):\v(####) AM
***<>Change Switch: (####: Time)- OFF Set
***<>
:Excepting Case
***<>Messg:\v(####):\v(####) PM
***<>Change Switch: (####: Time)-OFF Set
***<>
:End Case
**<>
:End Case
*<>
:End Case
<>
[Now every time you use the watch it'll show the time exactly!!!
Congratulations to anyone who did it correctly!]
SET SCREEN TONE:
Now this part can be easy and it can be hard...
you will need to make 24 extra Common Events.
Label them from 1AM to 12PM then 1PM to 12AM
Here is the basic code for them all
[This is where the total hours comes in, all you have to do is
change the number beside the Fork Option Variable to the corresponding
to the hour in 24 hour terms!]
<>Fork Optn:Varbl(####:Total Hours)-1 [Select "SAME"] [Change the 1 to
2 if its on 2 AM!]
*<>Set screen tone:[HOW EVER YOU WANT IT TO BE],14.5sec [now it will
always be changing screen tones wherever you go realistic way!]
*<>
:End Case
<>
[You can copy and paste and just rename them and renumber them if you like.]
EXTRA! HOW TO STOP TIMER WHEN ENTERING A TOWN\BUILDING OR JUST WHATEVER!
Simply just place an event where you want the timer to start
Create a variable now Called "HoldTimer" for later referance.
Here will be the psuedocode that you will enter on your town on
world map or where ever you want to put it:)
<>Timer Operation:StopTimr
<>Variable Op:(####:HoldTimer) Set, Timer Time remain
[Click "SET" click "OTHER" find Timer Seconds left"]
And heres the psuedocode to start it up again
<>Timer Operation:Cost CreatV(####) [Use the HoldTimer]
<>Timer Operation:StartTmr
And there you have it!
by Dalmaz