Regenerate again the death events, this time, with reward drops enabled

Maybe 1 order of magnitude is too much. I'll change to half magnitude order.

1 files changed, 198 insertions, 109 deletions

diff --git a/npc/018-2-2/main.txt b/npc/018-2-2/main.txt
index b4978d3ed..3b3527463 100644
--- a/npc/018-2-2/main.txt
+++ b/npc/018-2-2/main.txt
@@ -118,183 +118,272 @@ OnTimer7000:
 /////////////////////////////////////////////////////////////////////////////////
 // Respawn Arrays (Autogenerated, Python Script at bottom)
 OnNovice0:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[0]), .Novice_Mobs[0], .Novice_Ammo[0], "#HH_CONTROLLER01::OnNovice0"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[0])*5)+strmobinfo(7,.Novice_Mobs[0])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[0]), .Novice_Mobs[0], .Novice_Ammo[0], "#HH_CONTROLLER01::OnNovice0"; end;
 OnNovice1:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[1]), .Novice_Mobs[1], .Novice_Ammo[1], "#HH_CONTROLLER01::OnNovice1"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[1])*5)+strmobinfo(7,.Novice_Mobs[1])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[1]), .Novice_Mobs[1], .Novice_Ammo[1], "#HH_CONTROLLER01::OnNovice1"; end;
 OnNovice2:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[2]), .Novice_Mobs[2], .Novice_Ammo[2], "#HH_CONTROLLER01::OnNovice2"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[2])*5)+strmobinfo(7,.Novice_Mobs[2])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[2]), .Novice_Mobs[2], .Novice_Ammo[2], "#HH_CONTROLLER01::OnNovice2"; end;
 OnNovice3:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[3]), .Novice_Mobs[3], .Novice_Ammo[3], "#HH_CONTROLLER01::OnNovice3"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[3])*5)+strmobinfo(7,.Novice_Mobs[3])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[3]), .Novice_Mobs[3], .Novice_Ammo[3], "#HH_CONTROLLER01::OnNovice3"; end;
 OnNovice4:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[4]), .Novice_Mobs[4], .Novice_Ammo[4], "#HH_CONTROLLER01::OnNovice4"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[4])*5)+strmobinfo(7,.Novice_Mobs[4])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[4]), .Novice_Mobs[4], .Novice_Ammo[4], "#HH_CONTROLLER01::OnNovice4"; end;
 OnNovice5:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[5]), .Novice_Mobs[5], .Novice_Ammo[5], "#HH_CONTROLLER01::OnNovice5"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[5])*5)+strmobinfo(7,.Novice_Mobs[5])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[5]), .Novice_Mobs[5], .Novice_Ammo[5], "#HH_CONTROLLER01::OnNovice5"; end;
 OnNovice6:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[6]), .Novice_Mobs[6], .Novice_Ammo[6], "#HH_CONTROLLER01::OnNovice6"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[6])*5)+strmobinfo(7,.Novice_Mobs[6])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[6]), .Novice_Mobs[6], .Novice_Ammo[6], "#HH_CONTROLLER01::OnNovice6"; end;
 OnNovice7:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[7]), .Novice_Mobs[7], .Novice_Ammo[7], "#HH_CONTROLLER01::OnNovice7"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[7])*5)+strmobinfo(7,.Novice_Mobs[7])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[7]), .Novice_Mobs[7], .Novice_Ammo[7], "#HH_CONTROLLER01::OnNovice7"; end;
 OnNovice8:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[8]), .Novice_Mobs[8], .Novice_Ammo[8], "#HH_CONTROLLER01::OnNovice8"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[8])*5)+strmobinfo(7,.Novice_Mobs[8])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[8]), .Novice_Mobs[8], .Novice_Ammo[8], "#HH_CONTROLLER01::OnNovice8"; end;
 OnNovice9:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[9]), .Novice_Mobs[9], .Novice_Ammo[9], "#HH_CONTROLLER01::OnNovice9"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[9])*5)+strmobinfo(7,.Novice_Mobs[9])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[9]), .Novice_Mobs[9], .Novice_Ammo[9], "#HH_CONTROLLER01::OnNovice9"; end;
 OnNovice10:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[10]), .Novice_Mobs[10], .Novice_Ammo[10], "#HH_CONTROLLER01::OnNovice10"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[10])*5)+strmobinfo(7,.Novice_Mobs[10])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[10]), .Novice_Mobs[10], .Novice_Ammo[10], "#HH_CONTROLLER01::OnNovice10"; end;
 OnNovice11:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[11]), .Novice_Mobs[11], .Novice_Ammo[11], "#HH_CONTROLLER01::OnNovice11"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[11])*5)+strmobinfo(7,.Novice_Mobs[11])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[11]), .Novice_Mobs[11], .Novice_Ammo[11], "#HH_CONTROLLER01::OnNovice11"; end;
 OnNovice12:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[12]), .Novice_Mobs[12], .Novice_Ammo[12], "#HH_CONTROLLER01::OnNovice12"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[12])*5)+strmobinfo(7,.Novice_Mobs[12])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[12]), .Novice_Mobs[12], .Novice_Ammo[12], "#HH_CONTROLLER01::OnNovice12"; end;
 OnNovice13:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[13]), .Novice_Mobs[13], .Novice_Ammo[13], "#HH_CONTROLLER01::OnNovice13"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[13])*5)+strmobinfo(7,.Novice_Mobs[13])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[13]), .Novice_Mobs[13], .Novice_Ammo[13], "#HH_CONTROLLER01::OnNovice13"; end;
 OnNovice14:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[14]), .Novice_Mobs[14], .Novice_Ammo[14], "#HH_CONTROLLER01::OnNovice14"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[14])*5)+strmobinfo(7,.Novice_Mobs[14])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[14]), .Novice_Mobs[14], .Novice_Ammo[14], "#HH_CONTROLLER01::OnNovice14"; end;
 OnNovice15:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[15]), .Novice_Mobs[15], .Novice_Ammo[15], "#HH_CONTROLLER01::OnNovice15"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[15])*5)+strmobinfo(7,.Novice_Mobs[15])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[15]), .Novice_Mobs[15], .Novice_Ammo[15], "#HH_CONTROLLER01::OnNovice15"; end;
 OnNovice16:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[16]), .Novice_Mobs[16], .Novice_Ammo[16], "#HH_CONTROLLER01::OnNovice16"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[16])*5)+strmobinfo(7,.Novice_Mobs[16])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[16]), .Novice_Mobs[16], .Novice_Ammo[16], "#HH_CONTROLLER01::OnNovice16"; end;
 OnNovice17:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[17]), .Novice_Mobs[17], .Novice_Ammo[17], "#HH_CONTROLLER01::OnNovice17"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[17])*5)+strmobinfo(7,.Novice_Mobs[17])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[17]), .Novice_Mobs[17], .Novice_Ammo[17], "#HH_CONTROLLER01::OnNovice17"; end;
 OnNovice18:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[18]), .Novice_Mobs[18], .Novice_Ammo[18], "#HH_CONTROLLER01::OnNovice18"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[18])*5)+strmobinfo(7,.Novice_Mobs[18])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[18]), .Novice_Mobs[18], .Novice_Ammo[18], "#HH_CONTROLLER01::OnNovice18"; end;
 OnNovice19:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[19]), .Novice_Mobs[19], .Novice_Ammo[19], "#HH_CONTROLLER01::OnNovice19"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[19])*5)+strmobinfo(7,.Novice_Mobs[19])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[19]), .Novice_Mobs[19], .Novice_Ammo[19], "#HH_CONTROLLER01::OnNovice19"; end;
 OnNovice20:
