Тема: Эвент(Крестики Нолики)*Под сталом*

Назад

Эвент(Крестики Нолики)*Под сталом*

Автор: Squall650: Дата: 03.04.2010

Откопал в инете это добро)))
Сплошной прикол)))
Ребят кто силен в таких скриптах подскажите где поставить чтобы при выигрыше давало приз)) Я чет уже весь мозг себе вынес)))
Вот сам скрипт.



prontera,156,186,4	script	[OOXX]	854,{



if( $@P1$ == "" )set $@P1$,"null";

if( $@P2$ == "" )set $@P2$,"null";

mes "Player 1 :["+$@P1$+"]";

mes "Player 2 :["+$@P2$+"]";

menu "[Close]",cclose,"[Join]",jjoin,"[Start]",sstart;

sstart:

	if( $@P1$ != "" )&&( $@P2$ != "" )&&( $@ss == 1 ){

	set $@T$,$@P1$;

	enablenpc "Center";

	enablenpc "Left";

	enablenpc "Right";

	enablenpc "Up";

	enablenpc "Down";

	enablenpc "Left-Up";	

	enablenpc "Left-Down";	

	enablenpc "Right-Up";	

	enablenpc "Right-Down";

	set $@ss,2; close2;

	end;

}

	mes "error";

	close;

jjoin:

	if( $@P1$ == strcharinfo(0) )||( $@P2$ == strcharinfo(0) ){ mes "You have joined"; close; }

	if( $@ss == 1 ){ mes "Please wait "; close; }

	set $@t,$@t+1;

	if( $@t == 2 ){ initnpctimer; set $@ss,1; }

	setd "$@P"+$@t+"$",strcharinfo(0);

	mes "Complete";

	close;

cclose:

	close;

OnTimer30000:

	donpcevent "COOXX::OnOXOX";

	stopnpctimer;

	end;

OnInit:

	disablenpc "A#A1";

	disablenpc "A#A2";

	disablenpc "A#A3";

	disablenpc "A#A4";

	disablenpc "A#A5";

	disablenpc "A#A6";	

	disablenpc "A#A7";	

	disablenpc "A#A8";	

	disablenpc "A#A9";	

	disablenpc "B#B1";

	disablenpc "B#B2";

	disablenpc "B#B3";

	disablenpc "B#B4";

	disablenpc "B#B5";

	disablenpc "B#B6";

	disablenpc "B#B7";

	disablenpc "B#B8";

	disablenpc "B#B9";

	disablenpc "Center";

	disablenpc "Left";

	disablenpc "Right";

	disablenpc "Up";

	disablenpc "Down";

	disablenpc "Left-Up";	

	disablenpc "Left-Down";	

	disablenpc "Right-Up";	

	disablenpc "Right-Down";	

	end;

}

function	script	[OOXX]	{

if( $@W >= 1 ){ mes "Over"; close; }

if( strcharinfo(0) == $@P1$ ){ set .@OOXX$,"A"; }

if( strcharinfo(0) == $@P2$ ){ set .@OOXX$,"B"; }

set .@OX$,.@OOXX$+"#"+.@OOXX$+@P;

setd "$@GOX"+@P+"$",.@OOXX$;

set @P,0;

set .@OOXX$,"";

if( $@T$ == $@P1$ ){ set $@T$,$@P2$; }else{ set $@T$,$@P1$; }

enablenpc .@OX$;





if( $@GOX1$ != "" && $@GOX2$ != "" && $@GOX3$ != "" && $@GOX4$ != "" && $@GOX5$ != "" && $@GOX6$ != "" && $@GOX7$ != ""

&& $@GOX8$ != "" && $@GOX9$ != "" ){ set $@W,2; donpcevent "COOXX::OnOXOX"; }



end;

}



