HowManyPlayers := 0;  //So you have 0 players?  This should be 1...
NumberOfPlayers(HowManyPlayers); 0;   //Why is there a "0;" here?
CurrentPlayer := i dont dd0s;   //For the first player (or integer) in any array, start with 0, not "i dont dd0s"...

with Players[1] do  //Again, your first player is the first in an array, and arrays start at [0], not [1]
begin
Name := 'omgihaxxxx';
Pass := 'notforyou';
Pin := ''; // right now banking for hood not supported, might be in future
// so you don't need to fill it just yet
BoxRewards := ['XP', 'Lamp', 'Book', 'mote', 'ostume', 'ssence'];
LampSkill := SKILL_RUNECRAFTING;
Member := false;
Active := True;

Procedure DeclarePlayers;
  begin
    HowManyPlayers := 1;
    NumberOfPlayers(HowManyPlayers);
    CurrentPlayer := 0;
    with Players[0] do
    begin
      Name         := '';
      Pass         := '';
      Pin          := '';
      BoxRewards   := ['XP', 'Lamp', 'Book', 'mote', 'ostume', 'ssence'];
      LampSkill    := SKILL_RUNECRAFTING;
      Member       := False;
      Active       := True;
    end;
  end;