517 lines
11 KiB
Lua
517 lines
11 KiB
Lua
local gc=love.graphics
|
|
local int=math.floor
|
|
local ins,rem=table.insert,table.remove
|
|
|
|
local inputBox=WIDGET.newInputBox{name="input",x=40,y=650,w=1200,h=50}
|
|
local outputBox=WIDGET.newTextBox{name="output",x=40,y=30,w=1200,h=600,font=25,lineH=25,fix=true}
|
|
local function log(str)outputBox:push(str)end
|
|
log{COLOR.lGrape,"Techmino Shell"}
|
|
log{COLOR.lBlue,"©2020 26F Studio some rights reserved"}
|
|
log{COLOR.dRed,"DO NOT RUN ANY CODE YOU DON'T UNDERSTAND"}
|
|
|
|
local history,hisPtr={"?"}
|
|
local the_secret=(14^2*10)..(2*11)
|
|
|
|
local commands={}
|
|
--Basic commands
|
|
do--commands.help(arg)
|
|
--format of table command_help_messages:
|
|
-- key: the command
|
|
-- value: a table containing the following two elements:
|
|
-- description: a string that shows when user types `help` or `help [page]`.
|
|
-- details: an array of strings containing documents, shows when user types `help [command]`.
|
|
local command_help_messages={
|
|
help={
|
|
description="Display help messages.",
|
|
details={
|
|
"Display help messages.",
|
|
"",
|
|
"Aliases: help ?",
|
|
"",
|
|
"Usage:",
|
|
"help",
|
|
"help [page|command_name]",
|
|
},
|
|
},
|
|
["?"]="help",
|
|
["#"]={
|
|
description="Run arbitrary Lua code.",
|
|
details={
|
|
"Run arbitrary Lua code.",
|
|
"",
|
|
"Usage: #[lua_source_code]",
|
|
"",
|
|
"print() can be used to print text into this window.",
|
|
"There is a strange box.",
|
|
},
|
|
},
|
|
exit={
|
|
description="Return to the previous menu.",
|
|
details={
|
|
"Return to the previous menu.",
|
|
"",
|
|
"Aliases: exit quit bye",
|
|
"",
|
|
"Usage: exit",
|
|
},
|
|
},quit="exit",bye="exit",
|
|
echo={
|
|
description="Print a message to this window.",
|
|
details={
|
|
"Print a message to this window.",
|
|
"",
|
|
"Usage: echo [message]",
|
|
},
|
|
},
|
|
url={
|
|
description="Attempt to open a URL with your device.",
|
|
details={
|
|
"Attempt to open a URL with your device.",
|
|
"",
|
|
"Usage: url [url]",
|
|
},
|
|
},
|
|
cls={
|
|
description="Clear the log output.",
|
|
details={
|
|
"Clear the log output.",
|
|
"",
|
|
"Usage: cls",
|
|
},
|
|
},
|
|
rst={
|
|
description="Clear the command history.",
|
|
details={
|
|
"Clear the command history.",
|
|
"",
|
|
"Usage: rst",
|
|
},
|
|
},
|
|
shutdown={
|
|
description="(Attempt to) shutdown your machine.",
|
|
details={
|
|
"(Attempt to) shutdown your machine. Arguments to this command",
|
|
"will be passed on to the system shutdown command.",
|
|
"",
|
|
"Usage:",
|
|
"shutdown",
|
|
"shutdown [args]",
|
|
},
|
|
},
|
|
fn={
|
|
description="Simulates a Function key press.",
|
|
details={
|
|
"Acts as if you have pressed a function key (i.e. F1-F12) on a keyboard.",
|
|
"Useful if you are on a mobile device without access to these keys.",
|
|
"",
|
|
"Usage: fn <1-12>",
|
|
},
|
|
},
|
|
scrinfo={
|
|
description="Display information about the game window.",
|
|
details={
|
|
"Display information about the game window.",
|
|
"",
|
|
"Usage: scrinfo",
|
|
},
|
|
},
|
|
wireframe={
|
|
description="Enable or disable wireframe.",
|
|
details={
|
|
"Enable or disable wireframe.",
|
|
"",
|
|
"Usage: wireframe <true|false>",
|
|
},
|
|
},
|
|
gammacorrect={
|
|
description="Enable or disable gamma correction.",
|
|
details={
|
|
"Enable or disable gamma correction.",
|
|
"",
|
|
"Usage: gammacorrect <true|false>",
|
|
},
|
|
},
|
|
rmwtm={
|
|
description="Remove the \"no recording\" watermark.",
|
|
details={
|
|
"Remove the \"no recording\" watermark.",
|
|
"You will need a password to do that.",
|
|
"",
|
|
"Usage: rmwtm [password]",
|
|
},
|
|
},
|
|
unlockall={
|
|
description="Unlock all modes on the map.",
|
|
details={
|
|
"Unlock all modes on the map.",
|
|
"",
|
|
"Usage: unlockall",
|
|
},
|
|
},
|
|
play={
|
|
description="Load a game mode, including those that are not on the map.",
|
|
details={
|
|
"Load a game mode, including those that are not on the map.",
|
|
"",
|
|
"Usage: play [mode_name]",
|
|
},
|
|
},
|
|
playbgm={
|
|
description="Play a BGM.",
|
|
details={
|
|
"Play a BGM.",
|
|
"",
|
|
"Usage: playbgm [bgmName]"
|
|
},
|
|
},
|
|
stopbgm={
|
|
description="Stop the BGM.",
|
|
details={
|
|
"Stop the BGM.",
|
|
"",
|
|
"Usage: stopbgm"
|
|
},
|
|
},
|
|
theme={
|
|
description="Load a theme.",
|
|
details={
|
|
"Load a theme.",
|
|
"",
|
|
"Usage: theme <classic|xmas|sprfes|zday>",
|
|
},
|
|
},
|
|
}TABLE.reIndex(command_help_messages)
|
|
|
|
local command_help_list={
|
|
"help",
|
|
"#",
|
|
"exit",
|
|
"echo",
|
|
"url",
|
|
"cls",
|
|
"rst",
|
|
"shutdown",
|
|
"fn",
|
|
"scrinfo",
|
|
"wireframe",
|
|
"gammacorrect",
|
|
"rmwtm",
|
|
"unlockall",
|
|
"play",
|
|
"playbgm",
|
|
"stopbgm",
|
|
"theme",
|
|
}
|
|
local pageSize=10
|
|
local maxPage=math.ceil(#command_help_list/pageSize)
|
|
function commands.help(arg)
|
|
--help [command]
|
|
if command_help_messages[arg]then
|
|
for _,v in ipairs(command_help_messages[arg].details)do
|
|
log(v)
|
|
end
|
|
return
|
|
end
|
|
|
|
--help or help [page]
|
|
local page=arg==""and 1 or tonumber(arg)
|
|
if page then
|
|
if page==int(page)and page>=1 and page<=maxPage then
|
|
log"Use help [page] to view more commands,"
|
|
log"or help [command_name] for details of a command."
|
|
log""
|
|
log{COLOR.lPink,"Page ",COLOR.lG,page,COLOR.lPink," of ",COLOR.lG,maxPage}
|
|
for i=pageSize*(page-1)+1,math.min(pageSize*page,#command_help_list)do
|
|
local cmd=command_help_list[i]
|
|
log{COLOR.W,cmd,COLOR.grey," "..command_help_messages[cmd].description}
|
|
end
|
|
else
|
|
log{COLOR.red,"Invalid page number. Must be between 1 and "..maxPage.." (inclusive)."}
|
|
end
|
|
else
|
|
log{COLOR.red,"No command called "..arg}
|
|
end
|
|
|
|
--Else
|
|
end
|
|
end
|
|
function commands.shutdown(arg)os.execute("shutdown "..arg)end
|
|
function commands.cls()outputBox:clear()end
|
|
function commands.rst()
|
|
history,hisPtr={}
|
|
log"History cleared"
|
|
end
|
|
function commands.echo(str)
|
|
if str~=""then
|
|
outputBox:push(str)
|
|
end
|
|
end
|
|
function commands.url(url)
|
|
if url~=""then
|
|
local res,err=pcall(love.system.openURL,url)
|
|
if not res then
|
|
log{COLOR.R,"[ERR] ",COLOR.W,err}
|
|
end
|
|
else
|
|
log{COLOR.water,"Usage: url [url]"}
|
|
end
|
|
end
|
|
commands.exit=backScene
|
|
commands.quit=backScene
|
|
commands.bye=backScene
|
|
|
|
--Game commands
|
|
function commands.fn(n)
|
|
if tonumber(n)then
|
|
n=int(tonumber(n))
|
|
if n>=1 and n<=12 then
|
|
love.keypressed("f"..n)
|
|
return
|
|
end
|
|
end
|
|
log{COLOR.water,"Usage: fn [1~12]"}
|
|
end
|
|
function commands.scrinfo()
|
|
for _,v in next,SCR.info()do
|
|
log(v)
|
|
end
|
|
end
|
|
function commands.wireframe(bool)
|
|
if bool=="true"or bool=="false"then
|
|
gc.setWireframe(bool=="true")
|
|
log("Wireframe: "..(gc.isWireframe()and"on"or"off"))
|
|
else
|
|
log{COLOR.water,"Usage: wireframe [true|false]"}
|
|
end
|
|
end
|
|
function commands.gammacorrect(bool)
|
|
if bool=="true"or bool=="false"then
|
|
love._setGammaCorrect(bool=="true")
|
|
log("GammaCorrect: "..(gc.isGammaCorrect()and"on"or"off"))
|
|
else
|
|
log{COLOR.water,"Usage: gammacorrect [true|false]"}
|
|
end
|
|
end
|
|
function commands.rmwtm(pw)
|
|
if pw==the_secret then
|
|
_G["\100\114\97\119\70\87\77"]=NULL
|
|
log("\87\97\116\101\114\109\97\114\107\32\82\101\109\111\118\101\100")
|
|
SFX.play("clear")
|
|
else
|
|
log{COLOR.water,"Usage: rmwtm [password]"}
|
|
end
|
|
end
|
|
function commands.unlockall(bool)
|
|
if bool=="sure"then
|
|
for name,M in next,MODES do
|
|
if type(name)=="string"and not RANKS[name]and M.x then
|
|
RANKS[name]=M.score and 0 or 6
|
|
end
|
|
end
|
|
FILE.save(RANKS,"conf/unlock")
|
|
log("\85\78\76\79\67\75\65\76\76")
|
|
SFX.play("clear_2")
|
|
else
|
|
log"Are you sure to unlock all modes?"
|
|
log"Type: unlockall sure"
|
|
end
|
|
end
|
|
function commands.play(m)--marathon_bfmax can only entered through here
|
|
if MODES[m]then
|
|
loadGame(m)
|
|
elseif m~=""then
|
|
log("No mode called "..m)
|
|
else
|
|
log{COLOR.water,"Usage: play [modeName]"}
|
|
end
|
|
end
|
|
function commands.playbgm(bgm)
|
|
if bgm~=""then
|
|
if bgm~=BGM.nowPlay then
|
|
local t=BGM.nowPlay
|
|
BGM.play(bgm)
|
|
if t==BGM.nowPlay then
|
|
log("No BGM called "..bgm)
|
|
else
|
|
log("Now playing: "..bgm)
|
|
end
|
|
end
|
|
else
|
|
log{COLOR.water,"Usage: playbgm [bgmName]"}
|
|
end
|
|
end
|
|
function commands.stopbgm()
|
|
BGM.stop()
|
|
end
|
|
function commands.theme(name)
|
|
if name=="classic"then
|
|
THEME=false
|
|
BG.setDefault("space")
|
|
BGM.setDefault("blank")
|
|
BGM.play()
|
|
elseif name=="xmas"then
|
|
THEME="xMas"
|
|
BG.setDefault("snow")
|
|
BGM.setDefault("mXmas")
|
|
BGM.play()
|
|
elseif name=="sprfes"then
|
|
THEME="sprFes"
|
|
BG.setDefault("firework")
|
|
BGM.setDefault("spring festival")
|
|
BGM.play()
|
|
elseif name=="zday"then
|
|
THEME="zDay"
|
|
BG.setDefault("lanterns")
|
|
BGM.setDefault("overzero")
|
|
BGM.play()
|
|
else
|
|
if name~=""then
|
|
log("No theme called "..name)
|
|
end
|
|
log{COLOR.water,"Usage: theme [themeName]"}
|
|
end
|
|
end
|
|
|
|
|
|
|
|
--Environment for user's function
|
|
local noLog=false
|
|
local function log_user(str)
|
|
if noLog then return end
|
|
outputBox:push(tostring(str))
|
|
end
|
|
local userG={
|
|
_VERSION=VERSION_CODE,
|
|
assert=assert,error=error,
|
|
tonumber=tonumber,tostring=tostring,
|
|
select=select,next=next,
|
|
ipairs=ipairs,pairs=pairs,
|
|
print=log_user,type=type,
|
|
pcall=pcall,xpcall=xpcall,
|
|
rawget=rawget,rawset=rawset,rawlen=rawlen,rawequal=rawequal,
|
|
setfenv=setfenv,setmetatable=setmetatable,
|
|
-- require=require,
|
|
-- load=load,loadfile=loadfile,dofile=dofile,
|
|
-- getfenv=getfenv,getmetatable=getmetatable,
|
|
-- collectgarbage=collectgarbage,
|
|
|
|
math={},string={},table={},bit={},coroutine={},
|
|
debug={"No way."},package={"No way."},io={"No way."},os={"No way."},
|
|
}userG._G=userG
|
|
TABLE.complete(math, userG.math)
|
|
TABLE.complete(string, userG.string)
|
|
userG.string.dump=nil
|
|
TABLE.complete(table, userG.table)
|
|
TABLE.complete(bit, userG.bit)
|
|
TABLE.complete(coroutine, userG.coroutine)
|
|
|
|
--Puzzle box
|
|
local first_key={}
|
|
local fleg={
|
|
pw=the_secret,
|
|
second_box="Coming soon",
|
|
}setmetatable(fleg,{__tostring=function()return"The fl\97g."end})
|
|
local function first_box(k,f)
|
|
if k~=first_key then log"Usage:"log"?"return end
|
|
if not f then log"Two keys needed"return end
|
|
if type(f):byte()~=102 then log"Function need"return end
|
|
noLog=true
|
|
if not f()then noLog=false log"There are something in the void."return end
|
|
if f()~=f then noLog=false log"It is itself."return end
|
|
if f(26)~=math.huge then noLog=false log"26 can create the huge"return end
|
|
noLog=false
|
|
log"You lose."
|
|
return fleg
|
|
end
|
|
userG.the_key=first_key
|
|
userG.the_box=first_box
|
|
|
|
|
|
|
|
local scene={}
|
|
|
|
function scene.sceneInit()
|
|
TASK.new(function()YIELD()WIDGET.sel=inputBox end)
|
|
BG.set("none")
|
|
end
|
|
|
|
function scene.keyDown(k)
|
|
if k=="return"then
|
|
local input=inputBox.value
|
|
if input==""then return end
|
|
|
|
--Write History
|
|
ins(history,input)
|
|
if history[27]then rem(history,1)end
|
|
hisPtr=nil
|
|
|
|
--Insert empty line
|
|
log""
|
|
|
|
--Execute
|
|
input=input:sub((input:find("%S")))
|
|
if input:byte()==35 then
|
|
--Execute lua code
|
|
log{COLOR.lC,"> "..input}
|
|
local code,err=loadstring(input:sub(2))
|
|
if code then
|
|
setfenv(code,userG)
|
|
code,err=pcall(code)
|
|
if not code then
|
|
log{COLOR.R,"[ERR] ",COLOR.W,err}
|
|
end
|
|
else
|
|
log{COLOR.R,"[SYNTAX ERR] ",COLOR.W,err}
|
|
end
|
|
else
|
|
--Execute builtin command
|
|
log{COLOR.lSea,"> "..input}
|
|
local p=input:find(" ")
|
|
local cmd,arg
|
|
if p then
|
|
cmd=input:sub(1,p-1):lower()
|
|
arg=input:sub(input:find("%S",p+1)or -1)
|
|
else
|
|
cmd=input
|
|
arg=""
|
|
end
|
|
if commands[cmd]then
|
|
commands[cmd](arg)
|
|
else
|
|
log{COLOR.R,"No command called "..cmd}
|
|
end
|
|
end
|
|
inputBox:clear()
|
|
elseif k=="up"then
|
|
if not hisPtr then
|
|
hisPtr=#history
|
|
if hisPtr>0 then
|
|
inputBox.value=history[hisPtr]
|
|
end
|
|
elseif hisPtr>1 then
|
|
hisPtr=hisPtr-1
|
|
inputBox.value=history[hisPtr]
|
|
end
|
|
elseif k=="down"then
|
|
if hisPtr then
|
|
hisPtr=hisPtr+1
|
|
if history[hisPtr]then
|
|
inputBox.value=history[hisPtr]
|
|
else
|
|
hisPtr=nil
|
|
inputBox.value=""
|
|
end
|
|
end
|
|
elseif k=="escape"then
|
|
WIDGET.sel=inputBox
|
|
else
|
|
WIDGET.keyPressed(k)
|
|
end
|
|
end
|
|
|
|
scene.widgetList={
|
|
inputBox,
|
|
outputBox,
|
|
}
|
|
|
|
return scene |