[RO] Miner Event

// https://rathena.org/board/topic/112035-fatal-error-player-not-attached/

prontera,147,163,6	script	Shadow Miner	1169,{
	doevent  .npc_name$+"::OnTalk";
}


-	script	Announcerm	-1,{

	OnInit:
		.map$ = "mine_evt";
		disablenpc "Shadow Miner";
		.npc_name$ = strnpcinfo(3);
		end;

	OnMinute35:
		stopnpctimer;
		killmonster .map$,"All";
		announce "xxxxxxxxxx.",bc_all,0xAA42F9;
		sleep 4000;
		announce "xxxxxxxxxxxx.",bc_all,0xAA42F9;
		enablenpc "Shadow Miner";
		sleep 4000;
		announce "xxxxxxxxxx.",bc_all,0xAA42F9;
		sleep 4000;
		announce "xxxxxxxxx.",bc_all,0xAA42F9;
		sleep 60000;
		announce "xxxxxxxxxx.",bc_all,0xAA42F9;
		disablenpc "Shadow Miner";

		if(getmapusers(.map$) == 0) {
			announce "xxxxxxxxxxxxx.",bc_all,0xAA42F9;
		}
		else {
			mapannounce .map$,"Shadow Miner: xxxxxxxx.",bc_all,0xAA42F9;
			sleep 6000;
			mapannounce .map$,"Shadow Miner: xxxxxxx.",bc_all,0xAA42F9;
			sleep 6000;
			mapannounce .map$,"Shadow Miner: xxxxxxx.",bc_all,0xAA42F9;
			sleep 10000;
			mapannounce .map$,"Shadow Miner: xxxxxxx.",bc_all,0xAA42F9;
			sleep 10000;
			mapannounce .map$,"Shadow Miner: xxxxxxx.",bc_all,0xAA42F9;
			sleep 6000;
			if(getmapusers(.map$) > 0) {
				mapannounce .map$,"Shadow Miner: xxxxx",bc_all,0xAA42F9;
				sleep 2000;
				for ( .@i = 5; .@i > 0; .@i-- ) {
					mapannounce .map$,"Shadow Miner: "+ .@i,bc_all,0xAA42F9;
					sleep 1000;
				}
				mapannounce .map$,"Shadow Miner: Go!.",bc_all,0xAA42F9;
				playBGMall "mining";
				monster .map$,0,0,"Gold Node",3512,80, .npc_name$+"::OnCrystalKilled1";
				monster .map$,0,0,"Diamantinum Node",3511,5, .npc_name$+"::OnCrystalKilled2";
				initnpctimer;
			}
		}
		end;

	OnTimer80000:
		mapannounce "Shadow Miner: Se acabo jejeje, los devolvere a Prontera",bc_all,0xAA42F9;
		killmonster .map$,"All";
		end;

	OnTimer83500:
		stopnpctimer;
		mapwarp .map$,"prontera",155,184;
		disablenpc "Shadow Miner";
		end;

	OnCrystalKilled1:
		getitem 969,10;
		end;

	OnCrystalKilled2:
		getitem 33005,1;
		end;

	OnTalk:
		mes "[^AA42F9Fiebre del Mineral^000000]";
		mes "xxxxxxxxxxx:";
		if (select("XXX.", "YYYY.") == 1) {
			mes "xxxxxxxxx.";
			specialeffect2 35;
			sleep2 100;
			specialeffect2 6;
			sleep2 1200;
			specialeffect2 71;
			specialeffect2 389;
			specialeffect2 36;
			specialeffect2 389;
			sleep2 825;
			addtimer (10 * 1000),  .npc_name$+"::OnCheck";
			warp .map$,98,45;
		}
		else {
			mes "xxxxxxxxxxx.";
		}
		close;

	OnCheck:
		if (strcharinfo(3) == .map$ && getequipid(EQI_COSTUME_HEAD_TOP) == 33008 && getequipid(EQI_HAND_R) == 33007) {
			addtimer ( 10 * 1000 ),  .npc_name$+"::OnCheck";
		}
		else {
			message strcharinfo(0),"You will be kick out for not complying with the rules of the event: use of equipment.";
			sleep2 3000;
			warp "prontera",155,184;
		}
		end;
}

//================= Mapflags =======================

mine_evt	mapflag	nowarp
mine_evt	mapflag	nowarpto
mine_evt	mapflag	noteleport
mine_evt	mapflag	nosave
mine_evt	mapflag	nomemo
mine_evt	mapflag	nobranch
mine_evt	mapflag	noloot
mine_evt	mapflag	noskill
mine_evt	mapflag	nopenalty
mine_evt	mapflag	noreturn
mine_evt	mapflag	pvp	off