Hi.
I see on another server, an event Cluck, and the chicken move when player click it.
Can i have please ? o/
This, my Cluck script.
prontera,142,229,5 script Cluckers 800,{
if ($@startcluck == 1) goto L_playcluck;
cluckcluck:
if (getgmlevel() >= 80) goto cluckadmin;
mes "[Cluckers]";
mes "Cluck cluck! Cluuuuuck?";
mes "Cluck....";
close;
cluckadmin:
mes "[Cluckers]";
mes "Cluck cluck! Cluuuuuck? ^FF0000~Hi " + strcharinfo(0) + ", Wanna play today?~^000000";
mes "Cluck cluck... CLUCK! ^FF0000~Just tell me what to do!~^000000";
switch(select("Start Event:Check Prize:Set Prize:Not today Cluckers")) {
case 1:
next;
mes "[Cluckers]";
mes "CLUCK! ^FF0000~Sure thing!~^000000";
emotion 33;
close2;
goto L_cluckannounce;
case 2:
next;
mes "[Cluckers]";
mes "Cluck, cluck cluck... Cluck! ^FF0000~The current prize is^000000 ^008000"+ $cluck_item_amount +" "+ getitemname($cluck_item_id) +".^000000";
next;
goto cluckadmin;
case 3:
next;
mes "[Cluckers]";
mes "Cluck cluck? Cluck??? ^FF0000~What should the prize for winning be? Please input the ID.~^000000";
input $cluck_item_id;
next;
mes "[Cluckers]";
mes "Cluck? cluuuck? ^FF0000~How many if this item should I give away?~^000000";
input $cluck_item_amount;
next;
mes "[Cluckers]";
mes "Cluck cluck..? Cluck. ^FF0000~So, the prize is^000000 ^008000"+ $cluck_item_amount +" "+ getitemname($cluck_item_id) +"^000000? ^FF0000Great.~^000000";
emotion 33;
next;
goto cluckadmin;
case 4:
next;
mes "[Cluckers]";
mes "Cluck cluck cluck...";
close;
}
L_cluckannounce:
OnClock0015:
OnClock0215:
OnClock0415:
OnClock0615:
OnClock0815:
OnClock1015:
OnClock1215:
OnClock1415:
OnClock1615:
OnClock1715:
OnClock2015:
OnClock2215:
announce "[Cluck! Cluck! Boom!] va commencer ! Venez à Prontera !",bc_blue;
initnpctimer;
end;
OnTimer10000:
announce "Dépechez vous et venez au dessus de la fontaine de Prontera pour attraper le Poulet !",bc_blue;
end;
OnTimer20000:
announce "Il a mangé mes Gold Coins ! Attrapez le, et je vous les offrirais",bc_blue;
set $@startcluck,1;
end;
L_playcluck:
specialeffect2 2;
switch( rand(9) ) {
case 0:
npctalk "CLUUUUUUCK!!!";
emotion 23;
atcommand "@nuke "+strcharinfo(0);
break;
case 1:
npctalk "Cluuuuuck!~";
break;
case 2:
atcommand "@nuke "+strcharinfo(0);
break;
case 3:
sc_start SC_Freeze,10000,0;
break;
case 4:
npctalk "CLUUUUUUUUUCK!!!";
emotion 23;
atcommand "@nuke "+strcharinfo(0);
break;
case 5:
sc_start SC_Sleep,10000,0;
break;
case 6:
emotion 29;
sc_start SC_Stone,10000,0;
break;
case 7:
npctalk "CLUUUUUUCK!!!";
emotion 23;
atcommand "@nuke "+strcharinfo(0);
break;
case 8:
npctalk "Cluck! CLUUUCK!!";
emotion 23;
atcommand "@nuke "+strcharinfo(0);
break;
default:
npctalk "WOOF!...........";
specialeffect2 72;
announce "[Cluck! Cluck! Boom!] " + strcharinfo(0) + " a gagné ! Bien joué !",0;
getitem 671,5;
set $@startcluck,0;
break;
}
}
(Or if you have the script already make, i take it too )
Thx a lot people !
