Kafra SupremaV3

/*
________________     ______            ________
___    |_____  /________  /______      ___  __ \_____
__  /| |  __  /_  __ \_  __ \  _ \     __  /_/ /  __ \
_  ___ / /_/ / / /_/ /  /_/ /  __/     _  _, _// /_/ /
/_/  |_\__,_/  \____//_.___/\___/      /_/ |_| \____/

*/

prontera,147,171,5  script  Kafra Suprema   894,{

mes "[^FF8000Kafra Suprema^000000]";
mes "Olá, ^0000CD"+strcharinfo(0)+"^000000 Estou aqui para servi-lo! Por favor selecione um serviço.";
menu "- Salvar Point.",-,"- Abrir Armazém",armazem,"- Teleporte WoE.",woe,"- Nada Obrigado.",nao;
next;
M_Save:
    savepoint "prontera",155,184;
    callfunc "F_KafEnd",0,1,"na cidade de Prontera";

armazem:
    next;
    if ( Zeny < 20) {
    mes "[^FF8000Kafra Suprema^000000]";
    mes "Você não tem dinheiro suficiente.";
    mes "A taxa do Armazém é de 20 zenys.";
    close;
}
next;
mes "[^FF8000Kafra Suprema^000000]";
mes "Certo,";
mes "vou liberar o seu Armazém.";
Zeny -= 20;
close2;
openstorage;
end;

woe:
next;
mes "[^FF8000Kafra Express^000000]";
mes "Por favor ^0000CD"+strcharinfo(0)+"^000000 selecione o castelo:";
menu "-Kriemhild.",-,"-Brynhildr.",bry,"-Hrist",hri,"-Gondul.",gon,"-Skoegul",sko,"Nenhum, obrigado.",nao;

//Kiremhild

next;
mes "[^FF8000Kafra Express^000000]";
mes "Boa viagem!";
warp "prt_gld",135,64;
end;

//Brynhildr

bry:
next;
next;
mes "[^FF8000Kafra Express^000000]";;
mes "Boa viagem!";
warp "prt_gld",153,136;
end;

//Hrist

hri:
next;
mes "[^FF8000Kafra Express^000000]";
mes "Boa viagem!";
warp "prt_gld",240,129;
end;

//Gondul

gon:
next;
mes "[^FF8000Kafra Express^000000]";
mes "Boa viagem!";
warp "prt_gld",198,239;
end;

//Skoegul

sko:
next;
mes "[^FF8000Kafra Express^000000]";
mes "Boa viagem!";
warp "prt_gld",121,240;
end;

nao:
next;
mes "[^FF8000Kafra Express^000000]";
mes "Tudo bem, volte quando quiser!";
close;
}