IC10
From Unofficial Stationeers Wiki
Documentation for this module may be created at Module:IC10/doc
local p = {}
-- List of IC10 opcodes (all strings)
local opcodes = {
"alias","define","hcf","yield",
"abs","add","ceil","div","pow","exp","floor","log","max","min","mod","move","mul","rand","round","sqrt","sub","trunc","lerp",
"acos","asin","atan","atan2","cos","sin","tan",
"clr","clrd","get","getd","peek","poke","pop","push","put","putd",
"l","lr","ls","s","ss","rmap",
"lb","lbn","lbns","lbs","sb","sbn","sbs",
"and","nor","not","or","sla","sll","sra","srl","xor","ext","ins",
"select","sdns","sdse","sap","sapz","seq","seqz","sge","sgez","sgt","sgtz","sle","slez","slt","sltz","sna","snan","snanz","snaz","sne","snez",
"j","jal","jr",
"bdnvl","bdnvs","bdns","bdnsal","bdse","bdseal","brdns","brdse",
"bap","brap","bapal","bapz","brapz","bapzal",
"beq","breq","beqal","beqz","breqz","beqzal",
"bge","brge","bgeal","bgez","brgez","bgezal",
"bgt","brgt","bgtal","bgtz","brgtz","bgtzal",
"ble","brle","bleal","blez","brlez","blezal",
"blt","brlt","bltal","bltz","brltz","bltzal",
"bna","brna","bnaal","bnan","brnan","bnaz","brnaz","bnazal",
"bne","brne","bneal","bnez","brnez","bnezal"
}
-- Build lookup table for opcodes
local opcode_lookup = {}
for _, op in ipairs(opcodes) do
opcode_lookup[op] = true
end
-- list of parameters
local parameters = {
"On","Activate","Lock","Mode","ClearMemory","Open","Setting",
"Combustion","ExportCount","ImportCount","PrefabHash",
"Minimum","Maximum","Sum","Average",
"Pressure","Ratio","RatioCarbonDioxide","RatioNitrogen","RatioNitrousOxide","RatioOxygen","RatioPollutant","RatioVolatiles","RatioWater",
"Reagents","RecipeHash","Temperature","TotalMoles","Power","Error","RequiredPower",
"PressureInput","TemperatureInput","RatioOxygenInput","RatioCarbonDioxideInput","RatioNitrogenInput",
"RatioPollutantInput","RatioVolatilesInput","RatioWaterInput","RatioNitrousOxideInput","TotalMolesInput",
"PressureOutput","TemperatureOutput","RatioOxygenOutput","RatioCarbonDioxideOutput","RatioNitrogenOutput",
"RatioPollutantOutput","RatioVolatilesOutput","RatioWaterOutput","RatioNitrousOxideOutput","TotalMolesOutput",
"PressureOutput2","TemperatureOutput2","RatioOxygenOutput2","RatioCarbonDioxideOutput2","RatioNitrogenOutput2",
"RatioPollutantOutput2","RatioVolatilesOutput2","RatioWaterOutput2","RatioNitrousOxideOutput2","TotalMolesOutput2",
"CombustionInput","CombustionOutput","CombustionOutput2"
}
-- Build lookup table for parameters
local parameter_lookup = {}
for _, par in ipairs(parameters) do
parameter_lookup[par] = true
end
local function highlight_line(line)
-- breaks strings in IC10 as it escapes "" line = mw.text.nowiki(line)
--minimal replacement instead
line = line
:gsub("&", "&")
:gsub("<", "<")
:gsub(">", ">")
-- comments
line = string.gsub(line, "(#.*)",
'<span style="color:#7f8c8d;font-style:italic;">%1</span>')
-- labels
line = string.gsub(line, "^(%w+:)",
'<span style="color:#0d1b2a;">%1</span>')
-- r0–r9
line = string.gsub(line, "%f[%w]r[0-9]%f[%W]", '<span style="color:#4fc1ff;">%0</span>')
-- r10–r15
line = string.gsub(line, "%f[%w]r1[0-5]%f[%W]", '<span style="color:#4fc1ff;">%0</span>')
-- placeholder r?
line = string.gsub(line, "%f[%w]r%?", '<span style="color:#4fc1ff;">%0</span>')
-- real devices d0–d5
line = string.gsub(line, "%f[%w]d[0-5]%f[%W]",
'<span style="color:#3BD14F;">%0</span>')
-- placeholder d?
line = string.gsub(line, "%f[%w]d%?",
'<span style="color:#3BD14F;">%0</span>')
-- numbers hex
line = string.gsub(line, "(%$[%da-fA-F]+)%f[%W]",
'<span style="color:#4dd0e1;">%1</span>')
-- numbers decimal
line = string.gsub(line, "%f[%w](%-?%d+)%f[%W]",
'<span style="color:#4dd0e1;">%1</span>')
-- opcodes
for op,_ in pairs(opcode_lookup) do
line = string.gsub(line,
"%f[%w]("..op..")%f[%W]",
'<span style="color: #b58900; font-weight: bold;">%1</span>')
end
-- parameters
for par,_ in pairs(parameter_lookup) do
line = string.gsub(line,
"%f[%w]("..par..")%f[%W]",
'<span style="color: #F39C12; font-weight: bold;">%1</span>')
end
return line
end
function p.highlight(frame)
local text = frame.args[1] or ""
local lines = mw.text.split(text, "\n")
for i,line in ipairs(lines) do
lines[i] = highlight_line(line)
end
return '<pre style="font-family:monospace; background-color:#0d1b2a; border:1px solid #1b263b; white-space:pre; display:block; padding:8px; color:#ffffff;">'
.. table.concat(lines, "\n") .. '</pre>'
end
return p