042-1.gat,110,74,0 script Hasan 189,{
set @toll, 10000;
if (hasan == 1) goto L_Toll;
mes "[Unfriendly Guy]";
mes "\"Hey! You can't pass here.\"";
menu
"Why not?",-,
"Who says that?",-;
mes "[Unfriendly Guy]";
mes "\"Me, Hasan the mighty, decided to put a toll on this way.\"";
next;
L_Toll:
mes "[Hasan]";
mes "\"Give me " + @toll + "GP, and I may let you pass.\"";
set hasan, 1;
if (zeny >= @toll)
menu
"Ok, here you go.",L_Pay,
"What? I don't have so much money!",L_NoPay,
"We'll see if you can stop me!",L_Fight;
menu
"What? I don't have so much money!",L_NoPay,
"We'll see if you can stop me!",L_Fight;
close;
L_NoPay:
mes "[Hasan]";
mes "\"That's not my problem. You have to stay here then.\"";
close;
L_Fight:
mes "He laughs derisively.";
mes "[Hasan]";
mes "\"Do you really think you can beat me?\"";
mes "He pulls out a nasty looking dagger and stabs it in your direction.";
set hp, 1;
mes "That hurt! You begin to think searching for a different solution might be healthier.";
close;
L_Pay:
if (zeny < @toll)
goto L_Cheat;
set zeny, zeny - @toll;
mes "He grins gloatingly.";
mes "[Hasan]";
mes "\"Very well. You may pass.\"";
//TODO: set variables
close;
L_Cheat:
mes "[Hasan]";
mes "\"Don't dare to cheat on me!\"";
close;
}
042-1.gat,117,76,0 script #barrier 127,2,2{
//TODO: check variable
warp "042-1.gat", 110, 73;
message strcharinfo(0), "Hasan: \"Stop!\"";
// when scorpion is spawned:
// message strcharinfo(0), "Hasan: \"Please help me!\"";
end;
}
