ArenaGuard [Pk Arena]

[Unidentical]

Big thanks to spare2 from the HCO community bug thanks

Here:

Code:

10021:
begin
  case OptionID of
     0:
       begin
        AddNPCDialog('Hello! I am ArenaGuard. Would you like to enter the arena? ');
        AddNPCOption('Yes'1);
        AddNPCOption('Nothing, Just passing by', 255);
        NPCFinish;
       end;
     1:
       begin
        TeleportPlayer(1005, 50 50);
        NPCFinish;
       end;
   end;
end;

Note: This script will only work for Delphi