API tools faq
paste
Advertisement
johnlol

Warp_1.5

johnlol
Aug 9th, 2023
1,131
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VeriLog 25.70 KB | Gaming | 0 0
raw download clone embed print report
  1. //===== Hercules Script ======================================
  2. //= Warper
  3. //===== By: ==================================================
  4. //= Euphy
  5. //===== Current Version: =====================================
  6. //= 1.4c
  7. //===== Description: =========================================
  8. //= A complete - but very condensed - warper script.
  9. //= Some coordinates written by Tekno-Kanix and ToastOfDoom.
  10. //===== Additional Comments: =================================
  11. //= 1.0 Initial script.
  12. //= 1.1 Added missing duplicates and fixed coordinates.
  13. //= 1.2 Added new episodes and simplified functions.
  14. //= 1.3 Added Renewal checks and Instances menu.
  15. //=     Aligned coordinates with @go.
  16. //= 1.4 Added new Guild Dungeons.
  17. //= 1.4a Slight edits.
  18. //= 1.4b Added Wolfchev's Laboratory warp.
  19. //= 1.4c Switched out "Last Warp" with "Recent Warp" feature.
  20. //=      (Thanks vBrenth for idea) [ Aeromesi ]
  21. //=      Also added in Favorite Warps that allows you to
  22. //=      Save your Recent Warps List to choose from.
  23. //= 1.4d Added in menu selection instead of input [ vBrenth ]
  24. //=      Adjusted to Hercules, added menu for Fav. [ Aeromesi]
  25. //============================================================
  26. -   script  OnInitSetup -,{
  27. OnInit:
  28. $@MaxListW = 5;
  29. end;
  30. }
  31. -   script  Warper  FAKE_NPC,{
  32. function Go; function Disp; function Pick; function Restrict;
  33.  
  34. // --------------------------------------------------
  35. //  Main Menu:
  36. // --------------------------------------------------
  37. MainMenu:
  38.         mes @header$ = "[Warper]";
  39.         mes "Where would you like to go?";
  40.         next;
  41. menu    "^8A2BE2Favorite Warps^000000",FavoriteWarps,
  42.         "^00FFFFRecent Warps^000000",RecentWarps,
  43.         " ^800000~^000000 ^808000Towns^000000",Towns,
  44.         " ^800000~^000000 ^483D8BFields^000000",Fields,
  45.         " ^800000~^000000 ^696969Dungeons^000000",Dungeons,
  46.         " ^800000~^000000 ^FFD700Guild Castles^000000",Castles,
  47.         " ^800000~^000000 ^808000Guild Dungeons^000000",Guild_Dungeons,
  48.         " ^800000~^000000 ^006400Instances^000000",Instances,
  49.         " ^800000~^000000 ^8B4513Special Areas^000000",Special;
  50.         FavoriteWarps:
  51.         if ( recentwarp$[1] == "" ) {
  52.         mes @header$;
  53.         mes "You have never warped anywhere before.";
  54.         next;
  55.         callsub MainMenu;
  56. }
  57.         switch(select("[^800000Save^000000] - ^FF00FFRecent Warps^000000","[^800000Select^000000] - ^8A2BE2Favorite Warp^000000"))
  58.         {
  59.             case 1:
  60.             // Save  Most Recent Warps
  61.             favwarp$[1] = recentwarp$[1];
  62.             favwarpx[1] = recentwarpx[1];
  63.             favwarpy[1] = recentwarpy[1];
  64.  
  65.             favwarp$[2] = recentwarp$[2];
  66.             favwarpx[2] = recentwarpx[2];
  67.             favwarpy[2] = recentwarpy[2];
  68.  
  69.             favwarp$[3] = recentwarp$[3];
  70.             favwarpx[3] = recentwarpx[3];
  71.             favwarpy[3] = recentwarpy[3];
  72.  
  73.             favwarp$[4] = recentwarp$[4];
  74.             favwarpx[4] = recentwarpx[4];
  75.             favwarpy[4] = recentwarpy[4];
  76.  
  77.             favwarp$[5] = recentwarp$[5];
  78.             favwarpx[5] = recentwarpx[5];
  79.             favwarpy[5] = recentwarpy[5];
  80.             mes @header$;
  81.             mes "Saved.";
  82.             next;
  83.             callsub MainMenu;
  84.             end;
  85.             case 2:
  86.     .@menu$ = "";
  87.     for ( .n = 1; .n <= $@MaxListW; .n++ )
  88.     {
  89.         .@menu$ = .@menu$ + (.@n == 1 ? "":":")
  90.         + (( favwarp$[.n])?""+.n+".) "
  91.         +favwarp$[.n]+","
  92.         +favwarpx[.n]+","+favwarpy[.n]
  93.         +"":""+.n+".) ^FF00FFNo data yet^000000")+"";
  94.     }
  95.     .@choice = select(.@menu$) - 1;
  96.     if ( favwarp$[.@choice] == "" )
  97.     {
  98.         next;
  99.         callsub MainMenu;
  100.     } else
  101.         warp favwarp$[.@choice],favwarpx[.@choice],favwarpy[.@choice];
  102.     end;
  103.            
  104. }
  105. // --------------------------------------------------
  106. // Recent Warps Option:
  107. // --------------------------------------------------
  108.  
  109.     RecentWarps:
  110.         mes @header$;
  111.         if ( recentwarp$[1] == "" ) {
  112.         mes "Not single warp done yet.";
  113.         next;
  114.         callsub MainMenu;
  115.     }
  116.     .@menu$ = "";
  117.     for ( .n = 1; .n <= $@MaxListW; .n++ )
  118.     {
  119.         .@menu$ = .@menu$ + (.@n == 1 ? "":":") + (( recentwarp$[.n])?""+.n+".) "+recentwarp$[.n]+","+recentwarpx[.n]+","+recentwarpy[.n]+"":""+.n+".) ^FF00FFNo data yet^000000")+"";
  120.     }
  121.     .@choice = select(.@menu$) - 1;
  122.     if ( recentwarp$[.@choice] == "" )
  123.     {
  124.         next;
  125.         callsub MainMenu;
  126.     } else
  127.     warp recentwarp$[.@choice],recentwarpx[.@choice],recentwarpy[.@choice];
  128.     end;
  129.  
  130. // ------------------- Functions -------------------
  131. // * Go("<map>",<x>,<y>);
  132. //  ~ Warps directly to a map.
  133. //
  134. // * Disp("<Menu Option>",<first option>,<last option>);
  135. // * Pick("<map_prefix>"{,<index offset>});
  136. //  ~ Dynamic menu and map selection (auto-numbered).
  137. //
  138. // * Disp("<Option 1>:<Option 2>:<etc.>");
  139. // * Pick("","<map1>","<map2>","<etc.>");
  140. //  ~ Manual menu and map selection (listed).
  141. //
  142. // * Restrict("<RE | Pre-RE>"{,<menu option numbers>});
  143. //  ~ Only allows map for Renewal or Pre-Renewal modes.
  144. //     If menu option numbers are given, only those maps
  145. //     will be restricted (i.e. not for "Go").
  146. //
  147. // Other notes:
  148. //   ~ Array @c[] holds all (x,y) coordinates.
  149. //   ~ Use @c[2] EXCEPT when maps begin dynamically
  150. //    at 0: use @c[0] and Pick() offset 1.
  151. // --------------------------------------------------
  152.  
  153. function Go {
  154. if ( Listing == $@MaxListW ) {
  155.  
  156.     recentwarp$[1] = recentwarp$[2];
  157.     recentwarpx[1] = recentwarpx[2];
  158.     recentwarpy[1] = recentwarpy[2];
  159.  
  160.     recentwarp$[2] = recentwarp$[3];
  161.     recentwarpx[2] = recentwarpx[3];
  162.     recentwarpy[2] = recentwarpy[3];
  163.  
  164.     recentwarp$[3] = recentwarp$[4];
  165.     recentwarpx[3] = recentwarpx[4];
  166.     recentwarpy[3] = recentwarpy[4];
  167.  
  168.     recentwarp$[4] = lastwarp$;
  169.     recentwarpx[4] = lastwarpx;
  170.     recentwarpy[4] = lastwarpy;
  171.     Listing--;
  172. }
  173.  
  174.     lastwarp$ = getarg(0);
  175.     lastwarpx = getarg(1,0);
  176.     lastwarpy = getarg(2,0);
  177.     Listing++;
  178.     recentwarp$[Listing] = lastwarp$;
  179.     recentwarpx[Listing] = lastwarpx;
  180.     recentwarpy[Listing] = lastwarpy;
  181.     warp getarg(0),getarg(1,0),getarg(2,0);
  182.     end;
  183. }
  184. function Disp {
  185.     if (getargcount() < 3)
  186.         @menu$ = getarg(0);
  187.     else {
  188.         @menu$ = "";
  189.         for (.@i = getarg(1); .@i <= getarg(2); .@i++)
  190.             @menu$ = @menu$+getarg(0)+" "+.@i+":";
  191.     }
  192.     return;
  193. }
  194. function Pick {
  195.     .@warp_block = @warp_block;
  196.     @warp_block = 0;
  197.     .@select = select(@menu$);
  198.     if (getarg(0) == "") {
  199.         .@i = .@select;
  200.         .@map$ = getarg(.@i);
  201.     } else {
  202.         .@i = .@select-getarg(1,0);
  203.         .@map$ = getarg(0)+((.@i<10)?"0":"")+.@i;
  204.     }
  205.     if (.@warp_block & (1<<.@select)) {
  206.         dispbottom strcharinfo(PC_NAME),"This map is not enabled in "+(RENEWAL?"":"Pre-")+"Renewal.";
  207.         end;
  208.     }
  209.     .@x = @c[.@i*2];
  210.     .@y = @c[.@i*2+1];
  211.     deletearray @c[0],getarraysize(@c);
  212.     Go(.@map$,.@x,.@y);
  213. }
  214. function Restrict {
  215.     if ((getarg(0) == "RE" && !RENEWAL) || (getarg(0) == "Pre-RE" && RENEWAL)) {
  216.         if (getarg(1,0)) {
  217.             @warp_block = 0;
  218.             for (.@i = 1; .@i < getargcount(); .@i++)
  219.                 @warp_block = @warp_block | (1<<getarg(.@i));
  220.         } else {
  221.             dispbottom strcharinfo(PC_NAME),"This map is not enabled in "+(RENEWAL?"":"Pre-")+"Renewal.";
  222.             end;
  223.         }
  224.     }
  225.     return;
  226. }
  227.  
  228. // --------------------------------------------------
  229.     Towns:
  230. // --------------------------------------------------
  231. menu    "Prontera",T1, "Alberta",T2, "Aldebaran",T3, "Amatsu",T4, "Ayothaya",T5,
  232.         "Brasilis",T6, "Comodo",T7, "Dewata",T8, "Eclage",T9, "Einbech",T10,
  233.         "Einbroch",T11, "El Dicastes",T12, "Geffen",T13, "Gonryun",T14, "Hugel",T15,
  234.         "Izlude",T16, "Jawaii",T17, "Lighthalzen",T18, "Louyang",T19, "Lutie",T20,
  235.         "Malangdo",T21, "Malaya",T22, "Manuk",T23, "Midgarts Expedition Camp",T24,
  236.         "Mora",T25, "Morroc",T26, "Moscovia",T27, "Nameless Island",T28,
  237.         "Niflheim",T29, "Payon",T30, "Rachel",T31, "Splendide",T32, "Thor Camp",T33,
  238.         "Umbala",T34, "Veins",T35, "Yuno",T36;
  239.  
  240. T1: Go("prontera",155,183);
  241. T2: Go("alberta",28,234);
  242. T3: Go("aldebaran",140,131);
  243. T4: Go("amatsu",198,84);
  244. T5: Go("ayothaya",208,166);
  245. T6: Restrict("RE");
  246.     Go("brasilis",196,217);
  247. T7: Go("comodo",209,143);
  248. T8: Restrict("RE");
  249.     Go("dewata",200,180);
  250. T9: Restrict("RE");
  251.     Go("ecl_in01",48,53);
  252. T10: Go("einbech",63,35);
  253. T11: Go("einbroch",64,200);
  254. T12: Restrict("RE");
  255.      Go("dicastes01",198,187);
  256. T13: Go("geffen",119,59);
  257. T14: Go("gonryun",160,120);
  258. T15: Go("hugel",96,145);
  259. T16: Go("izlude",128,(RENEWAL?146:114));
  260. T17: Go("jawaii",251,132);
  261. T18: Go("lighthalzen",158,92);
  262. T19: Go("louyang",217,100);
  263. T20: Go("xmas",147,134);
  264. T21: Restrict("RE");
  265.      Go("malangdo",140,114);
  266. T22: Restrict("RE");
  267.      Go("malaya",231,200);
  268. T23: Go("manuk",282,138);
  269. T24: Go("mid_camp",210,288);
  270. T25: Restrict("RE");
  271.      Go("mora",55,146);
  272. T26: Go("morocc",156,93);
  273. T27: Go("moscovia",223,184);
  274. T28: Go("nameless_n",256,215);
  275. T29: Go("niflheim",202,174);
  276. T30: Go("payon",179,100);
  277. T31: Go("rachel",130,110);
  278. T32: Go("splendide",201,147);
  279. T33: Go("thor_camp",246,68);
  280. T34: Go("umbala",97,153);
  281. T35: Go("veins",216,123);
  282. T36: Go("yuno",157,51);
  283.  
  284. // --------------------------------------------------
  285.     Fields:
  286. // --------------------------------------------------
  287. menu    "Amatsu Fields",F1, "Ayothaya Fields",F2, "Bifrost Fields", F3,
  288.         "Brasilis Fields",F4, "Comodo Fields",F5, "Dewata Fields",F6,
  289.         "Eclage Fields",F7, "Einbroch Fields",F8, "El Dicastes Fields",F9,
  290.         "Geffen Fields",F10, "Gonryun Fields",F11, "Hugel Fields",F12,
  291.         "Lighthalzen Fields",F13, "Louyang Field",F14, "Lutie Field",F15,
  292.         "Malaya Fields",F16, "Manuk Fields",F17, "Mjolnir Fields",F18,
  293.         "Moscovia Fields",F19, "Niflheim Fields",F20, "Payon Forests",F21,
  294.         "Prontera Fields",F22, "Rachel Fields",F23, "Sograt Deserts",F24,
  295.         "Splendide Fields",F25, "Umbala Fields",F26, "Veins Fields",F27,
  296.         "Yuno Fields",F28;
  297.  
  298. F1: setarray @c[2],190,197;
  299.     Disp("Amatsu Field",1,1); Pick("ama_fild");
  300. F2: setarray @c[2],173,134,212,150;
  301.     Disp("Ayothaya Field",1,2); Pick("ayo_fild");
  302. F3: Restrict("RE");
  303.     setarray @c[2],193,220,220,187;
  304.     Disp("Bifrost Field",1,2); Pick("bif_fild");
  305. F4: Restrict("RE");
  306.     setarray @c[2],74,32;
  307.     Disp("Brasilis Field",1,1); Pick("bra_fild");
  308. F5: Restrict("Pre-RE",5);
  309.     setarray @c[2],180,178,231,160,191,172,228,194,224,203,190,223,234,177,194,175,172,172;
  310.     Disp("Comodo Field",1,9); Pick("cmd_fild");
  311. F6: Restrict("RE");
  312.     setarray @c[2],371,212;
  313.     Disp("Dewata Field",1,1); Pick("dew_fild");
  314. F7: Restrict("RE");
  315.     setarray @c[2],97,314;
  316.     Disp("Eclage Field",1,1); Pick("ecl_fild");
  317. F8: Restrict("Pre-RE",2,10);
  318.     setarray @c[2],142,225,182,141,187,228,185,173,216,173,195,148,272,220,173,214,207,174,196,200;
  319.     Disp("Einbroch Field",1,10); Pick("ein_fild");
  320. F9: Restrict("RE");
  321.     setarray @c[2],143,132,143,217;
  322.     Disp("El Dicastes Field",1,2); Pick("dic_fild");
  323. F10: Restrict("Pre-RE",13,15);
  324.      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;
  325.      Disp("Geffen Field",0,14); Pick("gef_fild",1);
  326. F11: setarray @c[2],220,227;
  327.      Disp("Gonryun Field",1,1); Pick("gon_fild");
  328. F12: Restrict("Pre-RE",3,7);
  329.      setarray @c[2],268,101,222,193,232,185,252,189,196,106,216,220,227,197;
  330.      Disp("Hugel Field",1,7); Pick("hu_fild");
  331. F13: setarray @c[2],240,179,185,235,240,226;
  332.      Disp("Lighthalzen Field",1,3); Pick("lhz_fild");
  333. F14: setarray @c[2],229,187;
  334.      Disp("Louyang Field",1,1); Pick("lou_fild");
  335. F15: setarray @c[2],115,145;
  336.      Disp("Lutie Field",1,1); Pick("xmas_fild");
  337. F16: Restrict("RE");
  338.      setarray @c[2],40,272,207,180;
  339.      Disp("Malaya Field",1,2); Pick("ma_fild");
  340. F17: setarray @c[2],35,236,35,262,84,365;
  341.      Disp("Manuk Field",1,3); Pick("man_fild");
  342. F18: 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;
  343.      Disp("Mjolnir Field",1,12); Pick("mjolnir_");
  344. F19: setarray @c[2],82,104,131,147;
  345.      Disp("Moscovia Field",1,2); Pick("mosk_fild");
  346. F20: setarray @c[2],215,229,167,234;
  347.      Disp("Niflheim Field",1,2); Pick("nif_fild");
  348. F21: Restrict("Pre-RE",5,11);
  349.      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;
  350.      Disp("Payon Forest",1,11); Pick("pay_fild");
  351. F22: 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;
  352.      Disp("Prontera Field",0,11); Pick("prt_fild",1);
  353. F23: Restrict("Pre-RE",2,7,9,10,11,13);
  354.      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;
  355.      Disp("Rachel Field",1,13); Pick("ra_fild");
  356. F24: 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;
  357.      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");
  358.      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");
  359. F25: setarray @c[2],175,186,236,184,188,204;
  360.      Disp("Splendide Field",1,3); Pick("spl_fild");
  361. F26: setarray @c[2],217,206,223,221,237,215,202,197;
  362.      Disp("Umbala Field",1,4); Pick("um_fild");
  363. F27: Restrict("Pre-RE",5);
  364.      setarray @c[2],186,175,196,370,222,45,51,250,202,324,150,223,149,307;
  365.      Disp("Veins Field",1,7); Pick("ve_fild");
  366. F28: Restrict("Pre-RE",5,10);
  367.      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;
  368.      Disp("Yuno Field",1,12); Pick("yuno_fild");
  369.  
  370. // --------------------------------------------------
  371.     Dungeons:
  372. // --------------------------------------------------
  373. menu    "Abyss Lakes",D1, "Amatsu Dungeon",D2, "Anthell",D3,
  374.         "Ayothaya Dungeon",D4, "Beach Dungeon",D5, "Bifrost Tower",D41,
  375.         "Bio Labs",D6, "Brasilis Dungeon",D7, "Byalan Dungeon",D8, "Clock Tower",D9,
  376.         "Coal Mines",D10, "Culvert",D11, "Cursed Abbey",D12, "Dewata Dungeon",D13,
  377.         "Einbroch Dungeon",D14, "Gefenia",D15, "Geffen Dungeon",D16,
  378.         "Glast Heim",D17, "Gonryun Dungeon",D18, "Hidden Dungeon",D19,
  379.         "Ice Dungeon",D20, "Juperos",D21, "Kiel Dungeon",D22, "Louyang Dungeon",D23,
  380.         "Magma Dungeon",D24, "Malangdo Dungeon",D25, "Moscovia Dungeon",D26,
  381.         "Nidhogg's Dungeon",D27, "Odin Temple",D28, "Orc Dungeon",D29,
  382.         "Payon Dungeon",D30, "Pyramids",D31, "Rachel Sanctuary",D32,
  383.         "Scaraba Hole",D33, "Sphinx",D34, "Sunken Ship",D35, "Thanatos Tower",D36,
  384.         "Thor Volcano",D37, "Toy Factory",D38, "Turtle Dungeon",D39, "Umbala Dungeon",D40;
  385.  
  386. D1: setarray @c[2],261,272,275,270,116,27;
  387.     Disp("Abyss Lakes",1,3); Pick("abyss_");
  388. D2: setarray @c[2],228,11,34,41,119,14;
  389.     Disp("Amatsu Dungeon",1,3); Pick("ama_dun");
  390. D3: setarray @c[2],35,262,168,170;
  391.     Disp("Anthell",1,2); Pick("anthell");
  392. D4: setarray @c[2],275,19,24,26;
  393.     Disp("Ancient Shrine Maze:Inside Ancient Shrine"); Pick("ayo_dun");
  394. D5: setarray @c[2],266,67,255,244,23,260;
  395.     Disp("Beach Dungeon",1,3); Pick("","beach_dun","beach_dun2","beach_dun3");
  396. D6: Restrict("RE",4);
  397.     setarray @c[2],150,288,150,18,140,134,244,52;
  398.     Disp("Bio Lab",1,4); Pick("lhz_dun");
  399. D7: Restrict("RE");
  400.     setarray @c[2],87,47,262,262;
  401.     Disp("Brasilis Dungeon",1,2); Pick("bra_dun");
  402. D8: Restrict("RE",6);
  403.     setarray @c[0],168,168,253,252,236,204,32,63,26,27,141,187;
  404.     Disp("Byalan Dungeon",1,6); Pick("iz_dun",1);
  405. D9: setarray @c[2],199,159,148,283,65,147,56,155,297,25,127,169,277,178,268,74;
  406.     Disp("Clock Tower 1:Clock Tower 2:Clock Tower 3:Clock Tower 4:Basement 1:Basement 2:Basement 3:Basement 4");
  407.     Pick("","c_tower1","c_tower2","c_tower3","c_tower4","alde_dun01","alde_dun02","alde_dun03","alde_dun04");
  408. D10: setarray @c[2],52,17,381,343,302,262;
  409.      Disp("Coal Mines",1,3); Pick("mjo_dun");
  410. D11: setarray @c[2],131,247,19,19,180,169,100,92;
  411.      Disp("Culvert",1,4); Pick("","prt_sewb1","prt_sewb2","prt_sewb3","prt_sewb4");
  412. D12: setarray @c[2],51,14,150,11,120,10;
  413.      Disp("Cursed Abbey",1,3); Pick("abbey");
  414. D13: Restrict("RE");
  415.      setarray @c[2],285,160,299,29;
  416.      Disp("Dewata Dungeon",1,2); Pick("dew_dun");
  417. D14: setarray @c[2],22,14,292,290;
  418.      Disp("Einbroch Dungeon",1,2); Pick("ein_dun");
  419. D15: setarray @c[2],40,103,203,34,266,168,130,272;
  420.      Disp("Gefenia",1,4); Pick("gefenia",0);
  421. D16: setarray @c[0],104,99,115,236,106,132,203,200;
  422.      Disp("Geffen Dungeon",1,4); Pick("gef_dun",1);
  423. D17: setarray @c[2],370,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;
  424.      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");
  425.      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");
  426. D18: setarray @c[2],153,53,28,113,68,16;
  427.      Disp("Gonryun Dungeon",1,3); Pick("gon_dun");
  428. D19: setarray @c[2],176,7,93,20,23,8;
  429.      Disp("Hidden Dungeon",1,3); Pick("prt_maze");
  430. D20: setarray @c[2],157,14,151,155,149,22,33,158;
  431.      Disp("Ice Dungeon",1,4); Pick("ice_dun");
  432. D21: setarray @c[2],140,51,53,247,37,63,150,285;
  433.      Disp("Entrance:Juperos 1:Juperos 2:Core");
  434.      Pick("","jupe_cave","juperos_01","juperos_02","jupe_core");
  435. D22: setarray @c[2],28,226,41,198;
  436.      Disp("Kiel Dungeon",1,2); Pick("kh_dun");
  437. D23: setarray @c[2],218,196,282,20,165,38;
  438.      Disp("The Royal Tomb:Inside the Royal Tomb:Suei Long Gon"); Pick("lou_dun");
  439. D24: setarray @c[2],126,68,47,30;
  440.      Disp("Magma Dungeon",1,2); Pick("mag_dun");
  441. D25: Restrict("RE");
  442.      setarray @c[2],33,230;
  443.      Disp("Malangdo Dungeon",1,1); Pick("mal_dun");
  444. D26: setarray @c[2],189,48,165,30,32,135;
  445.      Disp("Moscovia Dungeon",1,3); Pick("mosk_dun");
  446. D27: setarray @c[2],61,239,60,271;
  447.      Disp("Nidhogg's Dungeon",1,2); Pick("nyd_dun");
  448. D28: setarray @c[2],298,167,224,149,266,280;
  449.      Disp("Odin Temple",1,3); Pick("odin_tem");
  450. D29: setarray @c[2],32,170,21,185;
  451.      Disp("Orc Dungeon",1,2); Pick("orcsdun");
  452. D30: setarray @c[0],21,183,19,33,19,63,155,159,201,204;
  453.      Disp("Payon Dungeon",1,5); Pick("pay_dun",1);
  454. D31: Restrict("RE",7,8);
  455.      setarray @c[2],192,9,10,192,100,92,181,11,94,96,192,8,94,96,192,8;
  456.      Disp("Pyramids 1:Pyramids 2:Pyramids 3:Pyramids 4:Basement 1:Basement 2:Basement 1 - Nightmare Mode:Basement 2 - Nightmare Mode");
  457.      Pick("","moc_pryd01","moc_pryd02","moc_pryd03","moc_pryd04","moc_pryd05","moc_pryd06","moc_prydn1","moc_prydn2");
  458. D32: setarray @c[2],140,11,32,21,8,149,204,218,150,9;
  459.      Disp("Rachel Sanctuary",1,5); Pick("ra_san");
  460. D33: Restrict("RE");
  461.      setarray @c[2],364,44,101,141;
  462.      Disp("Scaraba Hole",1,2); Pick("dic_dun");
  463. D34: setarray @c[2],288,9,149,81,210,54,10,222,100,99;
  464.      Disp("Sphinx",1,5); Pick("","in_sphinx1","in_sphinx2","in_sphinx3","in_sphinx4","in_sphinx5");
  465. D35: setarray @c[2],69,24,102,27;
  466.      Disp("Sunken Ship",1,2); Pick("treasure");
  467. 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;
  468.      Disp("Thanatos Tower",1,12); Pick("tha_t");
  469. D37: setarray @c[2],21,228,75,205,34,272;
  470.      Disp("Thor Volcano",1,3); Pick("thor_v");
  471. D38: setarray @c[2],205,15,129,133;
  472.      Disp("Toy Factory",1,2); Pick("xmas_dun");
  473. D39: setarray @c[2],154,49,148,261,132,189,100,192;
  474.      Disp("Entrance:Turtle Dungeon 1:Turtle Dungeon 2:Turtle Dungeon 3"); Pick("tur_dun");
  475. D40: Restrict("Pre-RE",1,2);
  476.      setarray @c[2],42,31,48,30,204,78;
  477.      Disp("Carpenter's Shop in the Tree:Passage to a Foreign World:Hvergermil's Fountain");
  478.      Pick("","um_dun01","um_dun02","yggdrasil01");
  479. D41: Restrict("RE");
  480.      setarray @c[2],57,13,64,88,45,14,26,23;
  481.      Disp("Bifrost Tower",1,4); Pick("ecl_tdun");
  482.  
  483. // --------------------------------------------------
  484.     Castles:
  485. // --------------------------------------------------
  486. menu    "Aldebaran Castles",C1, "Geffen Castles",C2, "Payon Castles",C3,
  487.         "Prontera Castles",C4, "Arunafeltz Castles",C5, "Schwaltzvalt Castles",C6;
  488.  
  489. C1: setarray @c[2],48,83,95,249,142,85,239,242,264,90;
  490.     Disp("Neuschwanstein:Hohenschwangau:Nuenberg:Wuerzburg:Rothenburg");
  491.     Pick("","alde_gld","alde_gld","alde_gld","alde_gld","alde_gld");
  492. C2: setarray @c[2],214,75,308,240,143,240,193,278,305,87;
  493.     Disp("Repherion:Eeyolbriggar:Yesnelph:Bergel:Mersetzdeitz");
  494.     Pick("","gef_fild13","gef_fild13","gef_fild13","gef_fild13","gef_fild13");
  495. C3: setarray @c[2],121,233,295,116,317,293,140,160,204,266;
  496.     Disp("Bright Arbor:Scarlet Palace:Holy Shadow:Sacred Altar:Bamboo Grove Hill");
  497.     Pick("","pay_gld","pay_gld","pay_gld","pay_gld","pay_gld");
  498. C4: setarray @c[2],134,65,240,128,153,137,111,240,208,240;
  499.     Disp("Kriemhild:Swanhild:Fadhgridh:Skoegul:Gondul");
  500.     Pick("","prt_gld","prt_gld","prt_gld","prt_gld","prt_gld");
  501. C5: setarray @c[2],158,272,83,47,68,155,299,345,292,107;
  502.     Disp("Mardol:Cyr:Horn:Gefn:Banadis");
  503.     Pick("","aru_gld","aru_gld","aru_gld","aru_gld","aru_gld");
  504. C6: setarray @c[2],293,100,288,252,97,196,137,90,71,315;
  505.     Disp("Himinn:Andlangr:Viblainn:Hljod:Skidbladnir");
  506.     Pick("","sch_gld","sch_gld","sch_gld","sch_gld","sch_gld");
  507.  
  508. // --------------------------------------------------
  509.     Guild_Dungeons:
  510. // --------------------------------------------------
  511. menu    "Baldur",G1, "Luina",G2, "Valkyrie",G3, "Britoniah",G4,
  512.         "Arunafeltz",G5, "Schwaltzvalt",G6;
  513.  
  514. G1: Restrict("RE",2,3);
  515.     setarray @c[2],119,93,119,93,120,130;
  516.     Disp("Baldur F1:Baldur F2:Hall of Abyss");
  517.     Pick("","gld_dun01","gld_dun01_2","gld2_pay");
  518. G2: Restrict("RE",2,3);
  519.     setarray @c[2],39,161,39,161,147,155;
  520.     Disp("Luina F1:Luina F2:Hall of Abyss");
  521.     Pick("","gld_dun02","gld_dun02_2","gld2_ald");
  522. G3: Restrict("RE",2,3);
  523.     setarray @c[2],50,44,50,44,140,132;
  524.     Disp("Valkyrie F1:Valkyrie F2:Hall of Abyss");
  525.     Pick("","gld_dun03","gld_dun03_2","gld2_prt");
  526. G4: Restrict("RE",2,3);
  527.     setarray @c[2],116,45,116,45,152,118;
  528.     Disp("Britoniah F1:Britoniah F2:Hall of Abyss");
  529.     Pick("","gld_dun04","gld_dun04_2","gld2_gef");
  530. G5: Go("arug_dun01",199,195);
  531. G6: Go("schg_dun01",200,124);
  532.  
  533. // --------------------------------------------------
  534.     Instances:
  535. // --------------------------------------------------
  536. menu    "Bakonawa Lake",I1, "Bangungot Hospital 2F",I2, "Buwaya Cave",I3,
  537.         "Endless Tower",I4, "Hazy Forest",I5, "Malangdo Culvert",I6, "Nidhoggur's Nest",I7,
  538.         "Octopus Cave",I8, "Old Glast Heim",I9, "Orc's Memory",I10, "Sealed Shrine",I11,
  539.         "Wolfchev's Laboratory",I12;
  540.  
  541. I1: Restrict("RE");
  542.     Go("ma_scene01",172,175);
  543. I2: Restrict("RE");
  544.     Go("ma_dun01",151,8);
  545. I3: Restrict("RE");
  546.     Go("ma_fild02",316,317);
  547. I4: Go("e_tower",72,112);
  548. I5: Restrict("RE");
  549.     Go("bif_fild01",161,334);
  550. I6: Restrict("RE");
  551.     Go("mal_in01",164,21);
  552. I7: Go("nyd_dun02",95,193);
  553. I8: Restrict("RE");
  554.     Go("mal_dun01",152,230);
  555. I9: Restrict("RE");
  556.     Go("glast_01",204,268);
  557. I10: Go("gef_fild10",240,198);
  558. I11: Go("monk_test",306,143);
  559. I12: Restrict("RE");
  560.     Go("lhz_dun04",148,269);
  561.  
  562. // --------------------------------------------------
  563.     Special:
  564. // --------------------------------------------------
  565. menu    "Auction Hall",S1, "Battlegrounds",S2, "Casino",S3, "Eden Group Headquarters",S4,
  566.         "Gonryun Arena",S5, "Izlude Arena",S6, "Monster Race Arena",S7, "Turbo Track",S8;
  567.  
  568. S1: Go("auction_01",22,68);
  569. S2: Go("bat_room",154,150);
  570. S3: Go("cmd_in02",179,129);
  571. S4: Restrict("RE");
  572.     Go("moc_para01",31,14);
  573. S5: Go("gon_test",48,10);
  574. S6: Go("arena_room",100,88);
  575. S7: Go("p_track01",62,41);
  576. S8: Go("turbo_room",99,114);
  577. }
  578.  
  579. // --------------------------------------------------
  580. //  Duplicates:
  581. // --------------------------------------------------
  582. alb2trea,57,70,6    duplicate(Warper)   Warper#tre  4_F_VALKYRIE
  583. alberta,28,240,4    duplicate(Warper)   Warper#alb  4_F_VALKYRIE
  584. aldebaran,145,118,4 duplicate(Warper)   Warper#alde 4_F_VALKYRIE
  585. amatsu,203,87,4 duplicate(Warper)   Warper#ama  4_F_VALKYRIE
  586. ayothaya,209,169,6  duplicate(Warper)   Warper#ayo  4_F_VALKYRIE
  587. comodo,194,158,4    duplicate(Warper)   Warper#com  4_F_VALKYRIE
  588. einbech,59,38,6 duplicate(Warper)   Warper#einbe    4_F_VALKYRIE
  589. einbroch,69,202,4   duplicate(Warper)   Warper#einbr    4_F_VALKYRIE
  590. gef_fild10,71,339,4 duplicate(Warper)   Warper#orc  4_F_VALKYRIE
  591. geffen,124,72,4 duplicate(Warper)   Warper#gef  4_F_VALKYRIE
  592. glast_01,372,308,4  duplicate(Warper)   Warper#glh  4_F_VALKYRIE
  593. gonryun,190,148,4   duplicate(Warper)   Warper#gon  4_F_VALKYRIE
  594. hugel,101,151,4 duplicate(Warper)   Warper#hug  4_F_VALKYRIE
  595. izlu2dun,110,92,4   duplicate(Warper)   Warper#izd  4_F_VALKYRIE
  596. izlude,134,150,4    duplicate(Warper)   Warper#izl  4_F_VALKYRIE    //Pre-RE: (132,120)
  597. jawaii,253,138,4    duplicate(Warper)   Warper#jaw  4_F_VALKYRIE
  598. lighthalzen,162,102,4   duplicate(Warper)   Warper#lhz  4_F_VALKYRIE
  599. louyang,208,103,6   duplicate(Warper)   Warper#lou  4_F_VALKYRIE
  600. manuk,274,146,6 duplicate(Warper)   Warper#man  4_F_VALKYRIE
  601. mid_camp,216,288,4  duplicate(Warper)   Warper#mid  4_F_VALKYRIE
  602. mjolnir_02,85,364,4 duplicate(Warper)   Warper#mjo  4_F_VALKYRIE
  603. moc_ruins,64,164,4  duplicate(Warper)   Warper#moc  4_F_VALKYRIE
  604. morocc,159,97,4 duplicate(Warper)   Warper#mor  4_F_VALKYRIE
  605. moscovia,229,191,4  duplicate(Warper)   Warper#mos  4_F_VALKYRIE
  606. nameless_n,259,213,4    duplicate(Warper)   Warper#nam  4_F_VALKYRIE
  607. niflheim,205,179,4  duplicate(Warper)   Warper#nif  4_F_VALKYRIE
  608. pay_arche,42,134,4  duplicate(Warper)   Warper#arc  4_F_VALKYRIE
  609. payon,182,108,4 duplicate(Warper)   Warper#pay  4_F_VALKYRIE
  610. prontera,161,192,4  duplicate(Warper)   Warper#prt  4_F_VALKYRIE
  611. prt_fild05,279,223,6    duplicate(Warper)   Warper#cul  4_F_VALKYRIE
  612. rachel,135,116,4    duplicate(Warper)   Warper#rac  4_F_VALKYRIE
  613. splendide,205,153,4 duplicate(Warper)   Warper#spl  4_F_VALKYRIE
  614. thor_camp,249,76,4  duplicate(Warper)   Warper#thor 4_F_VALKYRIE
  615. umbala,106,150,3    duplicate(Warper)   Warper#umb  4_F_VALKYRIE
  616. veins,214,123,4 duplicate(Warper)   Warper#ve   4_F_VALKYRIE
  617. xmas,150,136,6  duplicate(Warper)   Warper#xmas 4_F_VALKYRIE
  618. yuno,162,47,4   duplicate(Warper)   Warper#yuno 4_F_VALKYRIE
  619.  
  620. // --------------------------------------------------
  621. //  Duplicates (Renewal):
  622. // --------------------------------------------------
  623. brasilis,201,222,4  duplicate(Warper)   Warper#bra  4_F_VALKYRIE
  624. dewata,204,186,6    duplicate(Warper)   Warper#dew  4_F_VALKYRIE
  625. dicastes01,194,194,6    duplicate(Warper)   Warper#dic  4_F_VALKYRIE
  626. ecl_in01,51,60,4    duplicate(Warper)   Warper#ecl  4_F_VALKYRIE
  627. malangdo,134,117,6  duplicate(Warper)   Warper#mal  4_F_VALKYRIE
  628. malaya,231,204,4    duplicate(Warper)   Warper#ma   4_F_VALKYRIE
  629. mora,57,152,4   duplicate(Warper)   Warper#mora 4_F_VALKYRIE
  630.  
Tags: ragnarok AdobeRO
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!