zac.excavator

function(c,a){
	for(var i=0;i<100;++i) {
		if(Date.now()-_START > 3500) break;
		if(#db.u1({exca:true,lock:{$lt:_START}},{$set:{lock:_END + 1000}})[0].nModified==0)continue;
		if (!a){
			var a = {}
		}
		if (a.r){
			#db.r({exca:true})
		}
		var e = #db.f({exca:true}).first()
		if (!e){
			#db.i({exca:true,step:0,value:0,lock:Date.now(),timer:Date.now(),numbers:[]})
			var e = #db.f({exca:true}).first()
		}
		if (e.timer > Date.now()){
			return #4s.net.excavator()
		}
		if (e.numbers.length > 0 && JSON.parse(e.numbers[4]) > 90000){
			if (JSON.parse(e.numbers[3]) > 90000){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:1,d:1,i:1,c:1,e:1,a:95,r:e.re})
				#db.us({exca:true},{$set:{step:2,value:0}})
			}
			else if (JSON.parse(e.numbers[2] > 90000)){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:1,d:1,i:1,c:96,e:1,a:0,r:e.re})
			}
			else if (JSON.parse(e.numbers[1] > 90000)){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:1,d:1,i:97,c:0,e:1,a:0,r:e.re})
			}
			else if (JSON.parse(e.numbers[0] > 40000)){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:1,d:98,i:0,c:0,e:1,a:0,r:e.re})
			}
			else{
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:98,d:1,i:0,c:0,e:1,a:0,r:e.re})
			}
		}
		else{
			if (e.step == 0){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:98,d:1,i:0,c:0,e:1,a:0,r:e.re})
				#db.us({exca:true},{$set:{step:1}})
			}
			if (e.step == 1){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:1,d:98,i:0,c:0,e:1,a:0,r:e.re})
				if (e.value > 3){
					#db.us({exca:true},{$set:{step:2,value:0}})
				}
				else{
					#db.us({exca:true},{$inc:{value:1}})
				}
			}
			if (e.step == 2){
				var call = #4s.risk.trace({go:"9,5,LAW",look:"excavation",access:"excavator",p:1,d:1,i:0,c:0,e:98,a:0,r:e.re})
				if (e.value > 1){
					#db.us({exca:true},{$set:{step:0,value:0}})
				}
				else{
					#db.us({exca:true},{$inc:{value:1}})
				}
			}
		}
		#4s.chats.tell({to:"zac",msg:call})
		var numbers = call.match(/= (\d+)/g)
		for (var i = 0;i<numbers.length;i++){
			numbers[i] = (/= (\d+)/g).exec(numbers[i])[1]
		}
		#db.us({exca:true},{$set:{numbers:numbers}})
		var time = (JSON.parse((/next run in (\d+)/g).exec(call)[1]) + 1) * 1000
		#db.us({exca:true},{$set:{timer:Date.now() + time}})
		var re = (/-run (\w+)/g).exec(call)[1]
		if (!e.re || re != e.re){
			#db.us({exca:true},{$set:{re:re,step:0,value:0}})
		}
		i=1000;
		#db.u1({exca:true},{$set:{lock:0}})
		return call
	}
	return #4s.net.excavator()
}