62 lines
2.5 KiB
Plaintext
62 lines
2.5 KiB
Plaintext
////////////////////////////////////////////////////////////////////////////////
|
|
// Olander's Realistic Weather System
|
|
// orw_pc_message
|
|
// By Don Anderson
|
|
// dandersonru@msn.com
|
|
//
|
|
// This will give the Temperature, Humidity, and Front information to each
|
|
// Player in the Area.
|
|
//
|
|
// This is called from the Area Weather script and does not require to be placed
|
|
// in any events.
|
|
//
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
#include "orw_inc_weather"
|
|
|
|
void main()
|
|
{
|
|
object oPC = OBJECT_SELF;
|
|
object oMod = GetModule();
|
|
object oArea = GetArea(oPC);
|
|
|
|
int nDebug = GetLocalInt(oMod,"WEATHERDEBUG");
|
|
int nCT = GetLocalInt(oArea,WEATHERCURTEMP);//Current Temp
|
|
int nHM = GetLocalInt(oArea,WEATHERCURHUMID);//Current Humidity
|
|
int nWarm = GetLocalInt(oArea,WEATHERWFRONT);
|
|
int nCold = GetLocalInt(oArea,WEATHERCFRONT);
|
|
|
|
//Warm and Cold Front Messages
|
|
if(nWarm == 1) SendMessageToPC(oPC,"A Warm front is now passing through the area.");
|
|
if(nCold == 1) SendMessageToPC(oPC,"A Cold front is now passing through the area.");
|
|
|
|
SendMessageToPC(oPC,IntToString(nCT) + " Deg Celsius");
|
|
SendMessageToPC(oPC,IntToString(nHM) + "% Humidity");
|
|
|
|
//Lots of info here....don't turn on unless testing or the chat window will be spammed =)
|
|
if(nDebug == 1)
|
|
{
|
|
int nTZ = GetLocalInt(oArea,WEATHERTZONE);
|
|
int nMT = GetLocalInt(oArea,WEATHERMAXTEMP);
|
|
int nPZ = GetLocalInt(oArea,WEATHERPZONE);
|
|
int nWC = GetLocalInt(oArea,WEATHERWATER);
|
|
int nSI = GetLocalInt(oArea,WEATHERLEVEL);
|
|
int nFS = GetFogAmount(FOG_TYPE_SUN,oArea);
|
|
int nFM = GetFogAmount(FOG_TYPE_MOON,oArea);
|
|
int nFCount = GetLocalInt(oArea,WEATHERCOUNTER);
|
|
int nSDurat = GetLocalInt(oArea,WEATHERDURATION);
|
|
|
|
SendMessageToPC(oPC,IntToString(nTZ) + " : Temp Zone");
|
|
SendMessageToPC(oPC,IntToString(nMT) + " : Max Temp");
|
|
SendMessageToPC(oPC,IntToString(nPZ) + " : Precip Zone");
|
|
SendMessageToPC(oPC,IntToString(nWC) + " : Water Content");
|
|
SendMessageToPC(oPC,IntToString(nWarm) + " : Warm Front");
|
|
SendMessageToPC(oPC,IntToString(nCold) + " : Cold Front");
|
|
SendMessageToPC(oPC,IntToString(nSI) + " : Weather Level");
|
|
SendMessageToPC(oPC,IntToString(nFS) + " : Sun Fog");
|
|
SendMessageToPC(oPC,IntToString(nFM) + " : Moon Fog");
|
|
SendMessageToPC(oPC,IntToString(nFCount) + " : Front Current Length");
|
|
SendMessageToPC(oPC,IntToString(nSDurat) + " : Front Total Duration");
|
|
}
|
|
}
|