User File #17215499051758871

Upload All User Files

#17215499051758871 - Crash Bandicoot Huge Adventure - lua v2.0 - Virtual Boy Advance (Final)

CrashGBA - v2.0 VBA.lua
1278 downloads
Uploaded 9/6/2014 6:52 AM by Spikestuff (see all 268)
-- Crash Huge Adventure lua v2.0 Virtual Boy Advance
-- This is Community Work Please Help
-- Join in add updates of your own and add your name

-- Values found by: Spikestuff, Got4n, Dica
-- Script Edited by: Spikestuff, Ilari, Dica

while true do
area = memory.readbyte(0x03001644)
areab = memory.readbyte(0x0200000E)
mask = memory.readbyte(0x0200009C)
lvl = memory.readbyte(0x0200000E)

if area == 11 or area == 13 or area == 14 or area == 15 or area == 16 or area == 17 then else
	if area == 5 or area == 9 then
			gui.text(2,32,memory.readwordsigned(0x3003F34),"orange")
		else
	if area == 2 and areab == 3 or area == 18 then
			gui.text(2,120,memory.readwordsigned(0x3001404),"yellow")
		else
			gui.text(2,120,memory.readwordsigned(0x300082C),"yellow")
end end end

if area == 9 then  -- N.Gin Fight
	bhealth = memory.readbyte(0x03004130)
	thealth = memory.readbyte(0x030040B0)
	lhealth = memory.readshort(0x030041B0)
	rhealth = memory.readshort(0x03004230)
	if bhealth == 255 or bhealth == -1 then else
		gui.text(18,48,"Bomb: " .. (bhealth+1)/2) end
	if lhealth == 0 and rhealth == 0 then else
		gui.text(6,56,"Rockets: " .. (lhealth/2) .. "/" .. (rhealth/2)) end
	if thealth == 255 or thealth == -1 then else
		gui.text(10,64,"Turret: " .. (thealth+1)/2) end
end

if area == 8 then -- Dingodile Fight
	dshi = memory.readbyte(0x02003EFC)
	gui.text(2,32,"Shield: " .. ((dshi == 1) and "ON" or "OFF")); else
end

if area == 16 then
	aku = memory.readbyte(0x0200009C)
	gui.text(2,9,"Mask Level: " .. aku,"yellow") else
end

if area == 2 and areab == 3 or area == 18 then else
	if area == 11 or area == 13 or area == 14 or area == 15 or area == 16 or area == 17 then else
		if area == 6 then --Bonus
			gui.text(2,32,"Pixel X: " .. memory.readword(0x2010E2D))
			gui.text(2,40,"Pixel Y: " .. memory.readword(0x2010E31))
			gui.text(2,48,"Speed X: " .. memory.readwordsigned(0x2010E8C))
			gui.text(2,56,"Speed Y: " .. memory.readwordsigned(0x2010E90))
			gui.text(2,128,"Slide Time: 22/" .. memory.readwordsigned(0x20111F4),"orange")
			gui.text(2,136," Spin Time: 23/" .. memory.readwordsigned(0x20111F4),"orange")
		else
		if area == 5 or area == 9 then -- Flying Cooldown
			cdwn = memory.readbyte(0x030014E0)-1
			if cdwn ~= -1 then
				gui.text(2,40,"Cooldown: " .. cdwn)
			end
		else
		if area == 10 then -- Neo Cortex and Mega Mix
			gui.box(0,142,240,160,"black")
			gui.text(188,143,"Pixel X: " .. memory.readword(0x2010A15))
			gui.text(188,151,"Pixel Y: " .. memory.readword(0x2010A19))
			gui.text(124,143,"Speed X: " .. memory.readwordsigned(0x2010A74))
			gui.text(124,151,"Speed Y: " .. memory.readwordsigned(0x2010A78))
			gui.text(132,134,"Slide: 22| " .. memory.readwordsigned(0x2010DDC).. " |23 :Spin","yellow")
		else -- Normal
			gui.text(2,32,"Pixel X: " .. memory.readword(0x2010A15))
			gui.text(2,40,"Pixel Y: " .. memory.readword(0x2010A19))
			gui.text(2,48,"Speed X: " .. memory.readwordsigned(0x2010A74))
			gui.text(2,56,"Speed Y: " .. memory.readwordsigned(0x2010A78))
			if area == 1 or area == 8 then
				gui.text(2,136," Spin Dur.: 24/" .. memory.readwordsigned(0x2010DDC),"green")
			else
				gui.text(2,128,"Slide Time: 22/" .. memory.readwordsigned(0x2010DDC),"yellow")
				gui.text(2,136," Spin Time: 23/" .. memory.readwordsigned(0x2010DDC),"yellow") end
end end end end end

if movie.active()==false then
	gui.drawbox(0,0,78,8, "red")
	gui.text(2,1, "MOVIE NOT RECORDING")
	else
	gui.text(2,1,"RR: " .. movie.rerecordcount())
end

vba.frameadvance() end