-    areamonster "018-2-2@No", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[20]), .Novice_Mobs[20], .Novice_Ammo[20], "#HH_CONTROLLER01::OnNovice20"; end;
-OnInterm0:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[0]), .Interm_Mobs[0], .Interm_Ammo[0], "#HH_CONTROLLER01::OnInterm0"; end;
-OnInterm1:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[1]), .Interm_Mobs[1], .Interm_Ammo[1], "#HH_CONTROLLER01::OnInterm1"; end;
-OnInterm2:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[2]), .Interm_Mobs[2], .Interm_Ammo[2], "#HH_CONTROLLER01::OnInterm2"; end;
-OnInterm3:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[3]), .Interm_Mobs[3], .Interm_Ammo[3], "#HH_CONTROLLER01::OnInterm3"; end;
-OnInterm4:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[4]), .Interm_Mobs[4], .Interm_Ammo[4], "#HH_CONTROLLER01::OnInterm4"; end;
-OnInterm5:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[5]), .Interm_Mobs[5], .Interm_Ammo[5], "#HH_CONTROLLER01::OnInterm5"; end;
-OnInterm6:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[6]), .Interm_Mobs[6], .Interm_Ammo[6], "#HH_CONTROLLER01::OnInterm6"; end;
-OnInterm7:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[7]), .Interm_Mobs[7], .Interm_Ammo[7], "#HH_CONTROLLER01::OnInterm7"; end;
-OnInterm8:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[8]), .Interm_Mobs[8], .Interm_Ammo[8], "#HH_CONTROLLER01::OnInterm8"; end;
-OnInterm9:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[9]), .Interm_Mobs[9], .Interm_Ammo[9], "#HH_CONTROLLER01::OnInterm9"; end;
-OnInterm10:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[10]), .Interm_Mobs[10], .Interm_Ammo[10], "#HH_CONTROLLER01::OnInterm10"; end;
-OnInterm11:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[11]), .Interm_Mobs[11], .Interm_Ammo[11], "#HH_CONTROLLER01::OnInterm11"; end;
-OnInterm12:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[12]), .Interm_Mobs[12], .Interm_Ammo[12], "#HH_CONTROLLER01::OnInterm12"; end;
-OnInterm13:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[13]), .Interm_Mobs[13], .Interm_Ammo[13], "#HH_CONTROLLER01::OnInterm13"; end;
-OnInterm14:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[14]), .Interm_Mobs[14], .Interm_Ammo[14], "#HH_CONTROLLER01::OnInterm14"; end;
-OnInterm15:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[15]), .Interm_Mobs[15], .Interm_Ammo[15], "#HH_CONTROLLER01::OnInterm15"; end;
-OnInterm16:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[16]), .Interm_Mobs[16], .Interm_Ammo[16], "#HH_CONTROLLER01::OnInterm16"; end;
-OnInterm17:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[17]), .Interm_Mobs[17], .Interm_Ammo[17], "#HH_CONTROLLER01::OnInterm17"; end;
-OnInterm18:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[18]), .Interm_Mobs[18], .Interm_Ammo[18], "#HH_CONTROLLER01::OnInterm18"; end;
-OnInterm19:
-    areamonster "018-2-3@In", 20, 20, 220, 220, strmobinfo(1, .Interm_Mobs[19]), .Interm_Mobs[19], .Interm_Ammo[19], "#HH_CONTROLLER01::OnInterm19"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Novice_Mobs[20])*5)+strmobinfo(7,.Novice_Mobs[20])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1, .@m$, .@x, .@y);}
+    areamonster "018-2-2@N", 20, 20, 220, 220, strmobinfo(1, .Novice_Mobs[20]), .Novice_Mobs[20], .Novice_Ammo[20], "#HH_CONTROLLER01::OnNovice20"; end;
+OnIntermed0:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[0])*5)+strmobinfo(7,.Intermed_Mobs[0])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[0]), .Intermed_Mobs[0], .Intermed_Ammo[0], "#HH_CONTROLLER01::OnIntermed0"; end;
+OnIntermed1:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[1])*5)+strmobinfo(7,.Intermed_Mobs[1])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[1]), .Intermed_Mobs[1], .Intermed_Ammo[1], "#HH_CONTROLLER01::OnIntermed1"; end;
+OnIntermed2:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[2])*5)+strmobinfo(7,.Intermed_Mobs[2])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[2]), .Intermed_Mobs[2], .Intermed_Ammo[2], "#HH_CONTROLLER01::OnIntermed2"; end;
+OnIntermed3:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[3])*5)+strmobinfo(7,.Intermed_Mobs[3])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[3]), .Intermed_Mobs[3], .Intermed_Ammo[3], "#HH_CONTROLLER01::OnIntermed3"; end;
+OnIntermed4:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[4])*5)+strmobinfo(7,.Intermed_Mobs[4])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[4]), .Intermed_Mobs[4], .Intermed_Ammo[4], "#HH_CONTROLLER01::OnIntermed4"; end;
+OnIntermed5:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[5])*5)+strmobinfo(7,.Intermed_Mobs[5])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[5]), .Intermed_Mobs[5], .Intermed_Ammo[5], "#HH_CONTROLLER01::OnIntermed5"; end;
+OnIntermed6:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[6])*5)+strmobinfo(7,.Intermed_Mobs[6])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[6]), .Intermed_Mobs[6], .Intermed_Ammo[6], "#HH_CONTROLLER01::OnIntermed6"; end;
+OnIntermed7:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[7])*5)+strmobinfo(7,.Intermed_Mobs[7])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[7]), .Intermed_Mobs[7], .Intermed_Ammo[7], "#HH_CONTROLLER01::OnIntermed7"; end;
+OnIntermed8:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[8])*5)+strmobinfo(7,.Intermed_Mobs[8])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[8]), .Intermed_Mobs[8], .Intermed_Ammo[8], "#HH_CONTROLLER01::OnIntermed8"; end;
+OnIntermed9:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[9])*5)+strmobinfo(7,.Intermed_Mobs[9])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[9]), .Intermed_Mobs[9], .Intermed_Ammo[9], "#HH_CONTROLLER01::OnIntermed9"; end;
+OnIntermed10:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[10])*5)+strmobinfo(7,.Intermed_Mobs[10])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[10]), .Intermed_Mobs[10], .Intermed_Ammo[10], "#HH_CONTROLLER01::OnIntermed10"; end;
+OnIntermed11:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[11])*5)+strmobinfo(7,.Intermed_Mobs[11])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[11]), .Intermed_Mobs[11], .Intermed_Ammo[11], "#HH_CONTROLLER01::OnIntermed11"; end;
+OnIntermed12:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[12])*5)+strmobinfo(7,.Intermed_Mobs[12])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[12]), .Intermed_Mobs[12], .Intermed_Ammo[12], "#HH_CONTROLLER01::OnIntermed12"; end;
+OnIntermed13:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[13])*5)+strmobinfo(7,.Intermed_Mobs[13])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[13]), .Intermed_Mobs[13], .Intermed_Ammo[13], "#HH_CONTROLLER01::OnIntermed13"; end;
+OnIntermed14:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[14])*5)+strmobinfo(7,.Intermed_Mobs[14])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[14]), .Intermed_Mobs[14], .Intermed_Ammo[14], "#HH_CONTROLLER01::OnIntermed14"; end;
+OnIntermed15:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[15])*5)+strmobinfo(7,.Intermed_Mobs[15])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[15]), .Intermed_Mobs[15], .Intermed_Ammo[15], "#HH_CONTROLLER01::OnIntermed15"; end;
+OnIntermed16:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[16])*5)+strmobinfo(7,.Intermed_Mobs[16])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[16]), .Intermed_Mobs[16], .Intermed_Ammo[16], "#HH_CONTROLLER01::OnIntermed16"; end;
+OnIntermed17:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[17])*5)+strmobinfo(7,.Intermed_Mobs[17])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[17]), .Intermed_Mobs[17], .Intermed_Ammo[17], "#HH_CONTROLLER01::OnIntermed17"; end;
+OnIntermed18:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[18])*5)+strmobinfo(7,.Intermed_Mobs[18])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[18]), .Intermed_Mobs[18], .Intermed_Ammo[18], "#HH_CONTROLLER01::OnIntermed18"; end;
+OnIntermed19:
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Intermed_Mobs[19])*5)+strmobinfo(7,.Intermed_Mobs[19])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10, .@m$, .@x, .@y);}
+    areamonster "018-2-2@I", 20, 20, 220, 220, strmobinfo(1, .Intermed_Mobs[19]), .Intermed_Mobs[19], .Intermed_Ammo[19], "#HH_CONTROLLER01::OnIntermed19"; end;
 OnAdvanc0:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[0]), .Advanc_Mobs[0], .Advanc_Ammo[0], "#HH_CONTROLLER01::OnAdvanc0"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[0])*5)+strmobinfo(7,.Advanc_Mobs[0])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[0]), .Advanc_Mobs[0], .Advanc_Ammo[0], "#HH_CONTROLLER01::OnAdvanc0"; end;
 OnAdvanc1:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[1]), .Advanc_Mobs[1], .Advanc_Ammo[1], "#HH_CONTROLLER01::OnAdvanc1"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[1])*5)+strmobinfo(7,.Advanc_Mobs[1])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[1]), .Advanc_Mobs[1], .Advanc_Ammo[1], "#HH_CONTROLLER01::OnAdvanc1"; end;
 OnAdvanc2:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[2]), .Advanc_Mobs[2], .Advanc_Ammo[2], "#HH_CONTROLLER01::OnAdvanc2"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[2])*5)+strmobinfo(7,.Advanc_Mobs[2])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[2]), .Advanc_Mobs[2], .Advanc_Ammo[2], "#HH_CONTROLLER01::OnAdvanc2"; end;
 OnAdvanc3:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[3]), .Advanc_Mobs[3], .Advanc_Ammo[3], "#HH_CONTROLLER01::OnAdvanc3"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[3])*5)+strmobinfo(7,.Advanc_Mobs[3])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[3]), .Advanc_Mobs[3], .Advanc_Ammo[3], "#HH_CONTROLLER01::OnAdvanc3"; end;
 OnAdvanc4:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[4]), .Advanc_Mobs[4], .Advanc_Ammo[4], "#HH_CONTROLLER01::OnAdvanc4"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[4])*5)+strmobinfo(7,.Advanc_Mobs[4])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[4]), .Advanc_Mobs[4], .Advanc_Ammo[4], "#HH_CONTROLLER01::OnAdvanc4"; end;
 OnAdvanc5:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[5]), .Advanc_Mobs[5], .Advanc_Ammo[5], "#HH_CONTROLLER01::OnAdvanc5"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[5])*5)+strmobinfo(7,.Advanc_Mobs[5])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[5]), .Advanc_Mobs[5], .Advanc_Ammo[5], "#HH_CONTROLLER01::OnAdvanc5"; end;
 OnAdvanc6:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[6]), .Advanc_Mobs[6], .Advanc_Ammo[6], "#HH_CONTROLLER01::OnAdvanc6"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[6])*5)+strmobinfo(7,.Advanc_Mobs[6])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[6]), .Advanc_Mobs[6], .Advanc_Ammo[6], "#HH_CONTROLLER01::OnAdvanc6"; end;
 OnAdvanc7:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[7]), .Advanc_Mobs[7], .Advanc_Ammo[7], "#HH_CONTROLLER01::OnAdvanc7"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[7])*5)+strmobinfo(7,.Advanc_Mobs[7])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[7]), .Advanc_Mobs[7], .Advanc_Ammo[7], "#HH_CONTROLLER01::OnAdvanc7"; end;
 OnAdvanc8:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[8]), .Advanc_Mobs[8], .Advanc_Ammo[8], "#HH_CONTROLLER01::OnAdvanc8"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[8])*5)+strmobinfo(7,.Advanc_Mobs[8])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[8]), .Advanc_Mobs[8], .Advanc_Ammo[8], "#HH_CONTROLLER01::OnAdvanc8"; end;
 OnAdvanc9:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[9]), .Advanc_Mobs[9], .Advanc_Ammo[9], "#HH_CONTROLLER01::OnAdvanc9"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[9])*5)+strmobinfo(7,.Advanc_Mobs[9])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[9]), .Advanc_Mobs[9], .Advanc_Ammo[9], "#HH_CONTROLLER01::OnAdvanc9"; end;
 OnAdvanc10:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[10]), .Advanc_Mobs[10], .Advanc_Ammo[10], "#HH_CONTROLLER01::OnAdvanc10"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[10])*5)+strmobinfo(7,.Advanc_Mobs[10])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[10]), .Advanc_Mobs[10], .Advanc_Ammo[10], "#HH_CONTROLLER01::OnAdvanc10"; end;
 OnAdvanc11:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[11]), .Advanc_Mobs[11], .Advanc_Ammo[11], "#HH_CONTROLLER01::OnAdvanc11"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[11])*5)+strmobinfo(7,.Advanc_Mobs[11])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[11]), .Advanc_Mobs[11], .Advanc_Ammo[11], "#HH_CONTROLLER01::OnAdvanc11"; end;
 OnAdvanc12:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[12]), .Advanc_Mobs[12], .Advanc_Ammo[12], "#HH_CONTROLLER01::OnAdvanc12"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[12])*5)+strmobinfo(7,.Advanc_Mobs[12])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[12]), .Advanc_Mobs[12], .Advanc_Ammo[12], "#HH_CONTROLLER01::OnAdvanc12"; end;
 OnAdvanc13:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[13]), .Advanc_Mobs[13], .Advanc_Ammo[13], "#HH_CONTROLLER01::OnAdvanc13"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[13])*5)+strmobinfo(7,.Advanc_Mobs[13])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[13]), .Advanc_Mobs[13], .Advanc_Ammo[13], "#HH_CONTROLLER01::OnAdvanc13"; end;
 OnAdvanc14:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[14]), .Advanc_Mobs[14], .Advanc_Ammo[14], "#HH_CONTROLLER01::OnAdvanc14"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[14])*5)+strmobinfo(7,.Advanc_Mobs[14])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[14]), .Advanc_Mobs[14], .Advanc_Ammo[14], "#HH_CONTROLLER01::OnAdvanc14"; end;
 OnAdvanc15:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[15]), .Advanc_Mobs[15], .Advanc_Ammo[15], "#HH_CONTROLLER01::OnAdvanc15"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[15])*5)+strmobinfo(7,.Advanc_Mobs[15])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[15]), .Advanc_Mobs[15], .Advanc_Ammo[15], "#HH_CONTROLLER01::OnAdvanc15"; end;
 OnAdvanc16:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[16]), .Advanc_Mobs[16], .Advanc_Ammo[16], "#HH_CONTROLLER01::OnAdvanc16"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[16])*5)+strmobinfo(7,.Advanc_Mobs[16])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[16]), .Advanc_Mobs[16], .Advanc_Ammo[16], "#HH_CONTROLLER01::OnAdvanc16"; end;
 OnAdvanc17:
