Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- while true do
- -- gui hud
- gui.opacity(0.70)
- gui.drawbox(60,3,210,36,"#00008b", "#dcdcdc")
- -- Weapon
- --- Weapon memory address is variable!!
- weapon = memory.readbyte(0x0200e7f2)
- if weapon == 0 then gui.text(65,21, "[Standard gun]")
- elseif weapon == 1 then gui.text(65,21, "[Slime gun]", "#7fff00")
- elseif weapon == 2 then gui.text(65,21, "[Flame thrower]", "#ffa500")
- elseif weapon == 3 then gui.text(65,21, "[Ice gun]", "#00ffff")
- elseif weapon == 4 then gui.text(65,21, "[Laser shotgun]", "#ff00ff")
- elseif weapon == 5 then gui.text(65,21, "[Laser beam]", "#ff4500")
- elseif weapon == 6 then gui.text(65,21, "[Multi gun]", "#ffff00")
- elseif weapon == 7 then gui.text(65,21, "[Light ball]", "yellow")
- else gui.text(64,21, "unknown weapon") end
- -- Ammo
- gui.opacity(0.80)
- if weapon == 0 then gui.text(64,5, "Ammo: -")
- else gui.text(64,5, "Ammo: " ..memory.readbyte(0x03000472) + 256*memory.readbyte(0x03000473)) end
- gui.text(64,13, "Grenades: " ..memory.readbyte(0x03000474))
- -- Position, Speed, Boss HP
- --- Boss HP and X-Position addresses are variable!!
- --- TODO: Implement X-Pos display
- --- TODO: Implement Boss HP display
- gui.text(130,5, "X-Speed: " ..memory.readbytesigned(0x03000449))
- gui.text(130,13, "Enemies to kill: "..memory.readbyte(0x03000328))
- ---- LEVEL2
- -- Heli 30 HP
- -- Tank 50 HP
- -- FBI agent 50 HP
- -- Statue ~54 HP
- -- Building 65 HP
- -- boss ?? HP
- vba.frameadvance()
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement