@preparefloor = (par, lvl, safe=false) => par.onCollide mario, () => if mario.getY() < par.getY() if mario.level > lvl and not safe mario.hit mario mario.level = lvl par.onCollide mario2, () => if mario2.getY() + 20 < par.getY() if mario.level > lvl and not safe mario.hit mario2 mario.level = lvl @preparedown = (par) => par.onCollide mario1, () => if mario1.move mario1.setY mario1.getY() - 10 mario1.move = no mario1.startAnimation "down" @preparestopper = (par) => par.onCollide mario1, () => mario1.setY mario1.getY() + 2 @preparehammer = (par) => par.onCollide mario, () => mario2.swap() hammertimer.start 8 par.destroy() glorysound.play() score.value += 100 @prepareladder = (par, dis, dn, stop="not") => dn.setX par.getX() dn.setY par.getY() + dis + 21 # 12, 21 #par.dis = dis if stop != "not" stop.setX par.getX() stop.setY par.getY() + 20 par.onKey = (key) => if not mario1.move if key == keyboard.up and Math.abs(mario.getX() - par.getX()) < 10 and Math.abs(mario.getY() - par.getY() - dis) < 10 mario.setX 670 mario.setY 120 mario1.setX par.getX() mario1.setY par.getY() + dis mario1.move = yes if key == keyboard.down and Math.abs(mario.getX() - par.getX()) < 10 and Math.abs(mario.getY() - par.getY()) < 10 mario.setX 670 mario.setY 120 mario1.setX par.getX() mario1.setY par.getY() + 25 mario1.startAnimation "unclimb" par.onCollide mario1, () => if mario1.move mario1.setY mario1.getY() - 20 mario1.move = no mario1.startAnimation "climb" @preparebarrelright = (par) => par.addAnimation "right", [1, 2, 3, 4], 9 par.addAnimation "down", [0], 1 par.setSpeed 0.7 par.a = 1 par.b = 0.05 par.c = 1 par.usingstair = false x = random 0, 1 time = game.time.now + 500 par.hit = () => par.setX 660 par.setY 10 par.a = 1 boingsound.play() score.value += 100 par.FloorFall = (r) => par.jump 0.1 if x > Math.abs(r) par.a = r else par.a = -r par.c = par.a par.AfterStair = () => par.jump 0.1 par.b = 0.05 par.a = par.c par.usingstair = false par.ladderFall = (lad, r) => if time < game.time.now time = game.time.now + 500 y = random 0, 1 if y > Math.abs(r) par.setX lad.getX() + 5*Math.abs(r)/r par.b = 0 par.a = 0 par.usingstair = true par.c = r par.onCollide mario, () => if mario.getY() - 5 < par.getY() or par.usingstair mario.hit mario failsound.play() par.onCollide mario1, () => if par.usingstair mario.hit mario1 failsound.play() par.onCollide mario2, () => par.hit() par.onCollide floor6, () => par.AfterStair() par.onCollide floor12, () => par.AfterStair() par.onCollide floor19, () => par.AfterStair() par.onCollide floor25, () => par.AfterStair() par.onCollide floor32, () => par.AfterStair() par.onCollide floor4, () => par.FloorFall -0.1 par.onCollide floor17, () => par.FloorFall 0.3 par.onCollide floor30, () => par.FloorFall -0.5 par.onCollide ladder, () => par.ladderFall ladder, -0.8 par.onCollide ladder1, () => par.ladderFall ladder1, 0.8 par.onCollide ladder2, () => par.ladderFall ladder2, -0.8 par.onCollide ladder4, () => par.ladderFall ladder4, 0.8 par.onCollide ladder5, () => par.ladderFall ladder5, -0.8 par.onCollide invisiblewall, () => par.a = 0 par.onCollide invisiblewall1, () => par.a = 0 par.onCollide invisiblewall2, () => par.a = 0 par.onCollide fire, () => par.hit() if time < game.time.now time = game.time.now + 300 fire.make += 1 par.onCollideWithWorldBounds = (directions) => if directions.down == yes par.hit() loop par.step par.a if par.b != 0 par.jump par.b if par.a == 0 par.startAnimation "down" else par.startAnimation "right" @preparefireball = (par,friend) => par.addAnimation "move", [0, 1], 9, yes par.startAnimation "move" par.setSpeed 0.5 par.x = 0 par.a = 0 par.target = null par.rand = random 0, 1 par.time = game.time.now + 3000 par.hit = () => par.setX 660 par.setY 10 par.a = 0 boingsound.play() score.value += 100 par.BeforeStair = (s) => if par.time < game.time.now and Math.abs(par.getX() - s.getX()) < 20# and Math.abs(par.getY() - s.getY() - s.dis) < 10 par.time = game.time.now + 3000 if par.rand < 0.8 par.target = s par.rand = random 0, 1 par.onCollide mario, () => mario.hit mario failsound.play() par.onCollide mario1, () => mario.hit mario1 failsound.play() par.onCollide mario2, () => par.hit() friend.onCollide mario, () => mario.hit mario friend.onCollide mario1, () => mario.hit mario1 par.onCollide floor6, () => par.BeforeStair(ladder2) par.onCollide floor12, () => par.BeforeStair(ladder5) par.onCollide floor19, () => par.BeforeStair(ladder1) par.onCollide floor25, () => par.BeforeStair(ladder4) par.onCollide floor32, () => par.BeforeStair(ladder) par.onUpdate = () => par.jump par.a loop if par.a != 0 if par.target != null until Math.abs(par.getX() - par.target.getX()) < 2 par.step (par.target.getX() - par.getX())/Math.abs(par.getX() - par.target.getX()) friend.setX par.target.getX() friend.setY par.getY() par.setX 750 par.setY 0 until friend.getY() < par.target.getY() 5.times => friend.setY friend.getY() - 2 par.step 0 10.times => par.step 0 par.setX friend.getX() par.setY friend.getY() - 10 friend.setX 750 friend.setY 100 par.target = null 3.times => if Math.round(par.getY()/60) - Math.round(mario.getY()/60) != 0 par.x = Math.pow(-1,Math.round(par.getY()/60)) else par.x = random -500 + mario.getX() - par.getX(), 500 + mario.getX() - par.getX() if par.getX() < 120 par.x = 1 if par.getX() > 580 par.x = -1 par.step 30 * par.x / Math.abs(par.x) 30.times => par.step 0 60.times => par.step 0