-    areamonster "018-2-2@Ad", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[17]), .Advanc_Mobs[17], .Advanc_Ammo[17], "#HH_CONTROLLER01::OnAdvanc17"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Advanc_Mobs[17])*5)+strmobinfo(7,.Advanc_Mobs[17])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 100, .@m$, .@x, .@y);}
+    areamonster "018-2-2@A", 20, 20, 220, 220, strmobinfo(1, .Advanc_Mobs[17]), .Advanc_Mobs[17], .Advanc_Ammo[17], "#HH_CONTROLLER01::OnAdvanc17"; end;
 OnExpert0:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[0]), .Expert_Mobs[0], .Expert_Ammo[0], "#HH_CONTROLLER01::OnExpert0"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[0])*5)+strmobinfo(7,.Expert_Mobs[0])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[0]), .Expert_Mobs[0], .Expert_Ammo[0], "#HH_CONTROLLER01::OnExpert0"; end;
 OnExpert1:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[1]), .Expert_Mobs[1], .Expert_Ammo[1], "#HH_CONTROLLER01::OnExpert1"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[1])*5)+strmobinfo(7,.Expert_Mobs[1])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[1]), .Expert_Mobs[1], .Expert_Ammo[1], "#HH_CONTROLLER01::OnExpert1"; end;
 OnExpert2:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[2]), .Expert_Mobs[2], .Expert_Ammo[2], "#HH_CONTROLLER01::OnExpert2"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[2])*5)+strmobinfo(7,.Expert_Mobs[2])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[2]), .Expert_Mobs[2], .Expert_Ammo[2], "#HH_CONTROLLER01::OnExpert2"; end;
 OnExpert3:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[3]), .Expert_Mobs[3], .Expert_Ammo[3], "#HH_CONTROLLER01::OnExpert3"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[3])*5)+strmobinfo(7,.Expert_Mobs[3])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[3]), .Expert_Mobs[3], .Expert_Ammo[3], "#HH_CONTROLLER01::OnExpert3"; end;
 OnExpert4:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[4]), .Expert_Mobs[4], .Expert_Ammo[4], "#HH_CONTROLLER01::OnExpert4"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[4])*5)+strmobinfo(7,.Expert_Mobs[4])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[4]), .Expert_Mobs[4], .Expert_Ammo[4], "#HH_CONTROLLER01::OnExpert4"; end;
 OnExpert5:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[5]), .Expert_Mobs[5], .Expert_Ammo[5], "#HH_CONTROLLER01::OnExpert5"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[5])*5)+strmobinfo(7,.Expert_Mobs[5])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[5]), .Expert_Mobs[5], .Expert_Ammo[5], "#HH_CONTROLLER01::OnExpert5"; end;
 OnExpert6:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[6]), .Expert_Mobs[6], .Expert_Ammo[6], "#HH_CONTROLLER01::OnExpert6"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[6])*5)+strmobinfo(7,.Expert_Mobs[6])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[6]), .Expert_Mobs[6], .Expert_Ammo[6], "#HH_CONTROLLER01::OnExpert6"; end;
 OnExpert7:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[7]), .Expert_Mobs[7], .Expert_Ammo[7], "#HH_CONTROLLER01::OnExpert7"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[7])*5)+strmobinfo(7,.Expert_Mobs[7])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[7]), .Expert_Mobs[7], .Expert_Ammo[7], "#HH_CONTROLLER01::OnExpert7"; end;
 OnExpert8:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[8]), .Expert_Mobs[8], .Expert_Ammo[8], "#HH_CONTROLLER01::OnExpert8"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[8])*5)+strmobinfo(7,.Expert_Mobs[8])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[8]), .Expert_Mobs[8], .Expert_Ammo[8], "#HH_CONTROLLER01::OnExpert8"; end;
 OnExpert9:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[9]), .Expert_Mobs[9], .Expert_Ammo[9], "#HH_CONTROLLER01::OnExpert9"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[9])*5)+strmobinfo(7,.Expert_Mobs[9])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[9]), .Expert_Mobs[9], .Expert_Ammo[9], "#HH_CONTROLLER01::OnExpert9"; end;
 OnExpert10:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[10]), .Expert_Mobs[10], .Expert_Ammo[10], "#HH_CONTROLLER01::OnExpert10"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[10])*5)+strmobinfo(7,.Expert_Mobs[10])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[10]), .Expert_Mobs[10], .Expert_Ammo[10], "#HH_CONTROLLER01::OnExpert10"; end;
 OnExpert11:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[11]), .Expert_Mobs[11], .Expert_Ammo[11], "#HH_CONTROLLER01::OnExpert11"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[11])*5)+strmobinfo(7,.Expert_Mobs[11])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[11]), .Expert_Mobs[11], .Expert_Ammo[11], "#HH_CONTROLLER01::OnExpert11"; end;
 OnExpert12:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[12]), .Expert_Mobs[12], .Expert_Ammo[12], "#HH_CONTROLLER01::OnExpert12"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[12])*5)+strmobinfo(7,.Expert_Mobs[12])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[12]), .Expert_Mobs[12], .Expert_Ammo[12], "#HH_CONTROLLER01::OnExpert12"; end;
 OnExpert13:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[13]), .Expert_Mobs[13], .Expert_Ammo[13], "#HH_CONTROLLER01::OnExpert13"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[13])*5)+strmobinfo(7,.Expert_Mobs[13])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[13]), .Expert_Mobs[13], .Expert_Ammo[13], "#HH_CONTROLLER01::OnExpert13"; end;
 OnExpert14:
