/*====================================================================================*/
/*==============================Advanced Kafra Service================================*/
/*====================================================================================*/
/*============By: Night Terror========================================================*/
/*====================================================================================*/
/*=== v1.0 ======================================================English Version=====*/
prontera,161,193,4 script Guild Maid#01::Service 117,{
cutin "kafra_01",2;
mes "[Kafra Service]";
mes "Hello " + strcharinfo(0) + ",";
mes "What can I do for you?";
next;
switch(select("Save current position:Storage:Warp Service:Rent a Pushcart"))
{
Case 1:
mes "You position is saved!";
getmapxy(@mapname$,@mapx,@mapy,0);
mes "Current Coordinates: "+@mapname$+", "+@mapx+", " +@mapy;
savepoint @mapname$,@mapx,@mapy;
close2;
cutin "kafra_01",255;
end;
Case 2:
mes "[Kafra Service]";
mes "I'll open your storage...";
mes "Have a nice day!";
callfunc("F_CheckKafCode"); //check storage password, if set
close2;
cutin "kafra_01",255;
openstorage;
end;
Case 3:
mes "[Kafra Service]";
mes "Where do you want to go?";
next;
switch(select("City Warps")) {
case 1:
mes "[Kafra Service]";
mes "Please choose your destination.";
next;
//This part of the script is kinda unprofessional, I know how to do it better now, but I'm way too lazy to make it better. Whatever, it works without any problems, but the way it is done is crappy.
switch(select("Alberta:Aldebaran:Amatsu")) {
case 1:
warp "alberta",116,57;
end;
case 2:
warp "aldebaran",139,123;
end;
case 3:
warp "amatsu",108,150;
end;
}
}
Case 4:
mes "[Kafra Service]";
if(BaseClass != Job_Merchant && BaseClass != Job_SuperNovice){
mes "You can't rent pushcarts with that job!";
mes "Nur Merchant-Klassen und Super Novicen können das.";
emotion e_sry;
goto Fadeout;
}
if(getskilllv(39) == 0){
mes "You don't seem to have the required skill!";
emotion e_sry;
goto Fadeout;
}
if(checkcart() == 1){
mes "You already have a pushcart!";
emotion e_sry;
goto Fadeout;
}
setcart;
mes "Here's your pushcart.";
mes "Have fun!";
goto Fadeout;
}
NoQuest:
mes "[Kafra Service]";
mes "I'm sorry, you don't seem to have the required quest completed.";
close2;
cutin "",255;
end;
NoZenys:
mes "[Kafra Service]";
mes "You don't have enough money.";
close2;
cutin "",255;
end;
Fadeout:
close2;
cutin "",255;
end;
}
// --------- NPC Clones ------------
// ---------------------------------
// ----------- Towns -------------
alberta,120,60,4 duplicate(Service) Kafra Service#02 117
aldebaran,145,118,4 duplicate(Service) Kafra Service#03 117
amatsu,100,153,5 duplicate(Service) Kafra Service#04 117
ayothaya,212,175,5 duplicate(Service) Kafra Service#05 117
Question
manabeast
http://rathena.org/b...t-if-available/
i'm using this kafra. about rent carts. how to enable rent carts for all class character if they have Pushcart Skill(Skill ID# 39)
i know edit here, just dunno want put what for all class can use.
if(BaseClass != Job_Merchant && BaseClass != Job_SuperNovice){
Edited by manabeastLink to comment
Share on other sites
2 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.