-- Fall Balls V 1.0 -- by WIZ function eventMainMap() tfm.exec.disableAutoShaman(true) tfm.exec.disableAfkDeath(true) tfm.exec.disableAutoNewGame(true) tfm.exec.disablePhysicalConsumables(true) tfm.exec.disableDebugCommand(true) tfm.exec.disableMortCommand(true) tfm.exec.disableAutoScore(true) tfm.exec.newGame([[

]]) end eventMainMap() function eventResetVariables() --R-V-0 --Variables Mice = 0 end --R-V-0 eventResetVariables() BallI1 = "18a86ae275b.png" BallI2 = "18a86ae74f9.png" BallI3 = "18a86aec1cc.png" BallI4 = "18a86af0ec0.png" BallI5 = "18a86af5f2c.png" BallI6 = "18a86afabec.png" BallI7 = "18a86aff8e5.png" BallI8 = "18a86b0460a.png" BallL1 = {} BallL2 = {} BallL3 = {} BallL4 = {} BallL5 = {} BallL6 = {} BallL7 = {} BallL8 = {} Money = {} BallP = {} StartTime = {} CD = {} function eventShopShow(name) --S-S-0 q = 0 for i=1, 20 do ui.removeTextArea(q,name) q = q + 1 end tfm.exec.removeImage(BallL1[name]) tfm.exec.removeImage(BallL2[name]) tfm.exec.removeImage(BallL3[name]) tfm.exec.removeImage(BallL4[name]) tfm.exec.removeImage(BallL5[name]) tfm.exec.removeImage(BallL6[name]) tfm.exec.removeImage(BallL7[name]) tfm.exec.removeImage(BallL8[name]) ui.addTextArea(-1,"

~~P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) ui.addTextArea(0," ",name,0,0,820,100, 0x100000, 0x000000,0.8,true) ui.addTextArea(1,"~~

~~\n\n\n\n0 P",name,45,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(2,"~~

~~\n\n\n\n10 P",name,135,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(3,"~~

~~\n\n\n\n50 P",name,225,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(4,"~~

~~\n\n\n\n200 P",name,315,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(5,"~~

~~\n\n\n\n1000 P",name,405,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(6,"~~

~~\n\n\n\n10000 P",name,495,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(7,"~~

~~\n\n\n\n100000 P",name,585,-10,80,100, 0x100000, 0x333333,0.8, true) ui.addTextArea(8,"~~

~~\n\n\n\n1000000 P",name,675,-10,80,100, 0x300000, 0x333333,0.8, true) ui.addTextArea(30,"~~

~~x10",name,368,2910,60,60, 0x100000, 0x333333,0) ui.addTextArea(31,"~~

~~x5",name,314,2930,60,60, 0x100000, 0x333333,0) ui.addTextArea(32,"~~

~~x5",name,424,2930,60,60, 0x100000, 0x333333,0) ui.addTextArea(33,"~~

~~x3",name,165,2940,60,60, 0x100000, 0x333333,0) ui.addTextArea(34,"~~

~~x3",name,575,2940,60,60, 0x100000, 0x333333,0) ui.addTextArea(35,"~~

~~x2",name,240,2940,60,60, 0x100000, 0x333333,0) ui.addTextArea(36,"~~

x2",name,500,2940,60,60, 0x100000, 0x333333,0) BallL1[name] = tfm.exec.addImage(BallI1,"&1",70,30,name) BallL2[name] = tfm.exec.addImage(BallI2,"&1",160,30,name) BallL3[name] = tfm.exec.addImage(BallI3,"&1",250,30,name) BallL4[name] = tfm.exec.addImage(BallI4,"&1",340,30,name) BallL5[name] = tfm.exec.addImage(BallI5,"&1",430,30,name) BallL6[name] = tfm.exec.addImage(BallI6,"&1",520,30,name) BallL7[name] = tfm.exec.addImage(BallI7,"&1",610,30,name) BallL8[name] = tfm.exec.addImage(BallI8,"&1",700,30,name) end --S-S-0 --& function eventShopHide(name) --S-H-0 q = 0 for i=1, 20 do ui.removeTextArea(q,name) q = q + 1 end tfm.exec.removeImage(BallL1[name]) tfm.exec.removeImage(BallL2[name]) tfm.exec.removeImage(BallL3[name]) tfm.exec.removeImage(BallL4[name]) tfm.exec.removeImage(BallL5[name]) tfm.exec.removeImage(BallL6[name]) tfm.exec.removeImage(BallL7[name]) tfm.exec.removeImage(BallL8[name]) end --S-H-0 function eventNewPlayer(name) tfm.exec.setUIMapName("Fall Balls") Money[name] = 0 BallP[name] = 0 CD[name] = 1 eventShopShow(name) tfm.exec.setPlayerScore(name, 0) end for name in next, tfm.get.room.playerList do eventNewPlayer(name) end function eventContactListener(name, groundId, contactInfos) -- C-L-0 if (groundId == 208) or (groundId == 207) then Money[name] = Money[name] + BallP[name] tfm.exec.setPlayerScore(name, Money[name]) tfm.exec.giveCheese(name) tfm.exec.playerVictory(name) eventShopShow(name) end if (groundId == 206) or (groundId == 205) then Money[name] = Money[name] + (BallP[name] * 2 * CD[name]) tfm.exec.setPlayerScore(name, Money[name]) tfm.exec.giveCheese(name) tfm.exec.playerVictory(name) eventShopShow(name) end if (groundId == 204) or (groundId == 203) then Money[name] = Money[name] + (BallP[name] * 3 * CD[name]) tfm.exec.setPlayerScore(name, Money[name]) tfm.exec.giveCheese(name) tfm.exec.playerVictory(name) eventShopShow(name) end if (groundId == 202) or (groundId == 201) then Money[name] = Money[name] + (BallP[name] * 5 * CD[name]) tfm.exec.setPlayerScore(name, Money[name]) tfm.exec.giveCheese(name) tfm.exec.playerVictory(name) eventShopShow(name) end if groundId == 200 then Money[name] = Money[name] + (BallP[name] * 10 * CD[name]) tfm.exec.setPlayerScore(name, Money[name]) tfm.exec.giveCheese(name) tfm.exec.playerVictory(name) eventShopShow(name) end end -- C-L-0 function eventTextAreaCallback(id,name,event) -- event-0 if event == "BS1" then tfm.exec.respawnPlayer(name) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI1, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 1 end if event == "BS2" and Money[name] >= 10 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 10 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI2, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 10 end if event == "BS3" and Money[name] >= 50 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 50 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI3, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 50 end if event == "BS4" and Money[name] >= 200 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 200 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI4, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 200 end if event == "BS5" and Money[name] >= 1000 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 1000 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI5, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 1000 end if event == "BS6" and Money[name] >= 10000 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 10000 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI6, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 10000 end if event == "BS7" and Money[name] >= 100000 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 100000 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI7, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 100000 end if event == "BS8" and Money[name] >= 1000000 then tfm.exec.respawnPlayer(name) Money[name] = Money[name] - 1000000 ui.addTextArea(-1,"

P : "..Money[name],name,1,375,160,30, 0x100000, 0x333333,0.8, true) tfm.exec.setPlayerScore(name, Money[name]) eventShopHide(name) tfm.exec.movePlayer(name, (math.random(20,780)), 100) tfm.exec.addImage(BallI8, "%"..name, -15, -15, nil) tfm.exec.freezePlayer(name, true, false) BallP[name] = 1000000 end end -- event-0 function eventPlayerDied(name) eventShopShow(name) end