-    areamonster "018-2-3@Ex", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[14]), .Expert_Mobs[14], .Expert_Ammo[14], "#HH_CONTROLLER01::OnExpert14"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Expert_Mobs[14])*5)+strmobinfo(7,.Expert_Mobs[14])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 1000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@E", 20, 20, 220, 220, strmobinfo(1, .Expert_Mobs[14]), .Expert_Mobs[14], .Expert_Ammo[14], "#HH_CONTROLLER01::OnExpert14"; end;
 OnMaster0:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[0]), .Master_Mobs[0], .Master_Ammo[0], "#HH_CONTROLLER01::OnMaster0"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[0])*5)+strmobinfo(7,.Master_Mobs[0])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[0]), .Master_Mobs[0], .Master_Ammo[0], "#HH_CONTROLLER01::OnMaster0"; end;
 OnMaster1:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[1]), .Master_Mobs[1], .Master_Ammo[1], "#HH_CONTROLLER01::OnMaster1"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[1])*5)+strmobinfo(7,.Master_Mobs[1])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[1]), .Master_Mobs[1], .Master_Ammo[1], "#HH_CONTROLLER01::OnMaster1"; end;
 OnMaster2:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[2]), .Master_Mobs[2], .Master_Ammo[2], "#HH_CONTROLLER01::OnMaster2"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[2])*5)+strmobinfo(7,.Master_Mobs[2])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[2]), .Master_Mobs[2], .Master_Ammo[2], "#HH_CONTROLLER01::OnMaster2"; end;
 OnMaster3:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[3]), .Master_Mobs[3], .Master_Ammo[3], "#HH_CONTROLLER01::OnMaster3"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[3])*5)+strmobinfo(7,.Master_Mobs[3])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[3]), .Master_Mobs[3], .Master_Ammo[3], "#HH_CONTROLLER01::OnMaster3"; end;
 OnMaster4:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[4]), .Master_Mobs[4], .Master_Ammo[4], "#HH_CONTROLLER01::OnMaster4"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[4])*5)+strmobinfo(7,.Master_Mobs[4])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[4]), .Master_Mobs[4], .Master_Ammo[4], "#HH_CONTROLLER01::OnMaster4"; end;
 OnMaster5:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[5]), .Master_Mobs[5], .Master_Ammo[5], "#HH_CONTROLLER01::OnMaster5"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[5])*5)+strmobinfo(7,.Master_Mobs[5])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[5]), .Master_Mobs[5], .Master_Ammo[5], "#HH_CONTROLLER01::OnMaster5"; end;
 OnMaster6:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[6]), .Master_Mobs[6], .Master_Ammo[6], "#HH_CONTROLLER01::OnMaster6"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[6])*5)+strmobinfo(7,.Master_Mobs[6])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[6]), .Master_Mobs[6], .Master_Ammo[6], "#HH_CONTROLLER01::OnMaster6"; end;
 OnMaster7:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[7]), .Master_Mobs[7], .Master_Ammo[7], "#HH_CONTROLLER01::OnMaster7"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[7])*5)+strmobinfo(7,.Master_Mobs[7])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[7]), .Master_Mobs[7], .Master_Ammo[7], "#HH_CONTROLLER01::OnMaster7"; end;
 OnMaster8:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[8]), .Master_Mobs[8], .Master_Ammo[8], "#HH_CONTROLLER01::OnMaster8"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[8])*5)+strmobinfo(7,.Master_Mobs[8])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[8]), .Master_Mobs[8], .Master_Ammo[8], "#HH_CONTROLLER01::OnMaster8"; end;
 OnMaster9:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[9]), .Master_Mobs[9], .Master_Ammo[9], "#HH_CONTROLLER01::OnMaster9"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[9])*5)+strmobinfo(7,.Master_Mobs[9])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[9]), .Master_Mobs[9], .Master_Ammo[9], "#HH_CONTROLLER01::OnMaster9"; end;
 OnMaster10:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[10]), .Master_Mobs[10], .Master_Ammo[10], "#HH_CONTROLLER01::OnMaster10"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[10])*5)+strmobinfo(7,.Master_Mobs[10])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[10]), .Master_Mobs[10], .Master_Ammo[10], "#HH_CONTROLLER01::OnMaster10"; end;
 OnMaster11:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[11]), .Master_Mobs[11], .Master_Ammo[11], "#HH_CONTROLLER01::OnMaster11"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[11])*5)+strmobinfo(7,.Master_Mobs[11])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[11]), .Master_Mobs[11], .Master_Ammo[11], "#HH_CONTROLLER01::OnMaster11"; end;
 OnMaster12:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[12]), .Master_Mobs[12], .Master_Ammo[12], "#HH_CONTROLLER01::OnMaster12"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[12])*5)+strmobinfo(7,.Master_Mobs[12])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[12]), .Master_Mobs[12], .Master_Ammo[12], "#HH_CONTROLLER01::OnMaster12"; end;
 OnMaster13:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[13]), .Master_Mobs[13], .Master_Ammo[13], "#HH_CONTROLLER01::OnMaster13"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[13])*5)+strmobinfo(7,.Master_Mobs[13])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[13]), .Master_Mobs[13], .Master_Ammo[13], "#HH_CONTROLLER01::OnMaster13"; end;
 OnMaster14:
-    areamonster "018-2-3", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[14]), .Master_Mobs[14], .Master_Ammo[14], "#HH_CONTROLLER01::OnMaster14"; end;
+    if (rand(0, 2000) >= readparam(Luk)+(strmobinfo(3,.Master_Mobs[14])*5)+strmobinfo(7,.Master_Mobs[14])) {getmapxy(.@m$, .@x, .@y, 0); makeitem(HeroCoin, 10000, .@m$, .@x, .@y);}
+    areamonster "018-2-2@M", 20, 20, 220, 220, strmobinfo(1, .Master_Mobs[14]), .Master_Mobs[14], .Master_Ammo[14], "#HH_CONTROLLER01::OnMaster14"; end;
 
 }