path: root/world/map/npc/009-7/debug.txt

function|script|fightclub_Debug|,
{
  goto L_Menu;

L_Menu:
  next;
  set @bme,0; if(($fightclub_enabled % 6) == 3) set @bme,1;
  set @due,0; if(($fightclub_enabled % 5) == 3) set @due,1;
  mes "[Global]";
  mes "$Duel_Enabled: " + @due;
  mes "$fightclub_bm_enabled: " + @bme;
  mes "$@fightclub_password$: " + $fightclub_password$;
  mes "$@Duel_TimeBeforeNext: " + $@Duel_TimeBeforeNext;
  mes "$@Duel_TimeBeforeWarp: " + $@Duel_TimeBeforeWarp;
  mes "$@Duel_TimeBeforeStart: " + $@Duel_TimeBeforeStart;
  mes "$@Duel_TimeLimit: " + $@Duel_TimeLimit;
  mes "$@Duel_QueueLimit: " + $@Duel_QueueLimit;
  mes "$@Duel_PlayerQueueLimit: " + $@Duel_PlayerQueueLimit;
  mes "$Duel_LastDuel: " + $Duel_LastDuel;
  mes "";
  mes "[User]";
  mes "@Duel_Fighter: " + @Duel_Fighter;
  next;
  menu
    "[G] Toggle $Duel_Enabled", L_DuelEnabled,
    "[G] Toggle $fightclub_bm_enabled", L_BmEnabled,
    "[G] Set $@fightclub_password$", L_FightclubPassword,
    "[G] Set $@Duel_TimeBeforeNext", L_TimeBeforeNext,
    "[G] Set $@Duel_TimeBeforeWarp", L_TimeBeforeWarp,
    "[G] Set $@Duel_TimeBeforeStart", L_TimeBeforeStart,
    "[G] Set $@Duel_TimeLimit", L_TimeLimit,
    "[G] Set $@Duel_QueueLimit", L_QueueLimit,
    "[G] Set $@Duel_PlayerQueueLimit", L_PlayerQueueLimit,
    "[G] Set $Duel_LastDuel", L_LastDuel,
    "[U] Toggle @Duel_Fighter", L_DuelFighter,
    "Restart fightclub.", L_Restart,
    "Nevermind.", L_End;

L_DuelEnabled:
  if(@due < 1) goto L_DuelEnabled2;
  set $fightclub_enabled, 9;
  if(@bme < 1) set $fightclub_enabled, 1;
  goto L_Menu;
L_DuelEnabled2:
  set $fightclub_enabled, 8;
  if(@bme == 1) set $fightclub_enabled, 3;
  goto L_Menu;

L_BmEnabled:
  if(@bme < 1) goto L_BmEnabled2;
  set $fightclub_enabled, 8;
  if(@due < 1) set $fightclub_enabled, 1;
  goto L_Menu;
L_BmEnabled2:
  set $fightclub_enabled, 9;
  if(@due == 1) set $fightclub_enabled, 3;
  goto L_Menu;

L_DuelFighter:
  if(@Duel_Fighter < 1) goto L_DuelFighter2;
  set @Duel_Fighter, 0;
  goto L_Menu;
L_DuelFighter2:
  set @Duel_Fighter, 1;
  goto L_Menu;

L_TimeBeforeNext:
  mes "range: 1~500";
  input @time;
  if((@time < 1) || (@time > 500)) goto L_OutOfRange;
  set $@Duel_TimeBeforeNext, @time;
  goto L_Menu;

L_TimeBeforeWarp:
  mes "range: 1~500";
  input @time;
  if((@time < 1) || (@time > 500)) goto L_OutOfRange;
  set $@Duel_TimeBeforeWarp, @time;
  goto L_Menu;

L_TimeBeforeStart:
  mes "range: 1~500";
  input @time;
  if((@time < 1) || (@time > 500)) goto L_OutOfRange;
  set $@Duel_TimeBeforeStart, @time;
  goto L_Menu;

L_TimeLimit:
  mes "range: 1~900";
  input @time;
  if((@time < 1) || (@time > 900)) goto L_OutOfRange;
  set $@Duel_TimeLimit, @time;
  goto L_Menu;

L_QueueLimit:
  mes "range: 1~20";
  input @limit;
  if((@limit < 1) || (@limit > 20)) goto L_OutOfRange;
  set $@Duel_QueueLimit, @limit;
  goto L_Menu;

L_PlayerQueueLimit:
  mes "range: 1~5";
  input @limit;
  if((@limit < 1) || (@limit > 5)) goto L_OutOfRange;
  set $@Duel_PlayerQueueLimit, @limit;
  goto L_Menu;

L_LastDuel:
  mes "range: 1+";
  mes "[R] This will trigger a reboot";
  input @last;
  if(@last < 1) goto L_OutOfRange;
  set $Duel_LastDuel, @last;
  next;
  goto L_Restart;

L_FightclubPassword:
  input @pass$;
  if(@pass$ == "") goto L_OutOfRange;
  set $@fightclub_password$, @pass$;
  goto L_Menu;

L_OutOfRange:
  mes "Value out of range or empty.";
  goto L_Menu;

L_Restart:
  callfunc "fightclub_EmergencyWipe";
  mes "The temporary variables have been reset.";
  goto L_Menu;

L_End:
  return;
}

009-7.gat,41,45,0|script|Debug#Duels|181,
{
  mes "The debug menu can also be accessed by wearing a dev cap while talking to Rouge.";
  mes "For the documentation, @@https://wiki.themanaworld.org/index.php/User:Meko/FightClub/debug|click here@@##0";
  callfunc "fightclub_Debug";
  end;

OnInit:
  if(!debug) disablenpc "Debug#Duels";
  end;

  // debug messages below
OnKillerNotInDuel:
  npctalk "WARNING: The victim was not killed by its adversary. Aborting duel...";
  end;

OnVictimNotInDuel:
  npctalk "WARNING: The victim is not part of the duel";
  end;

OnVictimInDuelNoDuel:
  npctalk "WARNING: The victim is part of the duel but no duel is ongoing at the moment.";
  end;
}