整 理 代 码

(应该没有改到字符串里面的东西吧…)起码不直接影响运行
This commit is contained in:
MrZ_26
2022-10-01 11:32:11 +08:00
parent 6e00ff96ec
commit 06f4bb4e1a
236 changed files with 2087 additions and 2114 deletions

View File

@@ -35,26 +35,26 @@ end
scene.mouseDown=NULL
function scene.keyDown(key)
if kb.isDown('lshift','rshift')then
if key=='='then
if kb.isDown('lshift','rshift') then
if key=='=' then
scene.keyDown('+')
return
elseif kb.isDown('lshift','rshift')and key=='8'then
elseif kb.isDown('lshift','rshift') and key=='8' then
scene.keyDown('*')
return
end
elseif key:sub(1,2)=='kp'then
elseif key:sub(1,2)=='kp' then
scene.keyDown(key:sub(3))
return
end
if keySounds[key]then
if keySounds[key] then
Snd('bell',keySounds[key])
end
if key=='.'then
if sym=="="then
if key=='.' then
if sym=="=" then
sym,reg=false,false
val="0."
elseif not(val:find(".",nil,true)or val:find("e"))then
elseif not (val:find(".",nil,true) or val:find("e")) then
if sym and not reg then
reg=val
val="0."
@@ -62,38 +62,38 @@ function scene.keyDown(key)
val=val.."."
end
end
elseif key=='e'then
if sym=="="then
elseif key=='e' then
if sym=="=" then
sym,reg=false
val="0e"
elseif not val:find("e")then
elseif not val:find("e") then
val=val.."e"
end
elseif key=='backspace'then
if sym=="="then
elseif key=='backspace' then
if sym=="=" then
val=""
elseif sym then
sym=false
else
val=val:sub(1,-2)
end
if val==""then
if val=="" then
val="0"
end
elseif key=='+'then
elseif key=='+' then
_autoReturn()
sym="+"
elseif key=='*'then
elseif key=='*' then
_autoReturn()
sym="*"
elseif key=='-'then
elseif key=='-' then
_autoReturn()
sym="-"
elseif key=='/'then
elseif key=='/' then
_autoReturn()
sym="/"
elseif key:byte()>=48 and key:byte()<=57 then
if sym=="="then
if sym=="=" then
val=key
sym=false
elseif sym and not reg then
@@ -101,35 +101,35 @@ function scene.keyDown(key)
val=key
else
if #val<14 then
if val=="0"then
if val=="0" then
val=""
end
val=val..key
end
end
elseif key=='return'then
elseif key=='return' then
scene.keyDown('calculate')
elseif key=='calculate'then
elseif key=='calculate' then
val=val:gsub("e$","")
if sym and reg then
reg=reg:gsub("e$","")
val=
sym=="+"and tostring((tonumber(reg)or 0)+tonumber(val))or
sym=="-"and tostring((tonumber(reg)or 0)-tonumber(val))or
sym=="*"and tostring((tonumber(reg)or 0)*tonumber(val))or
sym=="/"and tostring((tonumber(reg)or 0)/tonumber(val))or
sym=="+" and tostring((tonumber(reg) or 0)+tonumber(val)) or
sym=="-" and tostring((tonumber(reg) or 0)-tonumber(val)) or
sym=="*" and tostring((tonumber(reg) or 0)*tonumber(val)) or
sym=="/" and tostring((tonumber(reg) or 0)/tonumber(val)) or
"-1"
end
sym="="
reg=false
elseif key=='escape'then
if val~="0"then
elseif key=='escape' then
if val~="0" then
reg,sym=false,false
val="0"
else
SCN.back()
end
elseif key=='delete'then
elseif key=='delete' then
val="0"
end
end
@@ -141,9 +141,9 @@ function scene.draw()
gc.setLineWidth(2)
gc.rectangle('line',100,80,650,150,5)
FONT.set(45)
if reg then gc.printf(reg,0,100,720,'right')end
if val then gc.printf(val,0,150,720,'right')end
if sym then FONT.set(50)gc.print(sym,126,150)end
if reg then gc.printf(reg,0,100,720,'right') end
if val then gc.printf(val,0,150,720,'right') end
if sym then FONT.set(50)gc.print(sym,126,150) end
end
scene.widgetList={