[openttd@sun ap+]$ ls autopilot/scripts/*
autopilot/scripts/callback:
on_game_join.example.tcl  on_game_serverpw.example.tcl  on_irc_kick.example.tcl
on_game_join.tcl          on_irc_connect.example.tcl

autopilot/scripts/game:
help.example.tcl  help.tcl

autopilot/scripts/global:

autopilot/scripts/irc:
trains.example.tcl
[openttd@sun ap+]$

[openttd@sun ap+]$ cat autopilot/scripts/game/help.tcl
say::private "Available Commands:"
say::private "!help     -- this help"
say::private "!version  -- version of the server bot"
say::private "!admin    -- request an admin to join the game"
say::private "---"[openttd@sun ap+]$
[openttd@sun ap+]$