switch(mt)
	case 1
		exp=random(1,20)
		money=random(1,15)
		addexp(60*mg*(100-exp)*mn*exptime/100)
		addJB(10*mg*(100-money)*mn*moneytime/100)
		if (probability(12*equtime))
			ID=random(1,2)
			addGoods(ID,3,1)
		endif
		if (probability(3*equtime))
			addGoods(3,3,1)
		endif

		if(mg/20=0)
			if (probability(20*equtime))
			   i=1
				fmlv=0
			   while(i<4)
					if (probability(40*fmtime-i*10))
					fmlv=i
					endif
					i=i+1
			   loop
				fm=random(0,4)
				if(fmlv=0)
					fm=-1
				endif
				if(mg<7)
					lv=1
				else
					lv=(mg/7)*7
				endif
				if (probability(3*equtime))
					fm=11
					fmlv=0
				endif
				addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv) 
			endif
		endif
		
		if(mg/20=1)			
			if (probability(20*equtime))
				i=1
				fmlv=0
				while(i<6)
					if (probability(40*fmtime-i*5))
						fmlv=i
					endif
					i=i+1
				loop
				fm=random(0,4)
				if(fmlv=0)
					fm=-1
				endif
				if(mg<7)
						lv=1
					else
						lv=(mg/7)*7
				endif
				if (probability(3*equtime))
					fm=11
					fmlv=0
				endif
				addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv) 
			endif 
		endif
		
		if(mg/20=2)
			if (probability(20*equtime))
				i=1
				fmlv=0
				while(i<8)
					if (probability(30*fmtime-i*3))
						fmlv=i
					endif
					i=i+1
				loop
				fm=random(0,4)
				if(fmlv=0)
					fm=-1
				endif
				if(mg<7)
						lv=1
					else
						lv=(mg/7)*7
				endif
				if(probability(3*equtime))
					fm=11
					fmlv=0
				endif
				addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv) 
			endif
		endif	

	case 2
		exp=random(1,25)
		money=random(1,20)
		addexp(70*mg*(100-exp)*mn*exptime/100)
		addJB(20*mg*(100-money)*mn*moneytime/100)
		if (probability(4*equtime))
			ID=random(4,5)
			addGoods(ID,3,1)
		endif
		if (probability(1*equtime))
			addGoods(6,3,1)
		endif

		if (mg/20=0)
			if(probability(20*equtime))
				i=1
				fmlv=0
				while(i<4)
					if(probability(40*fmtime-i*10))
					fmlv=i
					endif
					i=i+1
				loop
				fm=random(0,4)
				if(fmlv=0)
					fm=-1
				endif
				if(mg<7)
					lv=1
				else
					lv=(mg/7)*7
				endif
				if (probability(3*equtime))
					fm=11
					fmlv=0
				endif
				addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv)
			endif
		endif
		
		if(mg/20=1)
			if (probability(20*equtime))
				i=1
				fmlv=0
				while(i<6)
					if (probability(40*fmtime-i*5))
						fmlv=i
					endif
					i=i+1
				loop
				fm=random(0,4)
				if(fmlv=0)
					fm=-1
				endif
				if(mg<7)
						lv=1
					else
						lv=(mg/7)*7
				endif
				if (probability(3*equtime))
					fm=11
					fmlv=0
				endif
				addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv) 
			endif 
		endif
		
		if(mg/20=2)
			if (probability(20*equtime))
				i=1
				fmlv=0
				while(i<8)
					if (probability(30*fmtime-i*3))
						fmlv=i
					endif
					i=i+1
				loop
				fm=random(0,4)
				if(fmlv=0)
					fm=-1
				endif
				if(mg<7)
						lv=1
					else
						lv=(mg/7)*7
				endif
				if (probability(3*equtime))
					fm=11
					fmlv=0
				endif
				addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv)
			endif 
		endif	

	case 3
		addexp(400*mg*exptime)
		addJB(1000*mg*moneytime)
		i=1
		fmlv=0
		while(i<8)
			if (probability(30*fmtime-i*3))
				fmlv=i
			endif
			i=i+1
		loop
		fm=random(0,4)
		if(fmlv=0)
			fm=-1
		endif
		if(mg<7)
				lv=1
			else
				lv=(mg/7)*7
		endif
		if (probability(3*equtime))
			fm=11
			fmlv=0
		endif
		addGoods(getEquiID(lv,random(0,4)),1,fm,fmlv)
		ID=random(7,9)
		addGoods(ID,3,1)
endswitch

ret
