@oleg_agapov Without having you to hunt around, here’s something I wrote that might cover some of the things you’re looking for. The object of the game it to fly thru the stationary green balls to creat moving yellow balls. Fly thru the moving yellow balls to destroy a red ball. Avoid hitting a red ball or you’ll destroy your ship. The game is over when all the balls are gone or you run out of ships. Tilt the iPad to steer the ship. Any questions, just ask.
viewer.mode=FULLSCREEN
function setup()
-- allows change of gridSize
gridSize=200
startX,startY=-gridSize-5,-gridSize-5
assert(craft, "Please include Craft as a dependency")
maxSpeed=.5
count=gridSize/2
ships=4
youWon,hitRed,youLost=false,false,false
redBalls,greenBalls,yellowBalls=0,0,0
speed,ey,ang,hgx=0,45,0,0
cameraX,cameraZ=startX,startY
scene = craft.scene()
scene.camera.position = vec3(cameraX,0,cameraZ)
scene.camera.eulerAngles=vec3(ex,ey,ez)
scene.sun.rotation = quat.eulerAngles(45,0,45)
scene.ambientColor = color(90,90,90)
skyMaterial = scene.sky.material
skyMaterial.horizon = color(0, 203, 255, 255)
tab={}
for z=1,count do -- 1=red
createSphere(math.random(-gridSize,gridSize),math.random(-gridSize,gridSize),2,1,255,0,0,0,0)
redBalls=redBalls+1
end
for z=1,count do -- 2=green
createSphere(math.random(-gridSize,gridSize),math.random(-gridSize,gridSize),.5,2,0,255,0,0,0)
greenBalls=greenBalls+1
end
createFloor()
end
function update(dt)
scene:update(dt)
scene.camera.position = vec3(cameraX,1,cameraZ)
scene.camera.eulerAngles=vec3(0,ey,0)
end
function draw()
background(0)
if youLost then
youLostFunc()
elseif hitRed then
hitRedFunc()
elseif youWon then
youWonFunc()
else
update(DeltaTime)
scene:draw()
if paused then
text("PAUSED",WIDTH/2,HEIGHT*.7)
text("Triple tap to restart.",WIDTH/2,HEIGHT*.7-20)
else
text("Triple tap to pause.",WIDTH/2,HEIGHT-10)
updateCameraPos()
checkCollisions()
checkTilt()
drawShip()
drawShipLevels()
end
end
end
function touched(t)
if t.state==BEGAN then
if t.tapCount==3 then
ang=0
paused=not paused
end
if t.tapCount==2 then
if youWon then
setup()
elseif youLost then
setup()
elseif hitRed then
hitRed=false
hgx=Gravity.x
cameraX,cameraZ=startX,startY
ships=ships-1
speed,ey,ang=0,45,0
end
else
ang=0
if speed==0 then
speed=maxSpeed
end
end
end
end
function youLostFunc()
fill(255,0,0)
text("YOU LOST!",WIDTH/2,HEIGHT/2+100)
text("Hold the ipad level then",WIDTH/2,HEIGHT/2+50)
text("Double tap the screen to play again.",WIDTH/2,HEIGHT/2)
end
function hitRedFunc()
sprite(asset.builtin.Tyrian_Remastered.Explosion_Huge,WIDTH/2,HEIGHT/2,500,500)
fill(255,0,0)
text("Hold the ipad level then",WIDTH/2,HEIGHT/2+50)
text("Double tap the screen to continue.",WIDTH/2,HEIGHT/2)
end
function youWonFunc()
fill(255,0,0)
text("YOU WON!",WIDTH/2,HEIGHT/2+100)
text("Hold the ipad level then",WIDTH/2,HEIGHT/2+50)
text("Double tap the screen to play again.",WIDTH/2,HEIGHT/2)
end
function drawShipLevels()
for z=1,ships do
sprite(asset.builtin.Tyrian_Remastered.Boss_A,z*50,HEIGHT-30,40)
end
end
function updateCameraPos()
ey=ey-ang
x=speed*math.sin(math.rad(ey))
z=speed*math.cos(math.rad(ey))
cameraX=cameraX+x
cameraZ=cameraZ+z
end
function checkCollisions()
for a,b in pairs(tab) do
if b.type==1 then
if cameraX>=b.ent.position.x-b.size and
cameraX<=b.ent.position.x+b.size and
cameraZ>=b.ent.position.z-b.size and
cameraZ<=b.ent.position.z+b.size then
if ships==0 then
youLost=true
else
hitRed=true
end
sound(SOUND_EXPLODE, 27037)
end
end
if b.type==2 then
if cameraX>b.ent.position.x-b.size and
cameraX<b.ent.position.x+b.size and
cameraZ>b.ent.position.z-b.size and
cameraZ<b.ent.position.z+b.size then
b.ent:destroy()
table.remove(tab,a)
count=count-1
sound(SOUND_HIT, 19423)
createSphere(math.random(-gridSize,gridSize),
math.random(-gridSize,gridSize),.5,3,255,255,0,.2,.2)
yellowBalls=yellowBalls+1
greenBalls=greenBalls-1
end
end
if b.type==3 then
if cameraX>=b.ent.position.x-b.size and
cameraX<=b.ent.position.x+b.size and
cameraZ>=b.ent.position.z-b.size and
cameraZ<=b.ent.position.z+b.size then
b.ent:destroy()
table.remove(tab,a)
yellowBalls=yellowBalls-1
sound(SOUND_POWERUP, 19422)
yellowHit=true
else
xx=b.ent.position.x
zz=b.ent.position.z
xx=xx+b.xv
zz=zz+b.zv
if xx<-gridSize or xx>gridSize then
b.xv=-b.xv
end
if zz<-gridSize or zz>gridSize then
b.zv=-b.zv
end
b.ent.position=vec3(xx,1,zz)
end
end
end
if yellowHit then -- remove a red ball
yellowHit=false
for z=#tab,1,-1 do
if tab[z].type==1 then
tab[z].ent:destroy()
table.remove(tab,z)
redBalls=redBalls-1
break
end
end
end
if redBalls+greenBalls+yellowBalls==0 then
youWon=true
end
if speed==0 then
text("Tap screen to start.",WIDTH/2,HEIGHT*.75)
end
end
function checkTilt()
gx=Gravity.x
ang=ang+(gx-hgx)*4
hgx=gx
if gx>-.001 and gx<.001 then
ang=0
end
end
function drawShip()
pushMatrix()
translate(WIDTH/2,HEIGHT/2-100)
rotate(ang*-30)
sprite(asset.builtin.Tyrian_Remastered.Boss_A,0,0,300)
fill(255,0,0)
text(redBalls,-40,0)
fill(0,255,0)
text(greenBalls,0,0)
fill(255,255,0)
text(yellowBalls,40,0)
translate()
popMatrix()
end
function createFloor(x,z)
c1=scene:entity()
c1.model = craft.model.cube(vec3(gridSize*2,1,gridSize*2))
c1.position=vec3(x,-.5,z)
c1.material = craft.material(asset.builtin.Materials.Standard)
c1.material.map = readImage(asset.builtin.Surfaces.Desert_Cliff_Color)
c1.material.offsetRepeat=vec4(0,0,50,50)
end
function createSphere(x,z,size,type,r,g,b,xv,zv)
sphere1=scene:entity()
sphere1.model = craft.model.icosphere(size,1)
sphere1.position=vec3(x,1,z)
sphere1.material = craft.material(asset.builtin.Materials.Specular)
sphere1.material.diffuse=color(r,g,b)
table.insert(tab,{ent=sphere1,xv=xv,zv=zv,size=size,type=type})
end
