Jump to content
  • 0

script paidwarper error


travisz

Question


  • Group:  Members
  • Topic Count:  4
  • Topics Per Day:  0.00
  • Content Count:  9
  • Reputation:   0
  • Joined:  04/12/12
  • Last Seen:  

Hello everyone.

 

I used rathena 17026

//----------------Default rAthena Warper---------------------
//--------------Edited by Rayan for hexor9------------------------
prontera,156,163,4    script    Paid Warper    423,{
function Go; function Disp; function Pick;
// --------------------------------------------------
//    Main Menu:
// --------------------------------------------------
mes "[Paid Warper]";
mes "Hello";
mes "Please note that to avail my services you must have ticket";
menu "I have it!",S_GO,"Let me buy",S_PAID,"No thanks I am ok!!",S_QUIT;
close;

S_GO:
if (countitem(7199) > 1{
delitem 7199,1;
menu    "Last Warp ^777777["+lastwarp$+"]^000000",-,
    " ~ Towns",Towns, " ~ Fields",Fields, " ~ Dungeons",Dungeons,
    " ~ Guild Castles",Castles, " ~ Special Areas",Special;

    if (lastwarp$ == "") dispbottom "You have not warped anywhere yet.";
        else warp lastwarp$,lastwarpx,lastwarpy;
    close;
//---------------------FUNCTIONS-----------------------------------------------------------------------

function Go {
    warp getarg(0),getarg(1,0),getarg(2,0);
    getmapxy(lastwarp$,lastwarpx,lastwarpy,0);
    close;
}
function Disp {
    set @menu$,"";
    if(getarg(0)=="") {
        set @menu$,getarg(1);
        return;
    }
    for(set .@i,getarg(1); .@i<=getarg(2); set .@i,.@i+1)
        set @menu$, @menu$+getarg(0)+" "+.@i+":";
    return;
}
function Pick {
    if(getarg(0)=="") {
        set .@i, select(@menu$);
        warp getarg(.@i),@c[.@i*2],@c[.@i*2+1];
    } else {
        set .@i, select(@menu$)-getarg(1,0);
        warp getarg(0)+((.@i<10)?"0":"")+.@i,@c[.@i*2],@c[.@i*2+1];
    }
    getmapxy(lastwarp$,lastwarpx,lastwarpy,0);
    close;
}

// --------------------------------------------------
    Towns:
// --------------------------------------------------
menu    "Prontera",T1, "Alberta",T2, "Aldebaran",T3, "Amatsu",T4, "Ayothaya",T5,
    "Brasilis",T6, "Comodo",T7, "Dewata",T33, "Eclage",T34, "Einbech",T8,
    "Einbroch",T9, "El Dicastes",T10, "Geffen",T11, "Gonryun",T12, "Hugel",T13,
    "Izlude",T14, "Jawaii",T15, "Lighthalzen",T16, "Louyang",T17, "Lutie",T18,
    "Malangdo",T35, "Malaya",T36, "Manuk",T19, "Midgarts Expedition Camp",T20,
    "Mora",T21, "Morroc",T22, "Moscovia",T23, "Nameless Island",T24,
    "Niflheim",T25, "Payon",T26, "Rachel",T27, "Splendide",T28, "Thor Camp",T29,
    "Umbala",T30, "Veins",T31, "Yuno",T32;

T1: Go("prontera",155,183);
T2: Go("alberta",28,234);
T3: Go("aldebaran",140,131);
T4: Go("amatsu",198,84);
T5: Go("ayothaya",208,166);
T6: Go("brasilis",195,220);
T7: Go("comodo",209,143);
T8: Go("einbech",138,243);
T9: Go("einbroch",64,200);
T10: Go("dicastes01",197,187);
T11: Go("geffen",120,68);
T12: Go("gonryun",160,121);
T13: Go("hugel",96,145);
T14: Go("izlude",128,114);
T15: Go("jawaii",213,230);
T16: Go("lighthalzen",158,92);
T17: Go("louyang",217,100);
T18: Go("xmas",147,134);
T19: Go("manuk",260,175);
T20: Go("mid_camp",210,288);
T21: Go("mora",111,97);
T22: Go("morocc",156,93);
T23: Go("moscovia",219,193);
T24: Go("nameless_n",256,215);
T25: Go("niflheim",202,174);
T26: Go("payon",179,100);
T27: Go("rachel",130,111);
T28: Go("splendide",200,153);
T29: Go("thor_camp",246,68);
T30: Go("umbala",127,128);
T31: Go("veins",216,123);
T32: Go("yuno",157,51);
T33: Go("dewata",199,179);
T34: Go("eclage",111,39);
T35: Go("malangdo",224,184);
T36: Go("malaya",212,206);

// --------------------------------------------------
    Fields:
// --------------------------------------------------
menu    "Amatsu Fields",F1, "Ayothaya Fields",F2, "Bifrost Fields", F3,
    "Brasilis Fields",F4, "Comodo Fields",F5, "Dewata Fields",F26,
    "Eclage Fields",F27, "Einbroch Fields",F6, "El Dicastes Fields",F7,
    "Geffen Fields",F8, "Gonryun Fields",F9, "Hugel Fields",F10,
    "Lighthalzen Fields",F11, "Louyang Field",F12, "Lutie Field",F13,
    "Malaya Fields",F28, "Manuk Fields",F14, "Mjolnir Fields",F15,
    "Moscovia Fields",F16, "Niflheim Fields",F17, "Payon Forests",F18,
    "Prontera Fields",F19, "Rachel Fields",F20, "Sograt Deserts",F21,
    "Splendide Fields",F22, "Umbala Fields",F23, "Veins Fields",F24,
    "Yuno Fields",F25;

F1: setarray @c[2],190,197;
    Disp("Amatsu Field",1,1); Pick("ama_fild");
F2: setarray @c[2],173,134,212,150;
    Disp("Ayothaya Field",1,2); Pick("ayo_fild");
F3: setarray @c[2],193,220,220,187;
    Disp("Bifrost Field",1,2); Pick("bif_fild");
F4: setarray @c[2],74,32;
    Disp("Brasilis Field",1,1); Pick("bra_fild");
F5: setarray @c[2],180,178,231,160,191,172,228,194,224,203,190,223,234,177,194,175,172,172;
    Disp("Comodo Field",1,9); Pick("cmd_fild");
F6: setarray @c[2],142,225,182,141,187,228,185,173,216,173,195,148,272,220,173,214,207,174,196,200;
    Disp("Einbroch Field",1,10); Pick("ein_fild");
F7: setarray @c[2],143,132,143,217;
    Disp("El Dicastes Field",1,2); Pick("dic_fild");
F8: setarray @c[0],46,199,213,204,195,212,257,192,188,171,166,263,248,158,195,191,186,183,221,117,178,218,136,328,240,181,235,235,211,185;
    Disp("Geffen Field",0,14); Pick("gef_fild",1);
F9: setarray @c[2],220,227;
    Disp("Gonryun Field",1,1); Pick("gon_fild");
F10: setarray @c[2],268,101,222,193,232,185,252,189,196,106,216,220,227,197;
    Disp("Hugel Field",1,7); Pick("hu_fild");
F11: setarray @c[2],240,179,185,235,240,226;
    Disp("Lighthalzen Field",1,3); Pick("lhz_fild");
F12: setarray @c[2],229,187;
    Disp("Louyang Field",1,1); Pick("lou_fild");
F13: setarray @c[2],115,145;
    Disp("Lutie Field",1,1); Pick("xmas_fild");
F14: setarray @c[2],35,236,35,262,84,365;
    Disp("Manuk Field",1,3); Pick("man_fild");
F15: setarray @c[2],204,120,175,193,208,213,179,180,181,240,195,270,235,202,188,215,205,144,245,223,180,206,196,208;
    Disp("Mjolnir Field",1,12); Pick("mjolnir_");
F16: setarray @c[2],82,104,131,147;
    Disp("Moscovia Field",1,2); Pick("mosk_fild");
F17: setarray @c[2],215,229,167,234;
    Disp("Niflheim Field",1,2); Pick("nif_fild");
F18: setarray @c[2],158,206,151,219,205,148,186,247,134,204,193,235,200,177,137,189,201,224,160,205,194,150;
    Disp("Payon Forest",1,11); Pick("pay_fild");
F19: setarray @c[0],208,227,190,206,240,206,190,143,307,252,239,213,185,188,193,194,187,218,210,183,195,149,198,164;
    Disp("Prontera Field",0,11); Pick("prt_fild",1);
F20: setarray @c[2],192,162,235,166,202,206,202,208,225,202,202,214,263,196,217,201,87,121,277,181,221,185,175,200,174,197;
    Disp("Rachel Field",1,13); Pick("ra_fild");
F21: setarray @c[2],219,205,177,206,194,182,224,170,198,216,156,187,185,263,206,228,208,238,209,223,85,97,207,202,31,195,38,195;
    Disp("","Sograt Desert 1:Sograt Desert 2:Sograt Desert 3:Sograt Desert 7:Sograt Desert 11:Sograt Desert 12:Sograt Desert 13:Sograt Desert 16:Sograt Desert 17:Sograt Desert 18:Sograt Desert 19:Sograt Desert 20:Sograt Desert 21:Sograt Desert 22");
    Pick("","moc_fild01","moc_fild02","moc_fild03","moc_fild07","moc_fild11","moc_fild12","moc_fild13","moc_fild16","moc_fild17","moc_fild18","moc_fild19","moc_fild20","moc_fild21","moc_fild22");
F22: setarray @c[2],175,186,236,184,188,204;
    Disp("Splendide Field",1,3); Pick("spl_fild");
F23: setarray @c[2],217,206,223,221,237,215,202,197;
    Disp("Umbala Field",1,4); Pick("um_fild");
F24: setarray @c[2],186,175,196,370,222,45,51,250,202,324,150,223,149,307;
    Disp("Veins Field",1,7); Pick("ve_fild");
F25: setarray @c[2],189,224,192,207,221,157,226,199,223,177,187,232,231,174,196,203,183,214,200,124,195,226,210,304;
    Disp("Yuno Field",1,12); Pick("yuno_fild");
F26: setarray @c[2],371,212;
    Disp("Dewata Field",1,1); Pick("dew_fild");
F27: setarray @c[2],97,314;
    Disp("Eclage Field",1,1); Pick("ecl_fild");
F28: setarray @c[2],40,272,207,180;
    Disp("Malaya Field",1,2); Pick("ma_fild");

// --------------------------------------------------
    Dungeons:
// --------------------------------------------------
menu    "Abyss Lakes",D1, "Amatsu Dungeon",D2, "Anthell",D3,
    "Ayothaya Dungeon",D4, "Beach Dungeon",D5, "Bio Labs",D6,
    "Brasilis Dungeon",D7, "Byalan Dungeon",D8, "Clock Tower",D9,
    "Coal Mines",D10, "Culvert",D11, "Cursed Abbey",D12, "Dewata Dungeon",D41,
    "Einbroch Dungeon",D13, "Endless Tower",D14, "Gefenia",D15,
    "Geffen Dungeon",D16, "Glast Heim",D17, "Gonryun Dungeon",D18,
    "Guild Dungeons",GD, "Hidden Dungeon",D19, "Ice Dungeon",D20,
    "Juperos",D21, "Kiel Dungeon",D22, "Louyang Dungeon",D23,
    "Magma Dungeon",D24, "Malangdo Dungeon",D42, "Moscovia Dungeon",D25,
    "Nidhogg's Dungeon",D26, "Odin Temple",D27, "Orc Dungeon",D28, "Payon Dungeon",D29,
    "Pyramids",D30, "Rachel Sanctuary",D31, "Scaraba Hole",D32, "Sealed Shrine",D33,
    "Sphinx",D34, "Sunken Ship",D35, "Thanatos Tower",D36, "Thor Volcano",D37,
    "Toy Factory",D38, "Turtle Dungeon",D39, "Umbala Dungeon",D40;

D1: setarray @c[2],261,272,275,270,116,27;
    Disp("Abyss Lakes",1,3); Pick("abyss_");
D2: setarray @c[2],228,11,34,41,119,14;
    Disp("Amatsu Dungeon",1,3); Pick("ama_dun");
D3: setarray @c[2],35,262,168,170;
    Disp("Anthell",1,2); Pick("anthell");
D4: setarray @c[2],275,19,24,26;
    Disp("","Ancient Shrine Maze:Inside Ancient Shrine"); Pick("ayo_dun");
D5: setarray @c[2],266,67,255,244,23,260;
    Disp("Beach Dungeon",1,3); Pick("","beach_dun","beach_dun2","beach_dun3");
D6: setarray @c[2],150,288,150,18,140,134;
    Disp("Bio Lab",1,3); Pick("lhz_dun");
D7: setarray @c[2],87,47,262,262;
    Disp("Brasilis Dungeon",1,2); Pick("bra_dun");
D8: setarray @c[0],168,168,253,252,236,204,32,63,26,27;
    Disp("Byalan Dungeon",1,5); Pick("iz_dun",1);
D9: setarray @c[2],199,159,148,283,65,147,56,155,297,25,127,169,277,178,268,74;
    Disp("","Clock Tower 1:Clock Tower 2:Clock Tower 3:Clock Tower 4:Basement 1:Basement 2:Basement 3:Basement 4");
    Pick("","c_tower1","c_tower2","c_tower3","c_tower4","alde_dun01","alde_dun02","alde_dun03","alde_dun04");
D10: setarray @c[2],52,17,381,343,302,262;
    Disp("Coal Mines",1,3); Pick("mjo_dun");
D11: setarray @c[2],131,247,19,19,180,169,100,92;
    Disp("Culvert",1,4); Pick("","prt_sewb1","prt_sewb2","prt_sewb3","prt_sewb4");
D12: setarray @c[2],51,14,150,11,120,10;
    Disp("Cursed Abbey",1,3); Pick("abbey");
D13: setarray @c[2],22,14,292,290;
    Disp("Einbroch Dungeon",1,2); Pick("ein_dun");
D14: setarray @c[2],72,112;
    Disp("","Misty Island"); Pick("","e_tower");
D15: setarray @c[2],40,103,203,34,266,168,130,272;
    Disp("Gefenia",1,4); Pick("gefenia",0);
D16: setarray @c[0],104,99,115,236,106,132,203,200;
    Disp("Geffen Dungeon",1,4); Pick("gef_dun",1);
D17: setarray @c[2],375,304,199,29,104,25,150,15,157,287,147,15,258,255,108,291,171,283,68,277,156,7,12,7,133,271,224,274,14,70,150,14;
    Disp("","Entrance:Castle 1:Castle 2:Chivalry 1:Chivalry 2:Churchyard:Culvert 1:Culvert 2:Culvert 3:Culvert 4:St. Abbey:Staircase Dungeon:Underground Cave 1:Underground Cave 2:Underground Prison 1:Underground Prison 2");
    Pick("","glast_01","gl_cas01","gl_cas02","gl_knt01","gl_knt02","gl_chyard","gl_sew01","gl_sew02","gl_sew03","gl_sew04","gl_church","gl_step","gl_dun01","gl_dun02","gl_prison","gl_prison1");
D18: setarray @c[2],153,53,28,113,68,16;
    Disp("Gonryun Dungeon",1,3); Pick("gon_dun");
D19: setarray @c[2],176,7,93,20,23,8;
    Disp("Hidden Dungeon",1,3); Pick("prt_maze");
D20: setarray @c[2],157,14,151,155,149,22,33,158;
    Disp("Ice Dungeon",1,4); Pick("ice_dun");
D21: setarray @c[2],140,51,53,247,37,63,150,285;
    Disp("","Entrance:Juperos 1:Juperos 2:Core");
    Pick("","jupe_cave","juperos_01","juperos_02","jupe_core");
D22: setarray @c[2],28,226,41,198;
    Disp("Kiel Dungeon",1,2); Pick("kh_dun");
D23: setarray @c[2],218,196,282,20,165,38;
    Disp("","The Royal Tomb:Inside the Royal Tomb:Suei Long Gon"); Pick("lou_dun");
D24: setarray @c[2],126,68,47,30;
    Disp("Magma Dungeon",1,2); Pick("mag_dun");
D25: setarray @c[2],189,48,165,30,32,135;
    Disp("Moscovia Dungeon",1,3); Pick("mosk_dun");
D26: setarray @c[2],61,239,60,271;
    Disp("Nidhogg's Dungeon",1,2); Pick("nyd_dun");
D27: setarray @c[2],298,167,224,149,266,280;
    Disp("Odin Temple",1,3); Pick("odin_tem");
D28: setarray @c[2],32,170,21,185;
    Disp("Orc Dungeon",1,2); Pick("orcsdun");
D29: setarray @c[0],21,183,19,33,19,63,155,159,201,204;
    Disp("Payon Dungeon",1,5); Pick("pay_dun",1);
D30: setarray @c[2],192,9,10,192,100,92,181,11,94,96,192,8;
    Disp("","Pyramids 1:Pyramids 2:Pyramids 3:Pyramids 4:Basement 1:Basement 2"); Pick("moc_pryd");
D31: setarray @c[2],140,11,32,21,4,149,204,218,150,9;
    Disp("Rachel Sanctuary",1,5); Pick("ra_san");
D32: setarray @c[2],364,44,101,141;
    Disp("Scaraba Hole",1,2); Pick("dic_dun");
D33: setarray @c[2],306,143;
    Disp("","Friar Patrick"); Pick("","monk_test");
D34: setarray @c[2],288,9,149,81,210,54,10,222,100,99;
    Disp("Sphinx",1,5); Pick("","in_sphinx1","in_sphinx2","in_sphinx3","in_sphinx4","in_sphinx5");
D35: setarray @c[2],69,24,102,27;
    Disp("Sunken Ship",1,2); Pick("treasure");
D36: setarray @c[2],150,39,150,136,220,158,59,143,62,11,89,221,35,166,93,148,29,107,159,138,19,20,130,52;
    Disp("Thanatos Tower",1,12); Pick("tha_t");
D37: setarray @c[2],21,228,75,205,34,272;
    Disp("Thor Volcano",1,3); Pick("thor_v");
D38: setarray @c[2],205,15,129,133;
    Disp("Toy Factory",1,2); Pick("xmas_dun");
D39: setarray @c[2],154,49,148,261,132,189,100,192;
    Disp("","Entrance:Turtle Dungeon 1:Turtle Dungeon 2:Turtle Dungeon 3"); Pick("tur_dun");
D40: setarray @c[2],42,31,48,30,204,78;
    Disp("","Carpenter's Shop in the Tree:Passage to a Foreign World:Hvergermil's Fountain");
    Pick("","um_dun01","um_dun02","yggdrasil01");
D41: setarray @c[2],285,160,299,29;
    Disp("Dewata Dungeon",1,2); Pick("dew_dun");
D42: setarray @c[2],33,230;
    Disp("Malangdo Dungeon",1,1); Pick("mal_dun");
GD: setarray @c[2],119,93,39,161,50,44,116,45,199,195,200,124;
    Disp("","Baldur:Luina:Valkyrie:Britoniah:Arunafeltz:Schwaltzvalt");
    Pick("","gld_dun01","gld_dun02","gld_dun03","gld_dun04","arug_dun01","schg_dun01");

// --------------------------------------------------
    Castles:
// --------------------------------------------------
menu    "Aldebaran Castles",C1, "Geffen Castles",C2, "Payon Castles",C3,
    "Prontera Castles",C4, "Arunafeltz Castles",C5, "Schwaltzvalt Castles",C6;

C1: setarray @c[2],48,83,95,249,142,85,239,242,264,90;
    Disp("","Neuschwanstein:Hohenschwangau:Nuenberg:Wuerzburg:Rothenburg");
    Pick("","alde_gld","alde_gld","alde_gld","alde_gld","alde_gld");
C2: setarray @c[2],214,75,308,240,143,240,193,278,305,87;
    Disp("","Repherion:Eeyolbriggar:Yesnelph:Bergel:Mersetzdeitz");
    Pick("","gef_fild13","gef_fild13","gef_fild13","gef_fild13","gef_fild13");
C3: setarray @c[2],121,233,295,116,317,293,140,160,204,266;
    Disp("","Bright Arbor:Scarlet Palace:Holy Shadow:Sacred Altar:Bamboo Grove Hill");
    Pick("","pay_gld","pay_gld","pay_gld","pay_gld","pay_gld");
C4: setarray @c[2],134,65,240,128,153,137,111,240,208,240;
    Disp("","Kriemhild:Swanhild:Fadhgridh:Skoegul:Gondul");
    Pick("","prt_gld","prt_gld","prt_gld","prt_gld","prt_gld");
C5: setarray @c[2],158,272,83,47,68,155,299,345,292,107;
    Disp("","Mardol:Cyr:Horn:Gefn:Banadis");
    Pick("","aru_gld","aru_gld","aru_gld","aru_gld","aru_gld");
C6: setarray @c[2],293,100,288,252,97,196,137,90,71,315;
    Disp("","Himinn:Andlangr:Viblainn:Hljod:Skidbladnir");
    Pick("","sch_gld","sch_gld","sch_gld","sch_gld","sch_gld");

// --------------------------------------------------
    Special:
// --------------------------------------------------
menu    "Auction Hall",S1, "Battlegrounds",S2, "Casino",S3, "Gonryun Arena",S4,
    "Izlude Arena",S5, "Monster Race Arena",S6, "Turbo Track",S7;

S1: Go("auction_01",22,68);
S2: Go("bat_room",154,150);
S3: Go("cmd_in02",179,129);
S4: Go("gon_test",48,10);
S5: Go("arena_room",100,88);
S6: Go("p_track01",62,41);
S7: Go("turbo_room",99,114);
}
else{
mes "[Paid Warper]";
mes "You cheater you said , you have it!!";
mes "Get LOST!!";
close;
}
//-----------Shop----------
S_PAID:
mes "[Paid Warper]";
mes "Please not that,You have to use the ticket within 6 days and 20 Hours of time or it will expire";
next;
mes "It will cost you 1000k Zeny to buy it";
mes    "Please Input The Number of Tickets You Need";
    input .@t;
logmes .@t +" SC with "+ Zeny +" Zeny";
if (checkweight(7199,.@t)) { //7199 is the code of the ticket replace with whatever you want to trade, but you have to change it above too!!
if( Zeny < 1000*.@t ){mes "You dont have enough zeny."; close; }
set Zeny,Zeny-1000*.@t;
getitem 7199,.@t;
rentitem 7199,590400;
} else {
mes "You don't have enough space in your inventory.";
}
close;

S_QUIT:
mes "[Paid Warper]";
mes "Come Back Soon!!";
close;
}

 

 

 

Help me.
 

Link to comment
Share on other sites

3 answers to this question

Recommended Posts


  • Group:  Members
  • Topic Count:  1
  • Topics Per Day:  0.00
  • Content Count:  23
  • Reputation:   3
  • Joined:  02/11/12
  • Last Seen:  

What is the exact error? All I see right now is the entire script O_O

Link to comment
Share on other sites


  • Group:  Developer
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  2407
  • Reputation:   613
  • Joined:  07/05/12
  • Last Seen:  


prontera,156,163,4 script Paid Warper 423,{

function Go; function Disp; function Pick;

// --------------------------------------------------

// Main Menu:

// --------------------------------------------------

mes "[Paid Warper]";

mes "Hello";

mes "Please note that to avail my services you must have ticket";

next;

menu "I have it!",S_GO,"Let me buy",S_PAID,"No thanks I am ok!!",-;

mes "[Paid Warper]";

mes "Come Back Soon!!";

close;

//-----------Shop----------

S_PAID:

mes "[Paid Warper]";

mes "Please not that, You have to use the ticket within 6 days and 20 Hours of time or it will expire.";

next;

mes "[Paid Warper]";

mes "It will cost you 1000k Zeny to buy it";

mes "Please Input The Number of Tickets You Need";

mes "Put a value between 1 and 50 please.";

next;

mes "[Paid Warper]";

if( input( .@t, 1, 50 ) != 0 ) {

mes "Wrong value.";

close;

}

logmes .@t +" SC with "+ Zeny +" Zeny";

getinventorylist;

if ( checkweight(7199,.@t) && @inventorylist_count < 100 ) { //7199 is the code of the ticket replace with whatever you want to trade, but you have to change it above too!!

if( Zeny < 1000*.@t ) {

mes "You dont have enough zeny.";

close;

}

set Zeny,Zeny-1000*.@t;

// getitem 7199,.@t;

for( set .@i, 0; .@i < .@t; set .@i, .@i +1 )

rentitem 7199,590400;

mes "Here yours tickets.";

}

else

mes "You don't have enough space in your inventory.";

close;

S_GO:

if (countitem(7199) < 1 ) {

mes "[Paid Warper]";

mes "You cheater you said , you have it!!";

mes "Get LOST!!";

close;

}

delitem 7199,1;

menu "Last Warp ^777777["+lastwarp$+"]^000000",-,

" ~ Towns",Towns, " ~ Fields",Fields, " ~ Dungeons",Dungeons,

" ~ Guild Castles",Castles, " ~ Special Areas",Special;

if (lastwarp$ == "") dispbottom "You have not warped anywhere yet.";

else warp lastwarp$,lastwarpx,lastwarpy;

close;

// ------------------- Functions -------------------

// * Go("<map>",<x>,<y>);

// ~ Warps directly to a map.

// * Disp("<Menu Option>",<first option>,<last option>);

// * Pick("<map_prefix>"{,<index offset>});

// ~ Dynamic menu and map selection.

// * Disp("","<Option 1>:<Option 2>:<etc.>");

// * Pick("","<map1>","<map2>","<etc.>");

// ~ Manual menu and map selection.

//

// Other notes:

// ~ Array @c[] holds all (x,y) coordinates.

// ~ Use @c[2] EXCEPT when maps begin dynamically

// at 0: use @c[0] and Pick() offset 1.

// --------------------------------------------------

function Go {

warp getarg(0),getarg(1,0),getarg(2,0);

getmapxy(lastwarp$,lastwarpx,lastwarpy,0);

close;

}

function Disp {

set @menu$,"";

if(getarg(0)=="") {

set @menu$,getarg(1);

return;

}

for(set .@i,getarg(1); .@i<=getarg(2); set .@i,.@i+1)

set @menu$, @menu$+getarg(0)+" "+.@i+":";

return;

}

function Pick {

if(getarg(0)=="") {

set .@i, select(@menu$);

warp getarg(.@i),@c[.@i*2],@c[.@i*2+1];

} else {

set .@i, select(@menu$)-getarg(1,0);

warp getarg(0)+((.@i<10)?"0":"")+.@i,@c[.@i*2],@c[.@i*2+1];

}

getmapxy(lastwarp$,lastwarpx,lastwarpy,0);

close;

}

// --------------------------------------------------

Towns:

// --------------------------------------------------

menu "Prontera",T1, "Alberta",T2, "Aldebaran",T3, "Amatsu",T4, "Ayothaya",T5,

"Brasilis",T6, "Comodo",T7, "Dewata",T33, "Eclage",T34, "Einbech",T8,

"Einbroch",T9, "El Dicastes",T10, "Geffen",T11, "Gonryun",T12, "Hugel",T13,

"Izlude",T14, "Jawaii",T15, "Lighthalzen",T16, "Louyang",T17, "Lutie",T18,

"Malangdo",T35, "Malaya",T36, "Manuk",T19, "Midgarts Expedition Camp",T20,

"Mora",T21, "Morroc",T22, "Moscovia",T23, "Nameless Island",T24,

"Niflheim",T25, "Payon",T26, "Rachel",T27, "Splendide",T28, "Thor Camp",T29,

"Umbala",T30, "Veins",T31, "Yuno",T32;

T1: Go("prontera",155,183);

T2: Go("alberta",28,234);

T3: Go("aldebaran",140,131);

T4: Go("amatsu",198,84);

T5: Go("ayothaya",208,166);

T6: Go("brasilis",195,220);

T7: Go("comodo",209,143);

T8: Go("einbech",138,243);

T9: Go("einbroch",64,200);

T10: Go("dicastes01",197,187);

T11: Go("geffen",120,68);

T12: Go("gonryun",160,121);

T13: Go("hugel",96,145);

T14: Go("izlude",128,114);

T15: Go("jawaii",213,230);

T16: Go("lighthalzen",158,92);

T17: Go("louyang",217,100);

T18: Go("xmas",147,134);

T19: Go("manuk",260,175);

T20: Go("mid_camp",210,288);

T21: Go("mora",111,97);

T22: Go("morocc",156,93);

T23: Go("moscovia",219,193);

T24: Go("nameless_n",256,215);

T25: Go("niflheim",202,174);

T26: Go("payon",179,100);

T27: Go("rachel",130,111);

T28: Go("splendide",200,153);

T29: Go("thor_camp",246,68);

T30: Go("umbala",127,128);

T31: Go("veins",216,123);

T32: Go("yuno",157,51);

T33: Go("dewata",199,179);

T34: Go("eclage",111,39);

T35: Go("malangdo",224,184);

T36: Go("malaya",212,206);

// --------------------------------------------------

Fields:

// --------------------------------------------------

menu "Amatsu Fields",F1, "Ayothaya Fields",F2, "Bifrost Fields", F3,

"Brasilis Fields",F4, "Comodo Fields",F5, "Dewata Fields",F26,

"Eclage Fields",F27, "Einbroch Fields",F6, "El Dicastes Fields",F7,

"Geffen Fields",F8, "Gonryun Fields",F9, "Hugel Fields",F10,

"Lighthalzen Fields",F11, "Louyang Field",F12, "Lutie Field",F13,

"Malaya Fields",F28, "Manuk Fields",F14, "Mjolnir Fields",F15,

"Moscovia Fields",F16, "Niflheim Fields",F17, "Payon Forests",F18,

"Prontera Fields",F19, "Rachel Fields",F20, "Sograt Deserts",F21,

"Splendide Fields",F22, "Umbala Fields",F23, "Veins Fields",F24,

"Yuno Fields",F25;

F1: setarray @c[2],190,197;

Disp("Amatsu Field",1,1); Pick("ama_fild");

F2: setarray @c[2],173,134,212,150;

Disp("Ayothaya Field",1,2); Pick("ayo_fild");

F3: setarray @c[2],193,220,220,187;

Disp("Bifrost Field",1,2); Pick("bif_fild");

F4: setarray @c[2],74,32;

Disp("Brasilis Field",1,1); Pick("bra_fild");

F5: setarray @c[2],180,178,231,160,191,172,228,194,224,203,190,223,234,177,194,175,172,172;

Disp("Comodo Field",1,9); Pick("cmd_fild");

F6: setarray @c[2],142,225,182,141,187,228,185,173,216,173,195,148,272,220,173,214,207,174,196,200;

Disp("Einbroch Field",1,10); Pick("ein_fild");

F7: setarray @c[2],143,132,143,217;

Disp("El Dicastes Field",1,2); Pick("dic_fild");

F8: setarray @c[0],46,199,213,204,195,212,257,192,188,171,166,263,248,158,195,191,186,183,221,117,178,218,136,328,240,181,235,235,211,185;

Disp("Geffen Field",0,14); Pick("gef_fild",1);

F9: setarray @c[2],220,227;

Disp("Gonryun Field",1,1); Pick("gon_fild");

F10: setarray @c[2],268,101,222,193,232,185,252,189,196,106,216,220,227,197;

Disp("Hugel Field",1,7); Pick("hu_fild");

F11: setarray @c[2],240,179,185,235,240,226;

Disp("Lighthalzen Field",1,3); Pick("lhz_fild");

F12: setarray @c[2],229,187;

Disp("Louyang Field",1,1); Pick("lou_fild");

F13: setarray @c[2],115,145;

Disp("Lutie Field",1,1); Pick("xmas_fild");

F14: setarray @c[2],35,236,35,262,84,365;

Disp("Manuk Field",1,3); Pick("man_fild");

F15: setarray @c[2],204,120,175,193,208,213,179,180,181,240,195,270,235,202,188,215,205,144,245,223,180,206,196,208;

Disp("Mjolnir Field",1,12); Pick("mjolnir_");

F16: setarray @c[2],82,104,131,147;

Disp("Moscovia Field",1,2); Pick("mosk_fild");

F17: setarray @c[2],215,229,167,234;

Disp("Niflheim Field",1,2); Pick("nif_fild");

F18: setarray @c[2],158,206,151,219,205,148,186,247,134,204,193,235,200,177,137,189,201,224,160,205,194,150;

Disp("Payon Forest",1,11); Pick("pay_fild");

F19: setarray @c[0],208,227,190,206,240,206,190,143,307,252,239,213,185,188,193,194,187,218,210,183,195,149,198,164;

Disp("Prontera Field",0,11); Pick("prt_fild",1);

F20: setarray @c[2],192,162,235,166,202,206,202,208,225,202,202,214,263,196,217,201,87,121,277,181,221,185,175,200,174,197;

Disp("Rachel Field",1,13); Pick("ra_fild");

F21: setarray @c[2],219,205,177,206,194,182,224,170,198,216,156,187,185,263,206,228,208,238,209,223,85,97,207,202,31,195,38,195;

Disp("","Sograt Desert 1:Sograt Desert 2:Sograt Desert 3:Sograt Desert 7:Sograt Desert 11:Sograt Desert 12:Sograt Desert 13:Sograt Desert 16:Sograt Desert 17:Sograt Desert 18:Sograt Desert 19:Sograt Desert 20:Sograt Desert 21:Sograt Desert 22");

Pick("","moc_fild01","moc_fild02","moc_fild03","moc_fild07","moc_fild11","moc_fild12","moc_fild13","moc_fild16","moc_fild17","moc_fild18","moc_fild19","moc_fild20","moc_fild21","moc_fild22");

F22: setarray @c[2],175,186,236,184,188,204;

Disp("Splendide Field",1,3); Pick("spl_fild");

F23: setarray @c[2],217,206,223,221,237,215,202,197;

Disp("Umbala Field",1,4); Pick("um_fild");

F24: setarray @c[2],186,175,196,370,222,45,51,250,202,324,150,223,149,307;

Disp("Veins Field",1,7); Pick("ve_fild");

F25: setarray @c[2],189,224,192,207,221,157,226,199,223,177,187,232,231,174,196,203,183,214,200,124,195,226,210,304;

Disp("Yuno Field",1,12); Pick("yuno_fild");

F26: setarray @c[2],371,212;

Disp("Dewata Field",1,1); Pick("dew_fild");

F27: setarray @c[2],97,314;

Disp("Eclage Field",1,1); Pick("ecl_fild");

F28: setarray @c[2],40,272,207,180;

Disp("Malaya Field",1,2); Pick("ma_fild");

// --------------------------------------------------

Dungeons:

// --------------------------------------------------

menu "Abyss Lakes",D1, "Amatsu Dungeon",D2, "Anthell",D3,

"Ayothaya Dungeon",D4, "Beach Dungeon",D5, "Bio Labs",D6,

"Brasilis Dungeon",D7, "Byalan Dungeon",D8, "Clock Tower",D9,

"Coal Mines",D10, "Culvert",D11, "Cursed Abbey",D12, "Dewata Dungeon",D41,

"Einbroch Dungeon",D13, "Endless Tower",D14, "Gefenia",D15,

"Geffen Dungeon",D16, "Glast Heim",D17, "Gonryun Dungeon",D18,

"Guild Dungeons",GD, "Hidden Dungeon",D19, "Ice Dungeon",D20,

"Juperos",D21, "Kiel Dungeon",D22, "Louyang Dungeon",D23,

"Magma Dungeon",D24, "Malangdo Dungeon",D42, "Moscovia Dungeon",D25,

"Nidhogg's Dungeon",D26, "Odin Temple",D27, "Orc Dungeon",D28, "Payon Dungeon",D29,

"Pyramids",D30, "Rachel Sanctuary",D31, "Scaraba Hole",D32, "Sealed Shrine",D33,

"Sphinx",D34, "Sunken Ship",D35, "Thanatos Tower",D36, "Thor Volcano",D37,

"Toy Factory",D38, "Turtle Dungeon",D39, "Umbala Dungeon",D40;

D1: setarray @c[2],261,272,275,270,116,27;

Disp("Abyss Lakes",1,3); Pick("abyss_");

D2: setarray @c[2],228,11,34,41,119,14;

Disp("Amatsu Dungeon",1,3); Pick("ama_dun");

D3: setarray @c[2],35,262,168,170;

Disp("Anthell",1,2); Pick("anthell");

D4: setarray @c[2],275,19,24,26;

Disp("","Ancient Shrine Maze:Inside Ancient Shrine"); Pick("ayo_dun");

D5: setarray @c[2],266,67,255,244,23,260;

Disp("Beach Dungeon",1,3); Pick("","beach_dun","beach_dun2","beach_dun3");

D6: setarray @c[2],150,288,150,18,140,134;

Disp("Bio Lab",1,3); Pick("lhz_dun");

D7: setarray @c[2],87,47,262,262;

Disp("Brasilis Dungeon",1,2); Pick("bra_dun");

D8: setarray @c[0],168,168,253,252,236,204,32,63,26,27;

Disp("Byalan Dungeon",1,5); Pick("iz_dun",1);

D9: setarray @c[2],199,159,148,283,65,147,56,155,297,25,127,169,277,178,268,74;

Disp("","Clock Tower 1:Clock Tower 2:Clock Tower 3:Clock Tower 4:Basement 1:Basement 2:Basement 3:Basement 4");

Pick("","c_tower1","c_tower2","c_tower3","c_tower4","alde_dun01","alde_dun02","alde_dun03","alde_dun04");

D10: setarray @c[2],52,17,381,343,302,262;

Disp("Coal Mines",1,3); Pick("mjo_dun");

D11: setarray @c[2],131,247,19,19,180,169,100,92;

Disp("Culvert",1,4); Pick("","prt_sewb1","prt_sewb2","prt_sewb3","prt_sewb4");

D12: setarray @c[2],51,14,150,11,120,10;

Disp("Cursed Abbey",1,3); Pick("abbey");

D13: setarray @c[2],22,14,292,290;

Disp("Einbroch Dungeon",1,2); Pick("ein_dun");

D14: setarray @c[2],72,112;

Disp("","Misty Island"); Pick("","e_tower");

D15: setarray @c[2],40,103,203,34,266,168,130,272;

Disp("Gefenia",1,4); Pick("gefenia",0);

D16: setarray @c[0],104,99,115,236,106,132,203,200;

Disp("Geffen Dungeon",1,4); Pick("gef_dun",1);

D17: setarray @c[2],375,304,199,29,104,25,150,15,157,287,147,15,258,255,108,291,171,283,68,277,156,7,12,7,133,271,224,274,14,70,150,14;

Disp("","Entrance:Castle 1:Castle 2:Chivalry 1:Chivalry 2:Churchyard:Culvert 1:Culvert 2:Culvert 3:Culvert 4:St. Abbey:Staircase Dungeon:Underground Cave 1:Underground Cave 2:Underground Prison 1:Underground Prison 2");

Pick("","glast_01","gl_cas01","gl_cas02","gl_knt01","gl_knt02","gl_chyard","gl_sew01","gl_sew02","gl_sew03","gl_sew04","gl_church","gl_step","gl_dun01","gl_dun02","gl_prison","gl_prison1");

D18: setarray @c[2],153,53,28,113,68,16;

Disp("Gonryun Dungeon",1,3); Pick("gon_dun");

D19: setarray @c[2],176,7,93,20,23,8;

Disp("Hidden Dungeon",1,3); Pick("prt_maze");

D20: setarray @c[2],157,14,151,155,149,22,33,158;

Disp("Ice Dungeon",1,4); Pick("ice_dun");

D21: setarray @c[2],140,51,53,247,37,63,150,285;

Disp("","Entrance:Juperos 1:Juperos 2:Core");

Pick("","jupe_cave","juperos_01","juperos_02","jupe_core");

D22: setarray @c[2],28,226,41,198;

Disp("Kiel Dungeon",1,2); Pick("kh_dun");

D23: setarray @c[2],218,196,282,20,165,38;

Disp("","The Royal Tomb:Inside the Royal Tomb:Suei Long Gon"); Pick("lou_dun");

D24: setarray @c[2],126,68,47,30;

Disp("Magma Dungeon",1,2); Pick("mag_dun");

D25: setarray @c[2],189,48,165,30,32,135;

Disp("Moscovia Dungeon",1,3); Pick("mosk_dun");

D26: setarray @c[2],61,239,60,271;

Disp("Nidhogg's Dungeon",1,2); Pick("nyd_dun");

D27: setarray @c[2],298,167,224,149,266,280;

Disp("Odin Temple",1,3); Pick("odin_tem");

D28: setarray @c[2],32,170,21,185;

Disp("Orc Dungeon",1,2); Pick("orcsdun");

D29: setarray @c[0],21,183,19,33,19,63,155,159,201,204;

Disp("Payon Dungeon",1,5); Pick("pay_dun",1);

D30: setarray @c[2],192,9,10,192,100,92,181,11,94,96,192,8;

Disp("","Pyramids 1:Pyramids 2:Pyramids 3:Pyramids 4:Basement 1:Basement 2"); Pick("moc_pryd");

D31: setarray @c[2],140,11,32,21,4,149,204,218,150,9;

Disp("Rachel Sanctuary",1,5); Pick("ra_san");

D32: setarray @c[2],364,44,101,141;

Disp("Scaraba Hole",1,2); Pick("dic_dun");

D33: setarray @c[2],306,143;

Disp("","Friar Patrick"); Pick("","monk_test");

D34: setarray @c[2],288,9,149,81,210,54,10,222,100,99;

Disp("Sphinx",1,5); Pick("","in_sphinx1","in_sphinx2","in_sphinx3","in_sphinx4","in_sphinx5");

D35: setarray @c[2],69,24,102,27;

Disp("Sunken Ship",1,2); Pick("treasure");

D36: setarray @c[2],150,39,150,136,220,158,59,143,62,11,89,221,35,166,93,148,29,107,159,138,19,20,130,52;

Disp("Thanatos Tower",1,12); Pick("tha_t");

D37: setarray @c[2],21,228,75,205,34,272;

Disp("Thor Volcano",1,3); Pick("thor_v");

D38: setarray @c[2],205,15,129,133;

Disp("Toy Factory",1,2); Pick("xmas_dun");

D39: setarray @c[2],154,49,148,261,132,189,100,192;

Disp("","Entrance:Turtle Dungeon 1:Turtle Dungeon 2:Turtle Dungeon 3"); Pick("tur_dun");

D40: setarray @c[2],42,31,48,30,204,78;

Disp("","Carpenter's Shop in the Tree:Passage to a Foreign World:Hvergermil's Fountain");

Pick("","um_dun01","um_dun02","yggdrasil01");

D41: setarray @c[2],285,160,299,29;

Disp("Dewata Dungeon",1,2); Pick("dew_dun");

D42: setarray @c[2],33,230;

Disp("Malangdo Dungeon",1,1); Pick("mal_dun");

GD: setarray @c[2],119,93,39,161,50,44,116,45,199,195,200,124;

Disp("","Baldur:Luina:Valkyrie:Britoniah:Arunafeltz:Schwaltzvalt");

Pick("","gld_dun01","gld_dun02","gld_dun03","gld_dun04","arug_dun01","schg_dun01");

// --------------------------------------------------

Castles:

// --------------------------------------------------

menu "Aldebaran Castles",C1, "Geffen Castles",C2, "Payon Castles",C3,

"Prontera Castles",C4, "Arunafeltz Castles",C5, "Schwaltzvalt Castles",C6;

C1: setarray @c[2],48,83,95,249,142,85,239,242,264,90;

Disp("","Neuschwanstein:Hohenschwangau:Nuenberg:Wuerzburg:Rothenburg");

Pick("","alde_gld","alde_gld","alde_gld","alde_gld","alde_gld");

C2: setarray @c[2],214,75,308,240,143,240,193,278,305,87;

Disp("","Repherion:Eeyolbriggar:Yesnelph:Bergel:Mersetzdeitz");

Pick("","gef_fild13","gef_fild13","gef_fild13","gef_fild13","gef_fild13");

C3: setarray @c[2],121,233,295,116,317,293,140,160,204,266;

Disp("","Bright Arbor:Scarlet Palace:Holy Shadow:Sacred Altar:Bamboo Grove Hill");

Pick("","pay_gld","pay_gld","pay_gld","pay_gld","pay_gld");

C4: setarray @c[2],134,65,240,128,153,137,111,240,208,240;

Disp("","Kriemhild:Swanhild:Fadhgridh:Skoegul:Gondul");

Pick("","prt_gld","prt_gld","prt_gld","prt_gld","prt_gld");

C5: setarray @c[2],158,272,83,47,68,155,299,345,292,107;

Disp("","Mardol:Cyr:Horn:Gefn:Banadis");

Pick("","aru_gld","aru_gld","aru_gld","aru_gld","aru_gld");

C6: setarray @c[2],293,100,288,252,97,196,137,90,71,315;

Disp("","Himinn:Andlangr:Viblainn:Hljod:Skidbladnir");

Pick("","sch_gld","sch_gld","sch_gld","sch_gld","sch_gld");

// --------------------------------------------------

Special:

// --------------------------------------------------

menu "Auction Hall",S1, "Battlegrounds",S2, "Casino",S3, "Gonryun Arena",S4,

"Izlude Arena",S5, "Monster Race Arena",S6, "Turbo Track",S7;

S1: Go("auction_01",22,68);

S2: Go("bat_room",154,150);

S3: Go("cmd_in02",179,129);

S4: Go("gon_test",48,10);

S5: Go("arena_room",100,88);

S6: Go("p_track01",62,41);

S7: Go("turbo_room",99,114);

}

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  4
  • Topics Per Day:  0.00
  • Content Count:  9
  • Reputation:   0
  • Joined:  04/12/12
  • Last Seen:  

Thank you for helping Capuche.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...