3RO Mining-2

// Append into itemdb
// 6010,Pickaxe,Pickaxe,4,10,,10,10,,1,0,0xFFFFFFFF,7,0,34,0,0,0,0,{ bonus bCritical,100; bonus bAtkRate,-100; autobonus "{ callfunc \"Minner_Main\",1; }",10000,1,BF_WEAPON; },{ callfunc "Minner_Main",0; },{ callfunc "Minner_Main",2; }

function	script	Minner_Main	{
	.@arg = getarg(0,0);
	.@mining_map$ = "manuk";
	if (.@arg == 0) { // OnEquip Script
		getmapxy(.@map$, .@x, .@y, UNITTYPE_PC);
		setarray .@no_mf, mf_noreturn, mf_noteleport, mf_nowarp, mf_nogo;
		if (getequipid(EQI_HAND_R) == 6010 && getequipid(EQI_HEAD_TOP) == 5009) {
			for (.@i = 0; .@i < getarraysize(.@no_mf); .@i++)
				if (getmapflag(.@map$, .@no_mf[.@i]))
					end;
			disguise 1169;
			warp .@mining_map$,0,0;
		}
	} esle if (.@arg == 1) {
		.@r = rand(1000);
		if( .@r < 350 )
			switch (rand(4)) {
				case 0: sc_start SC_Freeze,10000,0; break;
				case 1: sc_start SC_Sleep,10000,0; break;
				case 2: sc_start SC_Stone,10000,0; break;
				case 3: sc_start SC_Stun,10000,0; break;
			}
		else if( .@r >= 350 && .@r < 700 )
			getitem 1002,1;
		else if( .@r >= 700 && .@r < 990 )
			getitem 757,1;
		else
			getitem 756,1;
		specialeffect2 154;
	} else if (.@arg == 2 && strcharinfo(3) == .@mining_map$) { // OnUnEquip Script
		undisguise;
		sleep2 1000;
		warp "SavePoint",0,0;
	}
	return;
}

-	script	MinnerSpawn	-1,{

OnLill:
	.@t = 1;

OnInit:
	if(!.@t) .@t = 100;
	monster "manuk",0,0,"--ja--",1907,.@t,"Minnerx::OnLill";
	end;
}