// ------------------------------------------------------------------------------------------
// ------ rAthena Script Release
// Title: Super Kafra "All In One" Script
// Author: jTynne - [email protected]
// Current Version: 1.0 (Public), December 7th, 2011
// Version History:
// v1.0: This is the unoptimized release of a Kafra upgrade script.
// Features:
// Healer, Storage, Mail, Auctions, Skill/Status Reset,
// Last Warp Function, Login Event Options
// Important: Future revisions will adjust placement/NPC directions.
// Notes:
// Feel free to adjust this script to your liking. Please do not redistribute
// without giving proper credit and a link back to my site. (justintynne.com)
// Thank you!
// ------------------------------------------------------------------------------------------
- script Player Services::allinone 864,{
// Options
// To enable a feature, set it to 1.
// Refer to the comments to the right for full details.
set $pshealer,1; // Allow free 100% heals when NPC is spoken to. Default: Enabled (1)
set $healanywhere,0; // Allow players to heal from maps not flagged as 'town' maps. Default: Disabled (0)
set $storageanywhere,0; // Allow storage access from maps not flagged as 'town' maps. Default: Disabled (0)
set $mailanywhere,0; // Allow mail access from maps not flagged as 'town' maps. Default: Disabled (0) Note: You must set each map as a "town" via mapflag. See npc/other/mail.txt for the format. If you fail to do this, mail cannot be accessed from many maps.
set .@n$,"^003377[ Player Services ]^006699"; // Name displayed in the NPC's dialogue. Changes NPC dialogue colors as well. Default: Player Services, 003377 (Name), 006699 (Content)
set $saveanywhere,0; // Allow players to save from maps not flagged as 'town' maps. Default: Disabled (0)
set $auctionanywhere,0; // Allow players to access auction window from maps not flagged as 'town' maps. Default: Disabled (0)
set $resetanywhere,0; // Allow players to save from maps not flagged as 'town' maps. Default: Disabled (0)
//set $allresetprice,50000; // Price to reset both Status and Skill Points. Default: 50,000z
//set $skresetprice,35000; // Price to reset Skill Points. Default: 35,000z
//set $stresetprice,35000; // Price to reset Status Points. Default: 35,000z
getmapxy (.@map$, .@x, .@y, 0);
if($pshealer == 1) {
if($healanywhere == 0) { if(getmapflag(.@map$,mf_town) == 1) {
percentheal 100,100;}}}
if(isnight() == 1) { set .@daynight$,"this evening"; }
else { set .@daynight$,"this fine day"; }
mes .@n$;
mes "Hello, "+strcharinfo(0)+"! I'm able to teleport you to various locations, open your storage or mail, set your save point to your current location, or adjust your account options.";
mes "How may I assist you "+.@daynight$+"?";
next;
menu "Previous Warp (^0374BB"+lastwarpname$+"^000000)",L_last,"Town Warps",L_town,"LvL Warps",L_warp,"Dungeon Warps",L_dungeon,"Save (Current Location)",L_save,"Open Storage",L_storage,"Open Mail",L_mail,"Account Options",L_options,"Show Auctions",L_auction,"Skill/Stat Reset",L_reset;
L_town:
mes .@n$;
mes "Please select your destination.";
next;
menu "^006644Prontera^000000 (^ff0000" + getmapusers("prontera") + "^000000)",wprontera,"Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Ayothaya",wayothaya,"Brasilis",wbrasilis,"Comodo",wcomodo,"Dewata",wdewata,"Eclage",weclage,"Einbroch",weinbroch,"Einbech",weinbech,"El Dicastes",wdicastes,"Geffen",wgeffen,"Gonryun",wgonryun,"Hugel",whugel,"Izlude",wizlude,"Lighthalzen",wlighthalzen,"Louyang",wlouyang,"Lutie",wxmas,"Jawaii",wjawaii,"Malangdo Island",wmalangdo,"Manuk",wmanuk,"Midgard Camp",wmidcamp,"Moscovia",wmoscovia,"Morroc",wmorroc,"Morroc Ruins",wmocruins,"Niflheim",wniflheim,"Payon",wpayon,"Paros Lighthouse",wparos,"Port Malaya",wmalaya,"Umbala",wumbala,"Rachel",wrach,"Splendide",wsplendide,"Veins",wveins,"Yuno",wyuno;
L_warp:
mes "Here are my Warps =)";
menu "LvL 1-10",L_lvl1,"LvL 10-25",L_lvl2,"LvL 25-55",L_lvl3,"LvL 55-80",L_lvl4,"LvL 80-99",L_lvl5,"Lvl 99-110",L_lvl6,"LvL 110-135",L_lvl7,"LvL 135-160",L_lvl8,"LvL 160-210",L_lvl9,"LvL 210-260",L_lvl10;
L_dungeon:
mes .@n$;
mes "Please select your destination.";
next;
menu "Abyss Lake",L_abyss,"Alien Dungeon",dalien,"Amatsu Dungeon",L_amatsu,"Anthell",L_ant,"Ayothaya Dungeon",L_ayothaya,"Bibilan Dungeon",L_bibilan,"Biolabs Dungeon",L_lhzbio,"Brasilis Dungeon",L_brasilis,"Coal Mine (Dead Pit)",L_coal,"Culvert",L_culvert,"Dewata Dungeon",L_dewata,"Doll Factory",L_doll,"Einbech Dungeon",L_ein,"Geffen Dungeon",L_gef,"Geffenia",L_gefenia,"Glast Heim",L_glast,"Glast Heim Sewers",L_glasts,"Gonryun Dungeon",L_gonryun,"Hidden Temple (Alde.)",L_hidden1,"Hidden Temple (Pront.)",L_hidden2,"Ice Dungeon",L_ice,"Juperos",L_juperos,"Louyang Dungeon",L_lou,"Magma Dungeon",L_magma,"Moscovia Forest",L_mosc,"Nameless Island",L_name,"Nydhogg Dungeon",dnyd,"Odin Temple",L_odin,"Orc Dungeon",dorc,"Orc's Memory",dorcmem,"Payon Dungeon",L_payon,"Pyramids",L_pyramids,"Rachel Sanctuary",L_rachel,"Sealed Shrine",L_sealed,"Sphinx",L_sphinx,"Sunken Ship",L_sunken,"Thanatos Tower",L_thanatos,"Thor's Volcano",L_thors,"Toy Factory",L_toy,"Turtle Dungeon",L_turtle,"Umbala Dungeon",dumbala,"Yggdrasil Tree",dyggdrasil;
L_abyss:
menu "Abyss 1",dabbys1,"Abyss 2",dabbys2,"Abyss 3",dabbys3;
L_amatsu:
menu "Amatsu 1",damatsu1,"Amatsu 2",damatsu2,"Amatsu 3",damatsu3;
L_ant:
menu "Ant Hell 1",dant1,"Ant Hell 2",dant2;
L_ayothaya:
menu "Ayothaya 1",dayothaya1,"Ayothaya 2",dayothaya2;
L_bibilan:
menu "Bibilan 1",dbibilan1,"Bibilan 2",dbibilan2"Bibilan 3",dbibilan3"Bibilan 4",dbibilan4"Bibilan 5",dbibilan5;
L_culvert:
menu "Culvert 1",dculvert1,"Culvert 2",dculvert2,"Culvert 3",dculvert3,"Culvert 4",dculvert4;
L_coal:
menu "Coal 1",dcoal1,"Coal 2",dcoal2,"Coal 3",dcoal3;
L_doll:
menu "Doll Factory 1",ddoll1,"Doll Factory 2",ddoll2;
L_ein:
menu "Einbech 1",dein1,"Einbech 2",dein2;
L_gef:
menu "Geffen 1",dgef1,"Geffen 2",dgef2,"Geffen 3",dgef3,"Geffen 4",dgef4;
L_glast:
menu "Glast Church 1",dglast1"Glast Church 2",dglast2;
L_glasts:
menu "Glast Sewer 1",dglasts1,"Glast Sewer 2",dglasts2,"Glast Sewer 3",dglasts3;
L_gonryun:
menu "Gonryun 1",dgonryun1,"Gonryun 2",dgonryun2,"Gonryun 3",dgonryun3;
L_magma:
menu "Magma 1",dmagma1,"Magma 2",dmagma2;
L_mosc:
menu "Moscovia 1",dmosc1,"Moscovia 2",dmosc2,"Moscovia 3",dmosc3;
L_name:
menu "Nameless 1",dname1,"Nameless 2",dname2,"Nameless 3",dname3;
L_brasilis:
menu "Brasilis 1",dbrasilis1,"Brasilis 2",dbrasilis2;
L_lou:
menu "Louyang 1",dlou1,"Louyang 2",dlou2;
L_gefenia:
menu "Gefenia 1",dgefenia1,"Gefenia 2",dgefenia2,"Gefenia 3",dgefenia3,"Gefenia 4",dgefenia4;
L_ice:
menu "Ice 1",dice1,"Ice 2",dice2,"Ice 3",dice3;
L_thors:
menu "Thors 1",dthors1,"Thors 2",dthors2,"Thors 3",dthors3;
L_lhzbio:
menu "Bio 1",dlhzbio1,"Bio 2",dlhzbio2,"Bio 3",dlhzbio3;
L_rachel:
menu "Rachel 1",drachel1,"Rachel 2",drachel2,"Rachel 3",drachel3,"Rachel 4",drachel4,"Rachel 5",drachel5;
L_turtle:
menu "Turtle 1",dturtle1,"Turtle 2",dturtle2,"Turtle 3",dturtle3,"Turtle 4",dturtle4;
L_toy:
menu "Toy 1",dtoy1,"Toy 2",dtoy2;
L_thanatos:
menu "Thanatos 1",dthanatos1,"Thanatos 2",dthanatos2,"Thanatos 3",dthanatos3,"Thanatos 4",dthanatos4,"Thanatos 5",dthanatos5,"Thanatos 6",dthanatos6,"Thanatos 7",dthanatos7,"Thanatos 8",dthanatos8,"Thanatos 9",dthanatos9,"Thanatos 10",dthanatos10,"Thanatos 11",dthanatos11,"Thanatos 12",dthanatos12;
L_sunken:
menu "Sunken 1",dsunken1,"Sunken 2",dsunken2;
L_sphinx:
menu "Sphinx 1",dsphinx1,"Sphinx 2",dsphinx2,"Sphinx 3",dsphinx3,"Sphinx 4",dsphinx4,"Sphinx 5",dsphinx5;
L_pyramids:
menu "Pyramid 1",dpyramids1,"Pyramid 2",dpyramids2,"Pyramid 3",dpyramids3,"Pyramid 4",dpyramids4,"Pyramid 5",dpyramids5,"Pyramid 6",dpyramids6;
L_payon:
menu "Payon 1",dpayon1,"Payon 2",dpayon2,"Payon 3",dpayon3,"Payon 4",dpayon4,"Payon 5",dpayon5;
L_orc:
menu "Orc 1",dorc1,"Orc 2",dorc2;
L_odin:
menu "Odin 1",dodin1,"Odin 2",dodin2,"Odin 3",dodin3;
L_mail:
if($mailanywhere == 0) { if(getmapflag(.@map$,mf_town) == 0) {
mes .@n$;
mes "The administrative team has chosen to restrict mail from being accessed outside of town maps. Please head to the nearest town to access your mail.";
close; end;
}}
if(#mailpw == 1) {
mes .@n$;
mes "Please insert your mail password to continue.";
next;
input .@pw$;
if(.@pw$ == #mailpw$) {
mes .@n$;
mes "Would you like to simply open your mail, set an account password for extra security, or remove your mail password (not recommended)?";
next;
menu "Open Mail",-,"Set Mail Password",L_mpass,"Remove Password",L_pwmremove;
close2;
openmail;
end;
}
else {
mes .@n$;
mes "The password you inserted does not match the password on record for this account. Please try again.";
close;
end;
}
}
else {
mes .@n$;
mes "Would you like to simply open your mail, or set an account password for extra security?";
next;
menu "Open Mail",-,"Set Mail Password",L_mpass;
close2;
openmail;
end;
}
L_mpass:
mes .@n$;
mes "What would you like your password to be?";
next;
input .@temp1$;
mes .@n$;
mes "Please confirm that the password you entered is correct by re-typing it:";
next;
input .@temp2$;
if(.@temp1$ == .@temp2$) {
set #mailpw$,.@temp1$;
set #mailpw,1;
mes .@n$;
mes "Your mail password has been set to: ^FF0000"+#mailpw$+"^000000";
close;
end;
}
else {
mes .@n$;
mes "The passwords you've input do not match. Please try again.";
close;
end;
}
L_pwmremove:
mes .@n$;
mes "Your mail password has been removed.";
set #mailpw,0;
set #mailpw$,"null";
close;
end;
L_storage:
if($storageanywhere == 1) { if(getmapflag(.@map$,mf_town) == 0) {
mes .@n$;
mes "The administrative team has chosen to restrict storage from being accessed outside of town maps. Please head to the nearest town to access your storage.";
close; end;
}}
if(#storagepw == 1) {
mes .@n$;
mes "Please insert your storage password to continue.";
next;
input .@pw$;
if(.@pw$ == #storagepw$) {
mes .@n$;
mes "Would you like to simply open your storage, set an account password for extra security, or remove your storage password (not recommended)?";
next;
menu "Open Storage",-,"Set Storage Password",L_stpass,"Remove Password",L_pwremove;
close2;
openstorage;
end;
}
else {
mes .@n$;
mes "The password you inserted does not match the password on record for this account. Please try again.";
close;
end;
}
}
else {
mes .@n$;
mes "Would you like to simply open your storage, or set an account password for extra security?";
next;
menu "Open Storage",-,"Set Storage Password",L_stpass;
close2;
openstorage;
end;
}
L_stpass:
mes .@n$;
mes "What would you like your password to be?";
next;
input .@temp1$;
mes .@n$;
mes "Please confirm that the password you entered is correct by re-typing it:";
next;
input .@temp2$;
if(.@temp1$ == .@temp2$) {
set #storagepw$,.@temp1$;
set #storagepw,1;
mes .@n$;
mes "Your storage password has been set to: ^FF0000"+#storagepw$+"^000000";
close;
end;
}
else {
mes .@n$;
mes "The passwords you've input do not match. Please try again.";
close;
end;
}
L_pwremove:
mes .@n$;
mes "Your storage password has been removed.";
set #storagepw,0;
set #storagepw$,"null";
close;
end;
L_save:
if($saveanywhere == 1) { if(getmapflag(.@map$,mf_town) == 0) {
mes .@n$;
mes "The administrative team has chosen to restrict save point locations from being accessed outside of town maps. Please head to the nearest town to set your save point.";
close; end;
}}
savepoint .@map$,.@x,.@y;
mes .@n$;
mes "Your save point has been updated to your current location: ^FF0000"+.@map$+", "+.@x+", "+.@y+"^000000.";
close;
end;
L_last:
if(lastx < 1) goto L_notsetup;
warp lastwarp$, lastx, lasty; end;
L_notsetup:
mes .@n$;
mes "You have to warp somewhere first!";
close;
end;
L_auction:
if($auctionanywhere == 0) { if(getmapflag(.@map$,mf_town) == 0) {
mes .@n$;
mes "The administrative team has chosen to restrict auctions from being accessed outside of town maps. Please head to the nearest town to view the auction listings.";
close; end;
}}
mes .@n$;
mes "As you wish, here are the latest auctions.";
close2;
OpenAuction;
end;
L_reset:
if($resetanywhere == 1) { if(getmapflag(.@map$,mf_town) == 0) {
mes .@n$;
mes "The administrative team has chosen to restrict skill/stat resets from being performed outside of town maps. Please head to the nearest town to perform this action.";
close; end;
}}
mes .@n$;
mes "What would you like to reset?";
next;
menu "Skills ("+$skresetprice+" Zeny)",L_skillreset,"Stats ("+$stresetprice+" Zeny)",L_statreset,"Both ("+$allresetprice+" Zeny)",L_allreset;
L_skillreset:
if(Zeny < $skresetprice) goto L_nozeny;
mes .@n$;
mes "Your skills have been reset.";
set Zeny,Zeny - $skresetprice;
ResetSkill;
close;
end;
L_statreset:
if(Zeny < $stresetprice) goto L_nozeny;
mes .@n$;
mes "Your stats have been reset.";
set Zeny,Zeny - $stresetprice;
ResetStatus;
close;
end;
L_allreset:
if(Zeny < $allresetprice) goto L_nozeny;
mes .@n$;
mes "Your skills and stats have been reset.";
set Zeny,Zeny - $allresetprice;
ResetSkill;
ResetStatus;
close;
end;
L_options:
set @reset$,"^000000";
set @disabled$,"^BE1C1C";
set @enabled$,"^0DB40D";
L_usermenu:
mes .@n$;
mes "You can change the way the game works here.";
mes "Note: These are all account based, not per-character.";
mes "Note 2: You must relog for them to take effect.";
next;
if (#set_main == 0) set @st_main$,@disabled$+"Off"+@reset$;
if (#set_main > 0) set @st_main$,@enabled$+"On"+@reset$;
if (#set_autoloot == 0) set @st_autoloot$,@disabled$+"Off"+@reset$;
if (#set_autoloot > 0) set @st_autoloot$,@enabled$+#set_autoloot+"%"+@reset$;
if (#set_showdelay == 0) set @st_showdelay$,@disabled$+"Off"+@reset$;
if (#set_showdelay > 0) set @st_showdelay$,@enabled$+"On"+@reset$;
if (#set_showexp == 0) set @st_showexp$,@disabled$+"Off"+@reset$;
if (#set_showexp > 0) set @st_showexp$,@enabled$+"On"+@reset$;
if (#set_showzeny == 0) set @st_showzeny$,@disabled$+"Off"+@reset$;
if (#set_showzeny > 0) set @st_showzeny$,@enabled$+"On"+@reset$;
if (#set_uptime == 0) set @st_uptime$,@disabled$+"Off"+@reset$;
if (#set_uptime > 0) set @st_uptime$,@enabled$+"On"+@reset$;
if (#set_mail == 0) set @st_mail$,@disabled$+"Off"+@reset$;
if (#set_mail > 0) set @st_mail$,@enabled$+"On"+@reset$;
if (#set_ks == 0) set @st_ks$,@disabled$+"Off"+@reset$;
if (#set_ks > 0) set @st_ks$,@enabled$+"On"+@reset$;
menu "Main Chat ["+@st_main$+"]",e_main,"Kill Stealing ["+@st_ks$+"]",e_ks,"Auto Loot ["+@st_autoloot$+"]",e_autoloot,"Show Delay ["+@st_showdelay$+"]",e_showdelay,"Show Exp ["+@st_showexp$+"]",e_showexp,"Show Zeny ["+@st_showzeny$+"]",e_showzeny,"Uptime on login ["+@st_uptime$+"]",e_uptime,"Mail On Login ["+@st_mail$+"]",e_mailz;
e_main:
mes .@n$;
mes "Enable @main on login "+@st_main$;
mes "Desc: Turn main chat on automatically each time you login.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_main == 0) {
set #set_main,1;
goto L_usermenu;
}
if (#set_main == 1) {
set #set_main,0;
goto L_usermenu;
}
e_ks:
mes .@n$;
mes "Enable @noks (kill stealing protection) on login "+@st_ks$;
mes "Desc: Turn no kill stealing on automatically each time you login.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_ks == 0) {
set #set_ks,1;
goto L_usermenu;
}
if (#set_ks == 1) {
set #set_ks,0;
goto L_usermenu;
}
e_autoloot:
mes .@n$;
mes "Auto Loot is currently "+@st_autoloot$;
mes "Desc: Auto loot adds items to your inventory automatically.";
next;
menu "Toggle",-,"Back",L_usermenu;
mes .@n$;
mes "Auto Loot is currently "+@st_autoloot$;
mes "Enter the minimum rate an item must drop at before it it looted, 100 will loot all items, 99 will only loot cards, 0 disables it.";
next;
input @rate;
if ((@rate >= 0) && (@rate <= 100)) set #set_autoloot,@rate;
goto L_usermenu;
e_showdelay:
mes .@n$;
mes "Show Delay is currently "+@st_showdelay$;
mes "Desc: When a skill fails because of delay, it will be hidden.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_showdelay == 0) {
set #set_showdelay,1;
goto L_usermenu;
}
if (#set_showdelay == 1) {
set #set_showdelay,0;
goto L_usermenu;
}
e_showexp:
mes .@n$;
mes "Show Exp is currently "+@st_showexp$;
mes "Desc: When you gain exp, it will be displayed.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_showexp == 0) {
set #set_showexp,1;
goto L_usermenu;
}
if (#set_showexp == 1) {
set #set_showexp,0;
goto L_usermenu;
}
e_showzeny:
mes .@n$;
mes "Show Zeny is currently "+@st_showzeny$;
mes "Desc: When you gain zeny, it will be displayed.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_showzeny == 0) {
set #set_showzeny,1;
goto L_usermenu;
}
if (#set_showzeny == 1) {
set #set_showzeny,0;
goto L_usermenu;
}
e_uptime:
mes .@n$;
mes "Uptime on login is currently "+@st_uptime$;
mes "Desc: When you log in, server uptime will be displayed.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_uptime == 0) {
set #set_uptime,1;
goto L_usermenu;
}
if (#set_uptime == 1) {
set #set_uptime,0;
goto L_usermenu;
}
e_who:
mes .@n$;
mes "@who on login is currently "+@st_who$;
mes "Desc: When you log in, players online will be displayed.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_who == 0) {
set #set_who,1;
goto L_usermenu;
}
if (#set_who == 1) {
set #set_who,0;
goto L_usermenu;
}
e_mailz:
mes .@n$;
mes "Open inbox on login is currently "+@st_mail$;
mes "Desc: When you log in, if you're in Prontera your mail inbox will open.";
next;
menu "Toggle",-,"Back",L_usermenu;
if (#set_mail == 0) {
set #set_mail,1;
goto L_usermenu;
}
if (#set_mail == 1) {
set #set_mail,0;
goto L_usermenu;
}
end;
L_lvl1: callsub L_process,"anthell01",40,263,"LvL 1-10";
L_lvl2: callsub L_process,"pay_fild08",147,155,"LvL 10-25";
L_lvl3: callsub L_process,"pay_dun01",146,194,"LvL 25-55";
L_lvl4: callsub L_process,"pay_dun03",90,144,"LvL 55-80";
L_lvl5: callsub L_process,"ice_dun01",146,167,"LvL 80-99";
L_lvl6: callsub L_process,"juperos_01",212,128,"Lvl 99-110";
L_lvl7: callsub L_process,"abbey03",132,13,"LvL 110-135";
L_lvl8: callsub L_process,"thor_v01",147,205,"LvL 135-160";
L_lvl9: callsub L_process,"thor_v03",178,251,"LvL 160-210";
L_lvl10: callsub L_process,"lhz_dun03",138,135,"LvL 210-260";
walberta: callsub L_process,"alberta",27,236,"Alberta";
waldebaran: callsub L_process,"aldebaran",145,120,"Aldebaran";
wamatsu: callsub L_process,"amatsu",116,152,"Amatsu";
wayothaya: callsub L_process,"ayothaya",149,118,"Ayothoya";
wcomodo: callsub L_process,"comodo",188,161,"Comodo";
weinbroch: callsub L_process,"einbroch",64,200,"Einbroch";
weinbech: callsub L_process,"einbech",70,95,"Einbech";
wdewata: callsub L_process,"dewata",199,107,"Dewata";
wdicastes: callsub L_process,"dicastes01",198,195,"El Dicastes";
wgeffen: callsub L_process,"geffen",119,66,"Geffen";
wgonryun: callsub L_process,"gonryun",150,130,"Gonryun";
whugel: callsub L_process,"hugel",96,145,"Hugel";
wizlude: callsub L_process,"izlude",128,111,"Izlude";
wjawaii: callsub L_process,"jawaii",211,230,"Jawaii";
wlighthalzen: callsub L_process,"lighthalzen",158,92,"Lighthalzen";
wlouyang: callsub L_process,"louyang",210,108,"Louyang";
wmalangdo: callsub L_process,"malangdo",214,93,"Malangdo Island";
wmidcamp: callsub L_process,"mid_camp",210,283,"Midgard Camp";
wmorroc: callsub L_process,"morocc",159,93,"Morocc";
wmoscovia: callsub L_process,"moscovia",223,190,"Moscovia";
wniflheim: callsub L_process,"niflheim",35,161,"Niflheim";
wparos: callsub L_process,"cmd_fild07",131,129,"Paros Lighthouse";
wprontera: callsub L_process,"prontera",156,187,"Prontera";
wpayon: callsub L_process,"payon",176,103,"Payon";
wumbala: callsub L_process,"umbala",130,130,"Umbala";
wxmas: callsub L_process,"xmas",148,131,"Lutie";
wyuno: callsub L_process,"yuno",160,168,"Yuno";
wrach: callsub L_process,"rachel",130,110,"Rachel";
wsky: callsub L_process,"ra_temsky",100,86,"Sky Garden";
wveins: callsub L_process,"veins",216,127,"Veins";
wmocruins: callsub L_process,"moc_ruins",101,106,"Morocc Ruins";
wbrasilis: callsub L_process,"brasilis",199,140,"Brasilis";
wmanuk: callsub L_process,"manuk",189,186,"Manuk";
wsplendide: callsub L_process,"splendide",198,172,"Splendide";
weclage: callsub L_process,"eclage",107,35,"Eclage";
wmalaya: callsub L_process,"malaya",276,54,"Port Malaya";
dabbys1: callsub L_process,"abyss_01",260,270,"Abyss 1";
dabbys2: callsub L_process,"abyss_02",271,270,"Abyss 2";
dabbys3: callsub L_process,"abyss_03",115,30,"Abyss 3";
dalien: callsub L_process,"lhz_dun04",147,233,"Alien Dungeon";
damatsu1: callsub L_process,"ama_dun01",226,10,"Amatsu 1";
damatsu2: callsub L_process,"ama_dun02",45,48,"Amatsu 2";
damatsu3: callsub L_process,"ama_dun03",120,14,"Amatsu 3";
dant1: callsub L_process,"anthell_01",39,262,"Ant Hell 1";
dant2: callsub L_process,"anthell_02",36,263,"Ant Hell 2";
dayothaya1: callsub L_process,"ayo_dun01",30,280,"Ayothaya 1";
dayothaya2: callsub L_process,"ayo_dun02",230,239,"Ayothaya 2";
dbibilan1: callsub L_process,"iz_dun00",168,168,"Bibilan 1";
dbibilan2: callsub L_process,"iz_dun01",252,253,"Bibilan 2";
dbibilan3: callsub L_process,"iz_dun02",236,204,"Bibilan 3";
dbibilan4: callsub L_process,"iz_dun03",35,63,"Bibilan 4";
dbibilan5: callsub L_process,"iz_dun04",26,31,"Bibilan 5";
dculvert1: callsub L_process,"prt_sewb1",126,248,"Culvert 1";
dculvert2: callsub L_process,"prt_sewb2",19,19,"Culvert 2";
dculvert3: callsub L_process,"prt_sewb3",180,169,"Culvert 3";
dculvert4: callsub L_process,"prt_sewb4",103,90,"Culvert 5";
dcoal1: callsub L_process,"mjo_01",52,17,"Coal 1";
dcoal2: callsub L_process,"mjo_02",372,344,"Coal 2";
dcoal3: callsub L_process,"mjo_03",305,255,"Coal 3";
ddoll1: callsub L_process,"kh_dun01",17,222,"Doll Factory 1";
ddoll2: callsub L_process,"kh_dun02",31,209,"Doll Factory 2";
dein1: callsub L_process,"ein_dun01",22,16,"Einbech 1";
dein2: callsub L_process,"ein_dun02",284,286,"Einbech 2";
dgef1: callsub L_process,"gef_dun00",104,99,"Geffen 1";
dgef2: callsub L_process,"gef_dun01",115,236,"Geffen 2";
dgef3: callsub L_process,"gef_dun02",106,132,"Geffen 3";
dgef4: callsub L_process,"gef_dun03",203,200,"Geffen 4";
dglast1: callsub L_process,"gl_church",156,7,"Glast Church 1";
dglast2: callsub L_process,"gl_chyard",147,284,"Glast Church 2";
dglasts1: callsub L_process,"gl_sew01",258,255,"Glast Sewer 1";
dglasts2: callsub L_process,"gl_sew02",108,291,"Glast Sewer 2";
dglasts3: callsub L_process,"gl_sew03",171,283,"Glast Sewer 3";
dglasts3: callsub L_process,"gl_sew04",68,277,"Glast Sewer 4";
dgonryun1: callsub L_process,"gon_dun01",153,48,"Gonryun 1";
dgonryun2: callsub L_process,"gon_dun02",17,113,"Gonryun 2";
dgonryun3: callsub L_process,"gon_dun03",68,9,"Gonryun 3";
djuperos: callsub L_process,"yuno_fild07",218,176,"Juperos";
dmagma1: callsub L_process,"mag_dun01",126,68,"Magma 1";
dmagma2: callsub L_process,"mag_dun02",47,30,"Magma 2";
dmosc1: callsub L_process,"mosk_dun01",189,45,"Moscovia 1";
dmosc2: callsub L_process,"mosk_dun02",53,217,"Moscovia 2";
dmosc3: callsub L_process,"mosk_dun03",32,135,"Moscovia 3";
dname1: callsub L_process,"abbey01",51,12,"Nameless 1";
dname2: callsub L_process,"abbey02",149,11,"Nameless 2";
dname3: callsub L_process,"abbey03",119,8,"Nameless 3";
dodin1: callsub L_process,"odin_tem01",100,145,"Odin 1";
dodin2: callsub L_process,"odin_tem02",28,180,"Odin 2";
dodin3: callsub L_process,"odin_tem03",120,54,"Odin 3";
dorc1: callsub L_process,"orcsdun01",32,170,"Orc 1";
dorc2: callsub L_process,"orcsdun02",180,17,"Orc 2";
dorcmem: callsub L_process,"gef_fild10",242,199,"Orc's Memory";
dpayon1: callsub L_process,"pay_dun00",21,183,"Payon 1";
dpayon2: callsub L_process,"pay_dun01",19,33,"Payon 2";
dpayon3: callsub L_process,"pay_dun02",19,63,"Payon 3";
dpayon4: callsub L_process,"pay_dun03",155,159,"Payon 4";
dpayon5: callsub L_process,"pay_dun04",201,204,"Payon 5";
dpyramids1: callsub L_process,"moc_pryd01",191,10,"Pyramid 1";
dpyramids2: callsub L_process,"moc_pryd02",10,192,"Pyramid 2";
dpyramids3: callsub L_process,"moc_pryd03",12,18,"Pyramid 3";
dpyramids4: callsub L_process,"moc_pryd04",12,18,"Pyramid 4";
dpyramids5: callsub L_process,"moc_pryd05",94,96,"Pyramid 5";
dpyramids6: callsub L_process,"moc_pryd06",192,10,"Pyramid 6";
dsealed: callsub L_process,"monk_test",303,143,"Sealed Shrine";
dsphinx1: callsub L_process,"in_sphinx1",288,9,"Sphinx 1";
dsphinx2: callsub L_process,"in_sphinx2",149,81,"Sphinx 2";
dsphinx3: callsub L_process,"in_sphinx3",210,54,"Sphinx 3";
dsphinx4: callsub L_process,"in_sphinx4",10,222,"Sphinx 4";
dsphinx5: callsub L_process,"in_sphinx5",100,99,"Sphinx 5";
dsunken1: callsub L_process,"treasure01",69,24,"Sunken 1";
dsunken2: callsub L_process,"treasure02",102,27,"Sunken 2";
dthanatos1: callsub L_process,"tha_t01",149,38,"Thanatos 1";
dthanatos2: callsub L_process,"tha_t02",149,130,"Thanatos 2";
dthanatos3: callsub L_process,"tha_t03",59,135,"Thanatos 3";
dthanatos4: callsub L_process,"tha_t04",60,142,"Thanatos 4";
dthanatos5: callsub L_process,"tha_t05",62,8,"Thanatos 5";
dthanatos6: callsub L_process,"tha_t06",206,11,"Thanatos 6";
dthanatos7: callsub L_process,"tha_t07",30,166,"Thanatos 7";
dthanatos8: callsub L_process,"tha_t08",28,43,"Thanatos' 8";
dthanatos9: callsub L_process,"tha_t09",20,96,"Thanatos 9";
dthanatos10: callsub L_process,"tha_t10",155,100,"Thanatos 10";
dthanatos11: callsub L_process,"tha_t11",50,17,"Thanatos 11";
dthanatos12: callsub L_process,"tha_t12",115,16,"Thanatos 12";
dtoy1: callsub L_process,"xmas_dun01",205,16,"Toy 1";
dtoy2: callsub L_process,"xmas_dun02",130,124,"Toy 2";
dturtle1: callsub L_process,"tur_dun01",154,236,"Turtle 1";
dturtle2: callsub L_process,"tur_dun02",148,264,"Turtle 2";
dturtle3: callsub L_process,"tur_dun03",132,189,"Turtle 3";
dturtle4: callsub L_process,"tur_dun04",100,192,"Turtle 4";
drachel1: callsub L_process,"ra_san01",139,134,"Rachel 1";
drachel2: callsub L_process,"ra_san02",284,149,"Rachel 2";
drachel3: callsub L_process,"ra_san03",10,149,"Rachel 3";
drachel4: callsub L_process,"ra_san04",203,216,"Rachel 4";
drachel5: callsub L_process,"ra_san05",282,149,"Rachel 5";
dlhzbio1: callsub L_process,"lhz_dun01",150,284,"Bio 1";
dlhzbio2: callsub L_process,"lhz_dun02",282,153,"Bio 2";
dlhzbio3: callsub L_process,"lhz_dun03",139,134,"Bio 3";
dthors1: callsub L_process,"thor_v01",21,230,"Thors 1";
dthors2: callsub L_process,"thor_v02",78,203,"Thors 2";
dthors3: callsub L_process,"thor_v03",35,262,"Thors 3";
dice1: callsub L_process,"ice_dun01",158,17,"Ice 1";
dice2: callsub L_process,"ice_dun02",151,139,"Ice 2";
dice3: callsub L_process,"ice_dun03",149,24,"Ice 3";
dgefenia1: callsub L_process,"gefenia01",60,167,"Gefenia 1";
dgefenia2: callsub L_process,"gefenia02",203,34,"Gefenia 2";
dgefenia3: callsub L_process,"gefenia03",266,168,"Gefenia 3";
dgefenia4: callsub L_process,"gefenia04",33,270,"Gefenia 4";
dumbala: callsub L_process,"umbala",110,283,"Umbala Dungeon";
dlou1: callsub L_process,"lou_dun01",217,195,"Louyang 1";
dlou2: callsub L_process,"lou_dun02",283,18,"Louyang 2";
dhidden1: callsub L_process,"mjolnir_12",44,26,"Hidden Temple (Alde.)";
dhidden2: callsub L_process,"prt_fild01",136,368,"Hidden Temple (Pront.)";
dyggdrasil: callsub L_process,"yggdrasil01",234,255,"Yggdrasil Tree";
ddewata: callsub L_process,"dew_fild01",52,65,"Dewata Dungeon";
dbrasilis1: callsub L_process,"bra_dun01",199,39,"Brasilis 1";
dbrasilis2: callsub L_process,"bra_dun02",261,263,"Brasilis 2";
dnyd: callsub L_process,"nyd_dun01",64,124,"Nydhogg Dungeon";
L_process:
set lastwarp$,getarg(0);
set lastx,getarg(1);
set lasty,getarg(2);
set lastwarpname$,getarg(3);
warp getarg(0),getarg(1),getarg(2);
end;
}
// Account Options NPC
- script accountoptions -1,{
OnPCLoginEvent:
getmapxy (.@mapname$, .@x, .@y, 0);
if (#set_main == 1) { atcommand "@main on"; }
if (#set_ks == 1) { atcommand "@noks"; }
if (#set_uptime == 1) { atcommand "@uptime"; }
if (#set_showdelay == 1) { atcommand "@showdelay"; }
if (#set_showexp == 1) { atcommand "@showexp"; }
if (#set_showzeny == 1) { atcommand "@showzeny"; }
if (#set_autoloot > 0) { atcommand "@autoloot "+#set_autoloot; }
if (#set_mail == 1 && .@mapname$ == "prontera") { openmail; }
end;
}
// Town Locations
alberta,31,240,4 duplicate(allinone) Player Services#alb 864
aldebaran,145,118,4 duplicate(allinone) Player Services#alde 864
amatsu,192,81,1 duplicate(allinone) Player Services#ama1 864
amatsu,102,153,5 duplicate(allinone) Player Services#ama2 864
ayothaya,144,117,6 duplicate(allinone) Player Services#aya 864
comodo,194,158,4 duplicate(allinone) Player Services#com 864
einbroch,59,205,4 duplicate(allinone) Player Services#ein1 864
einbroch,243,189,2 duplicate(allinone) Player Services#ein2 864
einbech,135,249,4 duplicate(allinone) Player Services#eib 864
geffen,115,66,4 duplicate(allinone) Player Services#gef1 864
gonryun,151,130,4 duplicate(allinone) Player Services#gon 864
izlude,133,117,4 duplicate(allinone) Player Services#iz 864
hugel,88,151,5 duplicate(allinone) Player Services#hug 864
lighthalzen,155,79,6 duplicate(allinone) Player Services#lhz 864
louyang,210,106,4 duplicate(allinone) Player Services#lou 864
morocc,163,96,4 duplicate(allinone) Player Services#mor1 864
prontera,161,193,4 duplicate(allinone) Player Services#prt 864
payon,182,110,4 duplicate(allinone) Player Services#pay 864
rachel,123,118,5 duplicate(allinone) Player Services#rac 864
moscovia,231,196,4 duplicate(allinone) Player Services#mos 864
umbala,132,130,4 duplicate(allinone) Player Services#umb 864
xmas,150,136,4 duplicate(allinone) Player Services#xmas1 864
yuno,137,162,4 duplicate(allinone) Player Services#yun 864
moc_ruins,104,110,4 duplicate(allinone) Player Services#mru 864
brasilis,204,147,4 duplicate(allinone) Player Services#bra 864
mid_camp,200,283,4 duplicate(allinone) Player Services#camp 864
umbala,114,285,5 duplicate(allinone) Player Services#umdun 864
dewata,205,123,5 duplicate(allinone) Player Services#dew1 864
malangdo,218,97,5 duplicate(allinone) Player Services#malan 864
morocc,160,187,4 duplicate(allinone) Player Services#mor2 864
veins,212,129,4 duplicate(allinone) Player Services#vei 864
jawaii,211,236,4 duplicate(allinone) Player Services#jaw 864
splendide,202,179,4 duplicate(allinone) Player Services#spl 864
manuk,195,188,5 duplicate(allinone) Player Services#man 864
eclage,112,40,5 duplicate(allinone) Player Services#ecl 864
malaya,269,59,5 duplicate(allinone) Player Services#maly 864
niflheim,205,179,4 duplicate(allinone) Player Services#nif1 864
niflheim,38,163,4 duplicate(allinone) Player Services#nif2 864
mellina,90,142,4 duplicate(allinone) Player Services 864
// Dungeon Locations
ama_dun01,233,9,1 duplicate(allinone) Player Services#amad 864
ayo_fild02,279,154,4 duplicate(allinone) Player Services#ayod 864
izlu2dun,104,82,4 duplicate(allinone) Player Services#izd 864
prt_sewb1,125,253,4 duplicate(allinone) Player Services#culv 864
mjolnir_02,75,358,5 duplicate(allinone) Player Services#coal 864
einbech,81,101,1 duplicate(allinone) Player Services#eid 864
yuno_fild03,37,135,4 duplicate(allinone) Player Services#mag 864
gef_fild10,71,339,4 duplicate(allinone) Player Services#orcd 864
pay_arche,39,135,4 duplicate(allinone) Player Services#payd 864
moc_ruins,64,166,4 duplicate(allinone) Player Services#pyr 864
moc_fild19,106,97,4 duplicate(allinone) Player Services#sph 864
alb2trea,73,101,4 duplicate(allinone) Player Services#trea 864
tur_dun01,148,239,4 duplicate(allinone) Player Services#tur 864
hu_fild05,186,210,4 duplicate(allinone) Player Services#tha 864
yuno_fild07,221,179,4 duplicate(allinone) Player Services#jup 864
tha_scene01,139,194,1 duplicate(allinone) Player Services#tha 864
xmas,138,307,5 duplicate(allinone) Player Services#xmas2 864
glast_01,205,291,4 duplicate(allinone) Player Services#gh1 864
ra_fild01,228,329,5 duplicate(allinone) Player Services#ic 864
mjolnir_12,47,23,4 duplicate(allinone) Player Services#mjo 864
moc_fild22b,241,200,5 duplicate(allinone) Player Services#rift 864
yggdrasil01,241,261,4 duplicate(allinone) Player Services# 864
dicastes01,192,190,5 duplicate(allinone) Player Services#dic 864
ve_fild03,174,239,5 duplicate(allinone) Player Services#thor 864
prt_fild05,279,225,5 duplicate(allinone) Player Services#culv 864
cmd_fild07,124,134,5 duplicate(allinone) Player Services#paro 864
moc_fild20,147,144,5 duplicate(allinone) Player Services#anty 864
cmd_fild07,200,49,5 duplicate(allinone) Player Services#paro2 864
ama_fild01,180,324,5 duplicate(allinone) Player Services#amadun1 864
gef_tower,156,34,5 duplicate(allinone) Player Services#gefdun 864
prt_fild01,142,365,5 duplicate(allinone) Player Services#prtma1 864
cmd_fild08,332,349,5 duplicate(allinone) Player Services#cmdf8 864
cmd_fild08,346,75,5 duplicate(allinone) Player Services#cmd8 864
gef_fild02,209,210,5 duplicate(allinone) Player Services#comf 864
ra_san01,128,131,4 duplicate(allinone) Player Services#rasa 864
hu_fild05,162,300,4 duplicate(allinone) Player Services#aby 864
Question
Chopper
Hey Guy´s =)
I have a problem with my Warp Script something is wrong there, but i cannot find the Problem... I hope you can Help me
Here are the code´s
at dpyramids1: callsub L_process,"moc_pryd01",191,10,"Pyramid
he start to write small in the Code i dont know why
Kafra All In One
its from jTynne
full script:
http://www.dyero.de/playerservice.txt
PROBLEM SOLVED
Edited by ArcencielCodeboxed
Link to comment
Share on other sites
0 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.