datablock fxDtsBrickData(LogicGate_Rom4x4_Data){ brickFile = $LuaLogic::Path @ "bricks/gen/newbricks/ROM 4x4.blb"; iconName = $LuaLogic::Path @ "bricks/gen/newicons/ROM 4x4"; category = "Logic Bricks"; subCategory = "Special I/O"; uiName = "ROM 4x4"; logicUIName = "ROM 4x4"; logicUIDesc = ""; hasPrint = 1; printAspectRatio = "Logic"; logicBrickSize = "4 4 1"; orientationFix = 3; isLogic = true; isLogicGate = true; isLogicInput = false; logicInit = "return function(gate) " @ " gate.romdata = {} " @ " for i = 0, 15 do " @ " gate.romdata[i] = false " @ " end " @ "end" ; logicInput = "return function(gate, args) " @ " local data = args[1] " @ " for i = 1, #data do " @ " local c = data:sub(i, i) " @ " gate.romdata[i-1] = (c==\"1\") " @ " end " @ " Gate.queue(gate, 0) " @ "end" ; logicUpdate = "return function(gate) " @ " if Gate.getportstate(gate, 6) then " @ " Gate.setportstate(gate, 5, gate.romdata[( " @ " (Gate.getportstate(gate, 1) and 1 or 0) " @ " + (Gate.getportstate(gate, 2) and 2 or 0) " @ " + (Gate.getportstate(gate, 3) and 4 or 0) " @ " + (Gate.getportstate(gate, 4) and 8 or 0) " @ " )]) " @ " else " @ " Gate.setportstate(gate, 5, false) " @ " end " @ "end" ; logicGlobal = ""; numLogicPorts = 6; isLogicRom = true; logicRomY = 4; logicRomX = 4; logicPortType[0] = 1; logicPortPos[0] = "3 -3 0"; logicPortDir[0] = 3; logicPortUIName[0] = "Addr0"; logicPortCauseUpdate[0] = true; logicPortType[1] = 1; logicPortPos[1] = "1 -3 0"; logicPortDir[1] = 3; logicPortUIName[1] = "Addr1"; logicPortCauseUpdate[1] = true; logicPortType[2] = 1; logicPortPos[2] = "-1 -3 0"; logicPortDir[2] = 3; logicPortUIName[2] = "Addr2"; logicPortCauseUpdate[2] = true; logicPortType[3] = 1; logicPortPos[3] = "-3 -3 0"; logicPortDir[3] = 3; logicPortUIName[3] = "Addr3"; logicPortCauseUpdate[3] = true; logicPortType[4] = 0; logicPortPos[4] = "3 3 0"; logicPortDir[4] = 1; logicPortUIName[4] = "Out"; logicPortType[5] = 1; logicPortPos[5] = "3 -3 0"; logicPortDir[5] = 2; logicPortUIName[5] = "In"; logicPortCauseUpdate[5] = true; }; function LogicGate_Rom4x4_Data::Logic_onAdd(%data, %brick) { lualogic_rom_updatedata(%brick); }