,{ set .@n$,"[Kafra Manager]"; mes .@n$; mes "How can I help you?"; next; switch(select("Save Point:Storage:Reset Stats/Skills:Change Guild Master:Heal:Warp to PvP")) { Case 1: getmapxy(.@m$,.@x,.@y,0); savepoint .@m$,.@x,.@y; break; Case 2: callfunc "F_KafStor",0,0,0; break; Case 3: set .@el, select("Stats:Skills:Both"); setarray .@z[1], 55000,55000,100000; if ((.@el == 3 && Zeny < .@z[.@el]) || (.@el < 3 && Zeny < .@z[.@el])) { next; mes "Insufficient Zeny"; close; } if (.@el == 1 || .@el == 3) resetstatus; if (.@el == 2 || .@el == 3) resetskill; break; Case 4: while (.@c < 2) { mes .@n$; mes "Transferee name: "+.@qwer$; if (!.@c) { next; input .@qwer$; } set .@c, .@c + 1; } next; if (select("Proceed:Cancel") == 2) close; if (!guildchangegm(getcharid(2),.@qwer$) || strcharinfo(0) != getguildmaster(getcharid(2))) mes "Guild transferring process failed."; break; Case 5: percentheal 100,100; break; Case 6: warp "pvproom",0,0; break; } close; }