SweetSea/Techmino
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Alpha V0.7.13+

Browse Source
This commit is contained in:
MrZ_26
2020-02-04 19:33:03 +08:00
parent 72dcb84662
commit c9a3e3ce1b
16 changed files with 1255 additions and 1141 deletions
Download Patch File Download Diff File Expand all files Collapse all files

313
main.lua
View File

@@ -1,39 +1,22 @@
lib={
gc=love.graphics,
kb=love.keyboard,
ms=love.mouse,
tc=love.touch,
tm=love.timer,
fs=love.filesystem,
wd=love.window,
mt=love.math,
sys=love.system,
}for k,v in pairs(lib)do _G[k]=v end lib=nil
toN,toS=tonumber,tostring
local gc=love.graphics
local tm=love.timer
local ms,kb=love.mouse,love.keyboard
local fs,sys=love.filesystem,love.system
int,ceil,abs,rnd,max,min,sin,cos,atan,pi=math.floor,math.ceil,math.abs,math.random,math.max,math.min,math.sin,math.cos,math.atan,math.pi
sub,gsub,find,format,byte,char=string.sub,string.gsub,string.find,string.format,string.byte,string.char
ins,rem,sort=table.insert,table.remove,table.sort
null=function()end
ww,wh=gc.getWidth(),gc.getHeight()
Timer=tm.getTime--Easy&Quick to get time!
mx,my,mouseShow=-20,-20,false
xOy=love.math.newTransform()
focus=true
system=sys.getOS()
touching=nil--1st touching ID
scene=""
bgmPlaying=nil
curBG="none"
BGblock={ct=150,next=7}
kb.setKeyRepeat(false)
kb.setTextInput(false)
ms.setVisible(false)
Fonts={}
local Fonts={}
function setFont(s)
if s~=currentFont then
if Fonts[s]then
@@ -45,6 +28,7 @@ function setFont(s)
end
currentFont=s
end
return Fonts[s]
end
gameEnv0={
@@ -54,13 +38,15 @@ gameEnv0={
grid=false,swap=true,
_20G=false,bone=false,
drop=30,lock=45,
wait=1,fall=1,
wait=0,fall=0,
next=6,hold=true,oncehold=true,
keepVisible=true,visible="show",
sequence="bag7",
block=true,visible="show",
target=1e99,
freshLimit=1e99,
block=true,
ospin=true,
freshLimit=1e99,
target=1e99,
reach=null,
bg="none",
bgm="race"
@@ -78,276 +64,19 @@ customSel={
freshLimit=3,
opponent=1,
}
loadmode={
sprint=function()
createPlayer(1,340,15)
end,
marathon=function()
createPlayer(1,340,15)
end,
master=function()
createPlayer(1,340,15)
end,
classic=function()
createPlayer(1,340,15)
end,
zen=function()
createPlayer(1,340,15)
end,
infinite=function()
createPlayer(1,340,15)
end,
solo=function()
createPlayer(1,340,15)
createPlayer(2,965,360,.5,customRange.opponent[3*curMode.lv])
end,
tsd=function()
createPlayer(1,340,15)
end,
blind=function()
createPlayer(1,340,15)
end,
dig=function()
createPlayer(1,340,15)
local P=players[1]
if curMode.lv==1 then
newTask(Event_task.dig_normal,P)
pushSpeed=1
elseif curMode.lv==2 then
newTask(Event_task.dig_lunatic,P)
pushSpeed=1
end
end,
survivor=function()
createPlayer(1,340,15)
newTask(Event_task[curMode.lv==1 and"survivor_easy"or curMode.lv==2 and"survivor_normal"or curMode.lv==3 and"survivor_hard"or curMode.lv==4 and"survivor_lunatic"],P)
pushSpeed=curMode.lv>2 and 2 or 1
end,
tech=function()
createPlayer(1,340,15)
end,
pctrain=function()
createPlayer(1,340,15)
P=players[1]
Event.newPC()
P.freshNext()
end,
pcchallenge=function()
createPlayer(1,340,15)
end,
techmino41=function()
createPlayer(1,340,15)--Player
if curMode.lv==5 then players[1].gameEnv.drop=15 end
local n,min,max=2
if curMode.lv==1 then min,max=5,30
elseif curMode.lv==2 then min,max=3,25
elseif curMode.lv==3 then min,max=2,20
elseif curMode.lv==4 then min,max=2,10
elseif curMode.lv==5 then min,max=1,6
end
for i=1,4 do for j=1,5 do
createPlayer(n,77*i-55,140*j-125,.2,rnd(min,max))
n=n+1
end end
for i=9,12 do for j=1,5 do
createPlayer(n,77*i+275,140*j-125,.2,rnd(min,max))
n=n+1
end end
--AIs
end,
techmino99=function()
createPlayer(1,340,15)--Player
if curMode.lv==5 then players[1].gameEnv.drop=15 end
local n,min,max=2
if curMode.lv==1 then min,max=5,32
elseif curMode.lv==2 then min,max=3,25
elseif curMode.lv==3 then min,max=2,18
elseif curMode.lv==4 then min,max=2,12
elseif curMode.lv==5 then min,max=1,12
end
for i=1,7 do for j=1,7 do
createPlayer(n,46*i-36,97*j-72,.135,rnd(min,max))
n=n+1
end end
for i=15,21 do for j=1,7 do
createPlayer(n,46*i+264,97*j-72,.135,rnd(min,max))
n=n+1
end end
--AIs
end,
drought=function()
createPlayer(1,340,15)
end,
hotseat=function()
if curMode.lv==1 then
createPlayer(1,20,15)
createPlayer(2,650,15)
elseif curMode.lv==2 then
createPlayer(1,20,100,.65)
createPlayer(2,435,100,.65)
createPlayer(3,850,100,.65)
elseif curMode.lv==3 then
createPlayer(1,25,160,.5)
createPlayer(2,335,160,.5)
createPlayer(3,645,160,.5)
createPlayer(4,955,160,.5)
end
end,
custom=function()
for i=1,#customID do
local k=customID[i]
modeEnv[k]=customRange[k][customSel[k]]
end
modeEnv._20G=modeEnv.drop==-1
if modeEnv.opponent==0 then
createPlayer(1,340,15)
else
modeEnv.target=nil
createPlayer(1,340,15)
createPlayer(2,965,360,.9,modeEnv.opponent)
end
end,
}
mesDisp={
--Default:font=35,white
sprint=function()
setFont(70)
local r=max(P.gameEnv.target-P.cstat.row,0)
mStr(r,-75,260)
if r<21 and r>0 then
gc.setLineWidth(3)
gc.setColor(color.lightRed)
gc.line(0,600-30*r,300,600-30*r)
end
end,
marathon=function()
setFont(50)
mStr(P.cstat.row,-75,320)
mStr(P.gameEnv.target,-75,370)
gc.rectangle("fill",-120,376,90,4)
end,
master=function()
setFont(50)
mStr(P.cstat.point,-75,320)
mStr((P.cstat.event+1)*100,-75,370)
gc.rectangle("fill",-120,376,90,4)
end,
classic=function()
setFont(80)
local r=P.gameEnv.target*.1
mStr(r<11 and 19+r or r==11 and"00"or r==12 and"0a"or format("%x",r*10-110),-75,210)
setFont(20)
mStr("speed level",-75,290)
setFont(50)
mStr(P.cstat.row,-75,320)
mStr(P.gameEnv.target,-75,370)
gc.rectangle("fill",-120,376,90,4)
end,
zen=function()
setFont(75)
mStr(max(200-P.cstat.row,0),-75,280)
end,
infinite=function()
setFont(50)
mStr(P.cstat.atk,-75,310)
mStr(format("%.2f",2.5*P.cstat.atk/P.cstat.piece),-75,420)
setFont(20)
mStr("Attack",-75,363)
mStr("Efficiency",-75,475)
end,
tsd=function()
setFont(35)
mStr("TSD",-75,405)
setFont(80)
mStr(P.cstat.event,-75,330)
end,
blind=function()
setFont(25)
mStr("Rows",-75,300)
mStr("Techrash",-75,420)
setFont(80)
mStr(P.cstat.row,-75,220)
mStr(P.cstat.techrash,-75,340)
end,
dig=function()
setFont(70)
mStr(P.cstat.event,-75,310)
setFont(30)
mStr("Wave",-75,375)
end,
survivor=function()
setFont(70)
mStr(P.cstat.event,-75,310)
setFont(30)
mStr("Wave",-75,375)
end,
pctrain=function()
setFont(25)
mStr("Perfect Clear",-75,410)
setFont(80)
mStr(P.cstat.pc,-75,330)
end,
pcchallenge=function()
setFont(25)
mStr("Perfect Clear",-75,430)
setFont(80)
mStr(P.cstat.pc,-75,350)
setFont(50)
mStr(max(100-P.cstat.row,0),-75,250)
end,
techmino41=function()
setFont(40)
mStr(#players.alive.."/41",-75,175)
mStr(P.ko,-60,215)
setFont(25)
gc.print("KO",-115,225)
gc.setColor(1,.5,0,.6)
gc.print(P.badge,-35,227)
gc.setColor(1,1,1)
setFont(30)
gc.print(up0to4[P.strength],-125,290)
for i=1,P.strength do
gc.draw(badgeIcon,16*i-130,260)
end
end,
techmino99=function()
setFont(40)
mStr(#players.alive.."/99",-75,175)
mStr(P.ko,-60,215)
setFont(25)
gc.print("KO",-115,225)
gc.setColor(1,.5,0,.6)
gc.print(P.badge,-35,227)
gc.setColor(1,1,1)
setFont(30)
gc.print(up0to4[P.strength],-125,290)
for i=1,P.strength do
gc.draw(badgeIcon,16*i-130,260)
end
end,
drought=function()
setFont(75)
mStr(max(100-P.cstat.row,0),-75,280)
end,
custom=function()
if P.gameEnv.target<1e4 then
setFont(75)
mStr(max(P.gameEnv.target-P.cstat.row,0),-75,280)
end
end
}
--Game system Data
setting={
lang=1,
ghost=true,center=true,
grid=false,swap=true,
fxs=true,
das=10,arr=2,
sddas=0,sdarr=2,
sfx=true,bgm=true,vib=3,
fullscreen=false,
bgblock=true,
das=10,arr=2,
sddas=0,sdarr=2,
ghost=true,center=true,
grid=false,swap=true,
lang=1,
keyMap={
{"left","right","x","z","c","up","down","space","tab","r","","",""},
{"","","","","","","","","","","","",""},
@@ -422,6 +151,7 @@ virtualkeyDown={false,false,false,false,false,false,false,false,false,false,fals
virtualkeyPressTime={0,0,0,0,0,0,0,0,0,0,0,0,0}
--User Data&User Setting
require"toolfunc"
require"list"
require"class"
require"gamefunc"
require"ai"
@@ -429,7 +159,6 @@ require"timer"
require"paint"
require"call&sys"
require"dataList"
require"list"
require"texture"
userData,userSetting=fs.newFile("userdata"),fs.newFile("usersetting")