小游戏场景名统一mg_开头，方便查找

2020-11-16 15:01:06 +08:00
parent 1f45b420cc
commit dda0f04b8d
14 changed files with 100 additions and 97 deletions
--- a/parts/scenes/mg_pong.lua
+++ b/parts/scenes/mg_pong.lua
@@ -0,0 +1,180 @@
+local gc=love.graphics
+local kb=love.keyboard
+
+local abs=math.abs
+local max,min=math.max,math.min
+local rnd=math.random
+
+function sceneInit.mg_pong()
+	BG.set("none")
+	BGM.play("way")
+	sceneTemp={
+		state=0,
+
+		x=640,y=360,
+		vx=0,vy=0,
+		ry=0,
+
+		p1={
+			score=0,
+			y=360,
+			vy=0,
+			y0=false,
+		},
+		p2={
+			score=0,
+			y=360,
+			vy=0,
+			y0=false,
+		},
+	}
+end
+
+local function start()
+	sceneTemp.state=1
+	sceneTemp.vx=rnd()>.5 and 6 or -6
+	sceneTemp.vy=rnd()*6-3
+end
+function keyDown.mg_pong(key)
+	local S=sceneTemp
+	if key=="space"then
+		if S.state==0 then
+			start()
+		end
+	elseif key=="r"then
+		S.state=0
+		S.x,S.y=640,360
+		S.vx,S.vy=0,0
+		S.ry=0
+		S.p1.score,S.p2.score=0,0
+	elseif key=="w"or key=="s"then
+		S.p1.y0=false
+	elseif key=="up"or key=="down"then
+		S.p2.y0=false
+	elseif key=="escape"then
+		SCN.back()
+	end
+end
+function touchDown.mg_pong(id,x,y)
+	touchMove.mg_pong(id,x,y)
+	if sceneTemp.state==0 then
+		start()
+	end
+end
+function touchMove.mg_pong(_,x,y)
+	sceneTemp[x<640 and"p1"or"p2"].y0=y
+end
+function mouseMove.mg_pong(x,y)
+	sceneTemp[x<640 and"p1"or"p2"].y0=y
+end
+
+--Rect Area X:150~1130 Y:20~700
+function Tmr.mg_pong()
+	local S=sceneTemp
+
+	--Update pads
+	local P=S.p1
+	while P do
+		if P.y0 then
+			if P.y>P.y0 then
+				P.y=max(P.y-8,P.y0,70)
+				P.vy=-8
+			elseif P.y<P.y0 then
+				P.y=min(P.y+8,P.y0,650)
+				P.vy=8
+			else
+				P.vy=P.vy*.5
+			end
+		else
+			if kb.isDown(P==S.p1 and"w"or"up")then P.vy=max(P.vy-1,-8)end
+			if kb.isDown(P==S.p1 and"s"or"down")then P.vy=min(P.vy+1,8)end
+			P.y=P.y+P.vy
+			P.vy=P.vy*.9
+			if P.y>650 then
+				P.vy=-P.vy*.5
+				P.y=650
+			elseif P.y<70 then
+				P.vy=-P.vy*.5
+				P.y=70
+			end
+		end
+		P=P==S.p1 and S.p2
+	end
+
+	--Update ball
+	local x,y,vx,vy,ry=S.x,S.y,S.vx,S.vy,S.ry
+	x,y=x+vx,y+vy
+	if ry~=0 then
+		if ry>0 then
+			ry=max(ry-.1,0)
+			vy=vy-.1
+		else
+			ry=min(ry+.1,0)
+			vy=vy+.1
+		end
+	end
+	if S.state==1 then--Playing
+		if x<160 or x>1120 then
+			P=x<160 and S.p1 or S.p2
+			local d=y-P.y
+			if abs(d)<60 then
+				vx=-vx-(vx>0 and .05 or -.5)
+				vy=vy+d*.08+P.vy*.5
+				ry=P.vy
+				SFX.play("collect")
+			else
+				S.state=2
+			end
+		end
+		if y<30 or y>690 then
+			y=y<30 and 30 or 690
+			vy,ry=-vy,-ry
+			SFX.play("collect")
+		end
+	elseif S.state==2 then--Game over
+		if x<-120 or x>1400 or y<-40 or y>760 then
+			P=x>640 and S.p1 or S.p2
+			P.score=P.score+1
+			TEXT.show("+1",x>1400 and 470 or 810,226,50,"score")
+			SFX.play("reach")
+
+			S.state=0
+			x,y=640,360
+			vx,vy=0,0
+		end
+	end
+	S.x,S.y,S.vx,S.vy,S.ry=x,y,vx,vy,ry
+end
+
+function Pnt.mg_pong()
+	local S=sceneTemp
+
+	--Draw score
+	setFont(100)
+	gc.setColor(.4,.4,.4)
+	mStr(S.p1.score,470,20)
+	mStr(S.p2.score,810,20)
+
+	--Draw boundary
+	gc.setColor(1,1,1)
+	gc.setLineWidth(6)
+	gc.line(130,20,1160,20)
+	gc.line(130,700,1160,700)
+
+	--Draw ball & speed line
+	gc.setColor(1,1,1-abs(S.ry)*.16)
+	gc.circle("fill",S.x,S.y,10)
+	gc.setColor(1,1,1,.1)
+	gc.line(S.x+S.vx*22,S.y+S.vy*22,S.x+S.vx*30,S.y+S.vy*30)
+
+	--Draw pads
+	gc.setColor(1,.8,.8)
+	gc.rectangle("fill",130,S.p1.y-50,20,100)
+	gc.setColor(.8,.8,1)
+	gc.rectangle("fill",1130,S.p2.y-50,20,100)
+end
+
+WIDGET.init("mg_pong",{
+	WIDGET.newKey({name="reset",x=640,y=45,w=150,h=50,font=35,code=WIDGET.lnk_pressKey("r")}),
+	WIDGET.newKey({name="back",x=640,y=675,w=150,h=50,font=35,code=WIDGET.lnk_BACK}),
+})