Super Mario Bros. X Forums

Code: Select all

function onTick()
	if player:mem(0x34, FIELD_WORD) == 2 then
		player:kill();
	end
end

Code: Select all

local text = "'write message here'"
local otu = {"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"} 
local storage = {}

function mes(input)

  if input == "SOMETHING" then  -- make an if statement on what you want the player to input, and what should happen when the player writes something
    --code here                          -- you can also use triggerEvent("<EVRNTNAME>") 
  end                                       
  
end

function string.starts(String,Start)
   return string.sub(String,1,string.len(Start))==Start
end

function string.ends(String,End)
   return End=='' or string.sub(String,-string.len(End))==End
end

function onStart()
    player:mem(0x112,FIELD_WORD,2)
end

function onTick()
    Text.print(text, 18, 576)
	
	for i=0, #storage do    --This is for debugging, you can delete this
	    Text.print(storage[i], 0, i*16-16)
	end

end

function onKeyboardPress(vk)

    if text == "'write message here'" and (vk == 8 or vk == 32 or (vk >= 48 and vk <= 57) or (vk >= 65 and vk <= 90)) then
	    text = ""
	end

    if vk >= 65 and vk <= 90 then
        text = text..otu[vk - 64]
    elseif vk >= 48 and vk <= 57 then
        text = text..vk - 48
    elseif vk == 32 then
        text = text.." "    
    elseif vk == 8 then
        text = text:sub(1, -2) 
    elseif vk == 13 and text ~= "'write message here'" then
	    local i = 0
		
        while i>=0 do
		i = i+1

            if storage[i] == nil then
	            storage[i] = text
				mes(text)				
				text = ""
				i = -1
	        end
	    end 
		
    end
 end

Code: Select all

local horikawaTools = API.load("horikawaTools");

function onTick()
   local keyholes = BGO.getIntersecting(player.x + 0.5*player.width - 1, player.y + 0.5*player.height - 1, player.x + 0.5*player.width + 1, player.y + 0.5*player.height + 1);

   for _, k in pairs(keyholes) do
      if k.id == 35 then
         local npc = NPC.spawn(31, player.x, player.y, player.section);
            horikawaTools.makeNPCInvisible(npc);
			
            for m, n in pairs(NPC.get(31)) do
               if n == npc then
                  player:mem(0x154, FIELD_WORD, m);
               end
            end
		
            Level.winState(3);
        end
    end
end

Code: Select all

local npcconfig = API.load("npcconfig");

npcconfig[15].cliffturn = -1;

function onTick()
	for _, v in pairs(NPC.get(15)) do
		if v.ai1 == 3 then
			v.ai1 = 0;
		end
	end
end

Code: Select all

local function reload()
	Graphics.glDraw{vertexCoords = {0, 0, 800, 0, 800, 600, 0, 600}, color = {0, 0, 0, 1}, primitive = Graphics.GL_TRIANGLE_FAN, priority = 10};

	mem(0x00B2C6DA, FIELD_WORD, player:mem(0x15E, FIELD_WORD));
	mem(0x00B25720, FIELD_STRING, Level.filename());
	mem(0x00B250B4, FIELD_WORD, 0);
	mem(0x00B25134, FIELD_WORD, 0);
	mem(0x00B2C89C, FIELD_WORD, 0);
	mem(0x00B2C620, FIELD_WORD, 0);
	mem(0x00B2C5B4, FIELD_WORD, -1);
end

Code: Select all

local pnpc = API.load("pnpc");
local npcconfig = API.load("npcconfig");

local framespeed = npcconfig[15].framespeed;

local frameSets = {[true] = 1, [false] = -1};

function onDraw()
	for _, v in pairs(NPC.get(15)) do
		if (v.ai1 == 0) and (v:mem(0x0A, FIELD_WORD) == 2) then
			local bb = pnpc.wrap(v);
			
			if bb.data.up == nil then
				bb.data.up = true;
				bb.data.counter = 0;
				bb.data.frame = 1;
			end
		
			if bb.data.counter == math.floor(framespeed/2) then
				bb.data.frame = bb.data.frame + frameSets[bb.data.up]
				bb.data.counter = 1;
				
				if bb.data.frame == 4 then
					bb.data.up = false;
				elseif bb.data.frame == 1 then
					bb.data.up = true;
				end
			else
				bb.data.counter = bb.data.counter + 1;
			end
			
			v:mem(0xE4, FIELD_WORD, bb.data.frame);
		end
	end
end