-	script	COOXX	-1,{

OnOXOX:

	set $@W,0;

	set $@W$,"";

	set $@T$,"";

	set $@GOX1$,"";

	set $@GOX2$,"";

	set $@GOX3$,"";

	set $@GOX4$,"";

	set $@GOX5$,"";

	set $@GOX6$,"";

	set $@GOX7$,"";

	set $@GOX8$,"";

	set $@GOX9$,"";

	set $@ss,0;

	set $@t,0;

	set $@P2$,"";

	set $@P1$,"";

	disablenpc "A#A1";

	disablenpc "A#A2";

	disablenpc "A#A3";

	disablenpc "A#A4";

	disablenpc "A#A5";

	disablenpc "A#A6";	

	disablenpc "A#A7";	

	disablenpc "A#A8";	

	disablenpc "A#A9";	

	disablenpc "B#B1";

	disablenpc "B#B2";

	disablenpc "B#B3";

	disablenpc "B#B4";

	disablenpc "B#B5";

	disablenpc "B#B6";

	disablenpc "B#B7";

	disablenpc "B#B8";

	disablenpc "B#B9";

	disablenpc "Center";

	disablenpc "Left";

	disablenpc "Right";

	disablenpc "Up";

	disablenpc "Down";

	disablenpc "Left-Up";	

	disablenpc "Left-Down";	

	disablenpc "Right-Up";	

	disablenpc "Right-Down";



}

prontera,155,171,4	script	A#A1	1096,{}

prontera,158,171,4	script	A#A2	1096,{}

prontera,152,171,4	script	A#A3	1096,{}

prontera,155,174,4	script	A#A4	1096,{}

prontera,155,168,4	script	A#A5	1096,{}

prontera,152,174,4	script	A#A6	1096,{}	

prontera,152,168,4	script	A#A7	1096,{}	

prontera,158,174,4	script	A#A8	1096,{}	

prontera,158,168,4	script	A#A9	1096,{}	



prontera,155,171,4	script	B#B1	1120,{}

prontera,158,171,4	script	B#B2	1120,{}

prontera,152,171,4	script	B#B3	1120,{}

prontera,155,174,4	script	B#B4	1120,{}

prontera,155,168,4	script	B#B5	1120,{}

prontera,152,174,4	script	B#B6	1120,{}	

prontera,152,168,4	script	B#B7	1120,{}	

prontera,158,174,4	script	B#B8	1120,{}	

prontera,158,168,4	script	B#B9	1120,{}	



prontera,155,171,4	script	Center	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; }  callfunc "[OOXX]"; }

prontera,158,171,4	script	Left	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,2; disablenpc "Left"; callfunc "[OOXX]"; }

prontera,152,171,4	script	Right	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,3; disablenpc "Right"; callfunc "[OOXX]"; }

prontera,155,174,4	script	Up	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,4; disablenpc "Up"; callfunc "[OOXX]"; }

prontera,155,168,4	script	Down	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,5; disablenpc "Down"; callfunc "[OOXX]"; }

prontera,152,174,4	script	Left-Up	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,6; disablenpc "Left-Up"; callfunc "[OOXX]"; }	

prontera,152,168,4	script	Left-Down	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,7; disablenpc "Left-Down"; callfunc "[OOXX]"; }	

prontera,158,174,4	script	Right-Up	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,8; disablenpc "Right-Up"; callfunc "[OOXX]"; }	

prontera,158,168,4	script	Right-Down	100,{ if( strcharinfo(0) != $@P1$ )&&( strcharinfo(0) != $@P2$ ){ close; } if( $@T$ != strcharinfo(0) ){ mes "It's not your time"; close; } set @P,9; disablenpc "Right-Down"; callfunc "[OOXX]"; }	



ayothaya,161,146,4	script	Player-Count	47,{

end;

	OnInit:

	OnTimer1000:

	delwaitingroom;

	waitingroom getmapusers("ayothaya")+" player"+( getmapusers("ayothaya") > 1 ? "s":"") +" в Ayothaya", 0;

	initnpctimer;

}

Автор: Renegade: Дата: 03.17.2010

Почему это? Вполне готовый квест, только приз не дают :) Дописать то всего одну строчку.

Автор: San: Дата: 03.17.2010

я бы сказал, что ето не квест а евент.;)(даже в низвании темы пишет эвент):)

Автор: Sanasol: Дата: 03.17.2010

приз ставь в OnOXOX: Всё. закрываю