Could someone fix this script for me please? I have attached it, so you can see it with tabbings.
The NPC doesn't load up, it is meant to be a mount giver.
alberta,185,146,5 script Rental Services 646,{
L_menu:
sName$ = "[^FF0000Rental Services^000000]";
sChar$ = "^0000FF"+strcharinfo(0) +"^000000";
if (Class == Job_Novice) {
mes sName$;
mes "Oi, "+sChar$+"! Go away, I can't help you.";
} else {
mes sName$;
mes "Hey there, "+ sChar$ +". Need a mount?";
next;
switch(select("Yeah, I need one.:I'm sorry, no."))
{
case 1:
mes sName$;
mes "Okay, give me a second: I'll try to get your mount here!";
if( BaseJob != Job_Archer && BaseClass == Job_Archer && checkfalcon() == 0 && getskilllv("HT_FALCON") > 0 )
{
setfalcon;
goto L_bye;
} else { goto L_err; }
if( (BaseClass == Job_Merchant || BaseJob == Job_SuperNovice) && checkcart() == 0 && getskilllv("MC_PUSHCART") > 0 )
{
setcart;
goto L_bye;
} else { goto L_err; }
if (Class == Job_Rune_Knight || Class == Job_Rune_Knight_H || Class == Job_Baby_Rune ) {
if (!getskilllv("KN_RIDING") > 0 && checkriding() == 0) {
setdragon;
goto L_bye;
}
} else { goto L_err; }
if (Class == Job_Royal_Guard || Class == Job_Royal_Guard_H || Class == Job_Baby_Guard) {
if (!getskilllv("KN_RIDING") > 0 && checkriding() == 0) {
setriding;
goto L_bye;
} else { goto L_err; }
if (Class == 4008 || Class == 4015 || Class == 4030 || Class == 4037) {
if (!getskilllv("RIDING") > 0 && checkriding() == 0) {
atcommand "@mount";
goto L_bye;
} else { goto L_err; }
if( (Class == Job_Mechanic || Class == Job_Mechanic_T)) && checkriding() == 0 {
setriding;
goto L_bye;
} else { goto L_err; }
if ((Class >= 4054 && Class <= 4079) && (Class != 4056 && Class != 4062)) && checkriding() == 0 {
atcommand "@newmount";
goto L_bye;
} else { goto L_err; }
case 2:
close;
}
}
L_bye:
mes sName$;
mes "Here you go, have a nice day!";
close;
L_err:
mes sName$;
mes "I can't give you a mount, I'm really sorry.";
goto L_menu;
}
rentals.txt