Stuff

procedure OnPlayerSpeak(ID: byte; Text: string);
begin
	case LowerCase(GetPiece(Text,' ',0)) of
		// Take into account the average player intelligence.
		'/help': begin
			WriteConsole(ID,'TIP: Don''t write commands as chat messages.',COLOR_TIP);
			WriteConsole(ID,'     Instead of pressing T, type /help straight away.',COLOR_TIP);
			end;
		// A public !website trigger. Could add a few more if you wanted to.
		'!website': begin
			WriteConsole(0,'Website: http://chakra.u13.net/fistbox/',COLOR_TIP);
			end;
		end;
end;