0 Members and 1 Guest are viewing this topic.
Having the OnGameEnd event return a string for the new map. This will allow custom map lists that are dynamic based on whatever the script would like.function OnGameEnd(): string;
Last year, I dreamt I was pissing at a restroom, but I missed the urinal and my penis exploded.
procedure OnPlayerSpeak(ID: Byte; Text: string);var MedTaunt, BomTaunt:string;begin MedTaunt := ReadFile('taunts\MedicTaunt.txt'); BomTaunt := ReadFile('taunts\BomberTaunt.txt'); if (Text = '!medic') then begin SetTaunt(ID, MedTaunt); WriteConsole(ID, 'You are now a MEDIC. Press Alt+W to heal teammate.', $A00000); end else if (Text = '!bomb') then begin SetTaunt(ID, BomTaunt); WriteConsole(ID, 'You are now a BOMBER. Press Alt+W to place mine.', $A00000); end;end;
procedure AppOnIdle(Ticks: integer);begin if timeleft = 180 then begin ServerModifier('Temperature',SandStorm); WriteConsole(0,'Incoming sand storm !',$EE81FAA1);end; end;
Procedure ServerModifier('Weather', Value:Byte);
I am working on a Pokemon script for Soldat: no weather, 1: rain, 2: sandstorm, 3: snow[/i]