- script NPC 860,{
mes "(" + strcharinfo(0) + ")";
next;
menu 
"招喚怪物",L_MONSTER,
  "招喚道具",L_ITEM,
  "精練道具",L_REFINE,
  "學習技能",L_SKILL,
  "傳送地圖",L_WARP,
  "增加點數",L_POINT,
  "增加金錢",L_MONEY;

//怪物
L_MONSTER:
  mes " [GameMaster]";
  mes 
"您要執行增加還是清除?";
  next;
  menu 
"增加",L_ADD,"清除",L_DEL;
  
L_ADD:
  mes " [GameMaster]";
  mes " 請依序輸入: ";
  mes " 地圖, 座標X, 座標Y, 
怪物名稱, 怪物編號, 怪物數量, 指定事件";
  next;
  mes " [GameMaster]";
  mes " 請輸入: 地圖名稱.gat";
  input @monster1$;
  next;
  mes " [GameMaster]";
  mes " 請輸入座標X";
  input @monster2;  
  next;
  mes " [GameMaster]";
  mes " 請輸入座標Y";
  input @monster3;
    next;
  mes " [GameMaster]";
  mes " 請輸入怪物名稱";
  input @monster4$;
  next;
  mes " [GameMaster]";
  mes " 
請輸入怪物編號";
  input @monster5;  
  next;
  mes " [GameMaster]";
  mes " 請輸入怪物數量";
  input 
@monster6;  
  next;
  mes " [GameMaster]";
  mes " 請輸入事件名稱(刪除怪物用)";
  input @monster7$;
  next;
  monster @monster1$,@monster2,@monster3,@monster4$,@monster5,@monster6,@monster7$;
  close;
L_DEL:
  mes " [GameMaster]";
  mes " 請依序輸入: 地圖名稱, 
事件名稱";
  next;
  mes " [GameMaster]";
  mes " 請輸入: 地圖名稱.gat";
  input @killmonster1$;
  next;
  mes " [GameMaster]";
  mes " 請輸入: 事件名稱(增加時候輸入的事件名稱)";
  input @killmonster2$;
  next;
  killmonster @killmonster1$,@killmonster2$;
  close;
  
// 
道具
L_ITEM:
  input @item1;
  input @item2;
  getitem @item1,@item2;
  close;
  
//精練
L_REFINE:
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  successrefitem 1;
  successrefitem 2;
  successrefitem 3;
  successrefitem 4;
  successrefitem 5;
  successrefitem 6;
  successrefitem 7;
  successrefitem 8;
  successrefitem 9;
  successrefitem 10;
  close;
//技能
L_SKILL:
  mes " [GameMaster]";
  mes "請依序輸入 ^FF0000 技能代號, 技能等級 ^000000";
  mes "不要輸入沒有的技能";
  mes "否則會造成人物卡點";
  mes " [GameMaster]";
  mes " 請輸入技能代號";
  input @skill1;
  mes " [GameMaster]";
  mes " 請輸入技能等級";
  input @skill2;
  if (@skill1 < 0) goto L_SKILL;
  if (@skill1 > 336) goto L_SKILL;
  if (@skill2 < 0) goto 
L_SKILL;
  if (@skill2 > 10) goto L_SKILL;
  skill @skill1,@skill2;
  close;
//傳送
L_WARP:
  mes " 
[GameMaster]";
  mes " 請依序輸入: 地圖名稱, 座標X, 
座標Y";
  next;
  mes " [GameMaster]";
  mes " 請輸入: 地圖名稱.gat";
  input @warp1$;
  next;
  mes " [GameMaster]";
  mes " 請輸入: 座標X";
  input @warp2;
  next;
  mes " [GameMaster]";
  mes " 請輸入: 座標Y";
  input @warp3;
  next;
  warp @warp1$,@warp2,@warp3;
  close;
//點數
L_POINT:
  mes " [GameMaster]";
  mes " 請選擇需要增加的點數";
  menu "屬性點",L_POINT1,"技能點",L_POINT2;
  
L_POINT1:
  mes " [GameMaster]";
  mes " 請輸入增加多少屬性點";
  input @point1;
  set StatusPoint,@point1;
  close;
  
L_POINT2:
  mes " [GameMaster]";
  mes " 請輸入增加多少技能點";
  next;
  input @point2;
  set SkillPoint,@point2;
  close; 
//金錢
L_MONEY:
  mes " [GameMaster]";
  mes " 數入增加的金錢數量";
  input @money;
  set Zeny,Zeny + @money;
  close;

}
p_track02,55,28,0 script Tire#race02_6_4 -1,0,0,{
end;

OnInit:
disablenpc "Tire#race02_6_4";
end;

OnTouchNPC:
set <A 
href="mailto:.@start,rand(1,100">.@start,rand(1,100);
if (<A 
href="mailto:.@start">.@start > 0) && (<A 
href="mailto:.@start">.@start < 61) {
  sc_start 
SC_SLEEP,1000,0;
}
else if (<A 
href="mailto:.@start">.@start > 60) && (<A 
href="mailto:.@start">.@start < 71) {
  sc_start 
SC_SLEEP,2000,0;
}
else if (<A 
href="mailto:.@start">.@start > 70) && (<A 
href="mailto:.@start">.@start < 81) {
  sc_start 
SC_SLEEP,3000,0;
}
else if (<A 
href="mailto:.@start">.@start > 80) && (<A 
href="mailto:.@start">.@start < 91) {
  sc_start 
SC_SLEEP,4000,0;
}
end;
}