Updated to mkxp-z v2.1.1, renamed and rearranged some script files

Data/Scripts/018_Minigames/005_Minigame_Lottery.rb

@@ -0,0 +1,54 @@
+################################################################################
+# "Lottery" mini-game
+# By Maruno
+################################################################################
+def pbSetLotteryNumber(variable=1)
+  t = pbGetTimeNow
+  hash = t.day + (t.month << 5) + (t.year << 9)
+  srand(hash)                      # seed RNG with fixed value depending on date
+  lottery = rand(65536)            # get a number
+  srand                            # reseed RNG
+  pbSet(variable,sprintf("%05d",lottery))
+end
+
+def pbLottery(winnum,nameVar=2,positionVar=3,matchedVar=4)
+  winnum=winnum.to_i
+  winpoke=nil
+  winpos=0
+  winmatched=0
+  for i in $Trainer.party
+    thismatched=0
+    id=i.owner.public_id
+    for j in 0...5
+      if (id/(10**j))%10 == (winnum/(10**j))%10
+        thismatched+=1
+      else
+        break
+      end
+    end
+    if thismatched>winmatched
+      winpoke=i.name
+      winpos=1 # Party
+      winmatched=thismatched
+    end
+  end
+  pbEachPokemon { |poke,_box|
+    thismatched=0
+    id=poke.owner.public_id
+    for j in 0...5
+      if (id/(10**j))%10 == (winnum/(10**j))%10
+        thismatched+=1
+      else
+        break
+      end
+    end
+    if thismatched>winmatched
+      winpoke=poke.name
+      winpos=2 # Storage
+      winmatched=thismatched
+    end
+  }
+  $game_variables[nameVar]=winpoke
+  $game_variables[positionVar]=winpos
+  $game_variables[matchedVar]=winmatched
+end