Cutscene with Images - GameGuru Forum

Author

Message

lordjulian

10

Years of Service

User Offline

Joined: 10th Jan 2014

Location:

Profile

Posted: 7th Sep 2019 20:41 Edited at: 7th Sep 2019 20:47

Link

Hi guys,

I'm wondering if anyone might be kind enough to help me out. I have been working on this for a few days and not getting very far. I am sure it should be simple for a proper scripter.

So, the effect I am trying to create is the kind of thing you might see in an interactive graphic novel. It's kind of like a cutscene but without the video media. I have three images (background, wife and murderer). I am trying to create some parallax scrolling type effect.

I kind of got it to work but it's very messy and I've got it broken into three scripts. I would prefer just one. Anyway here are my bad and messy scripts:

Background:

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
g_myimage = {}
g_mysprite = {}
g_myangle = {}
g_myx = {}
g_myy = {}
function cutscene1_background_init(e)
 g_myimage[e] = LoadImage(GetEntityString(e,0))
 g_mysprite[e] = 0
 g_myangle[e] = 0
 g_myx[e] = 0
 g_myy[e] = 25
end

function cutscene1_background_main(e)
 if g_Entity[e]['plrinzone']==1 then
if cutscenetimer_background == nil then
   StartTimer(e)
   cutscenetimer_background = 1
   end
   if GetTimer(e) < 10000 then
       FreezePlayer()
    else
       SendMessageF("unfreezeplayer",0)
       end

--FreezeAI()
-- FreezePlayer()
  if g_mysprite[e] == 0 then
   g_mysprite[e] = CreateSprite ( g_myimage[e] )
  end
  SetSpriteDepth ( g_mysprite[e], 100 )
  aspectratio = GetImageWidth(g_myimage[e]) / GetImageHeight(g_myimage[e])
  SetSpriteSize ( g_mysprite[e], 200*aspectratio, 100 )
  SetSpriteOffset ( g_mysprite[e], 25*aspectratio, 25 )
  SetSpritePosition ( g_mysprite[e], g_myx[e], g_myy[e] )
  g_myx[e] = g_myx[e] - 0.01
  --g_myangle[e] = g_myangle[e] + 0.1
  --SetSpriteAngle( g_mysprite[e], g_myangle[e] )
  --SetSpriteColor ( g_mysprite[e], math.random(0,255), math.random(0,255), math.random(0,255), 255 )
 end
 
 
 if GetTimer(e) > 10000 and g_mysprite[e] ~= 0 then
  --   Destroy(e)
  DeleteSprite ( g_mysprite[e] )
  --   SendMessageF("unfreezeai",0)
    -- SendMessageF("unfreezeplayer",0)
  Destroy(e)
  end
 
--  SendMessageF("unfreezeai",0)
  --   SendMessageF("unfreezeplayer",0)
  
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
g_myimage = {}
g_mysprite = {}
g_myangle = {}
g_myx = {}
g_myy = {}
function cutscene1_background_init(e)
 g_myimage[e] = LoadImage(GetEntityString(e,0))
 g_mysprite[e] = 0
 g_myangle[e] = 0
 g_myx[e] = 0
 g_myy[e] = 25
end

function cutscene1_background_main(e)
 if g_Entity[e]['plrinzone']==1 then
if cutscenetimer_background == nil then
   StartTimer(e)
   cutscenetimer_background = 1
   end
   if GetTimer(e) < 10000 then
       FreezePlayer()
    else
       SendMessageF("unfreezeplayer",0)
       end

 --FreezeAI()
-- FreezePlayer()
  if g_mysprite[e] == 0 then
   g_mysprite[e] = CreateSprite ( g_myimage[e] )
  end
  SetSpriteDepth ( g_mysprite[e], 100 )
  aspectratio = GetImageWidth(g_myimage[e]) / GetImageHeight(g_myimage[e])
  SetSpriteSize ( g_mysprite[e], 200*aspectratio, 100 )
  SetSpriteOffset ( g_mysprite[e], 25*aspectratio, 25 )
  SetSpritePosition ( g_mysprite[e], g_myx[e], g_myy[e] )
  g_myx[e] = g_myx[e] - 0.01
  --g_myangle[e] = g_myangle[e] + 0.1
  --SetSpriteAngle( g_mysprite[e], g_myangle[e] )
  --SetSpriteColor ( g_mysprite[e], math.random(0,255), math.random(0,255), math.random(0,255), 255 )
 end
 
 
 if GetTimer(e) > 10000 and g_mysprite[e] ~= 0 then
  --   Destroy(e)
  DeleteSprite ( g_mysprite[e] )
  --   SendMessageF("unfreezeai",0)
    -- SendMessageF("unfreezeplayer",0)
  Destroy(e)
  end
 
--  SendMessageF("unfreezeai",0)
  --   SendMessageF("unfreezeplayer",0)
  
end

Wife:

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
g_myimage = {}
g_mysprite = {}
g_myangle = {}
g_myx = {}
g_myy = {}
function cutscene1_wife_init(e)
 g_myimage[e] = LoadImage(GetEntityString(e,0))
 g_mysprite[e] = 0
 g_myangle[e] = 0
 g_myx[e] = 80
 g_myy[e] = 25
end

function cutscene1_wife_main(e)
 if g_Entity[e]['plrinzone']==1 then
 if cutscenetimer_wife == nil then
   StartTimer(e)
   cutscenetimer_wife = 1
   end

--FreezeAI()
 --FreezePlayer()
  if g_mysprite[e] == 0 then
   g_mysprite[e] = CreateSprite ( g_myimage[e] )
  end
  SetSpriteDepth ( g_mysprite[e], 100 )
  aspectratio = GetImageWidth(g_myimage[e]) / GetImageHeight(g_myimage[e])
  SetSpriteSize ( g_mysprite[e], 100*aspectratio, 100 )
  SetSpriteOffset ( g_mysprite[e], 25*aspectratio, 25 )
  SetSpritePosition ( g_mysprite[e], g_myx[e], g_myy[e] )
  g_myx[e] = g_myx[e] - 0.08
  --g_myangle[e] = g_myangle[e] + 0.1
  --SetSpriteAngle( g_mysprite[e], g_myangle[e] )
  --SetSpriteColor ( g_mysprite[e], math.random(0,255), math.random(0,255), math.random(0,255), 255 )
 end
 
 
 
 if GetTimer(e) > 10000 and g_mysprite[e] ~= 0 then
     
    Destroy(e)
     DeleteSprite ( g_mysprite[e] )
  --   SendMessageF("unfreezeai",0)
  --   SendMessageF("unfreezeplayer",0)
  
  end
 
  --SendMessageF("unfreezeai",0)
    -- SendMessageF("unfreezeplayer",0)
  
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
g_myimage = {}
g_mysprite = {}
g_myangle = {}
g_myx = {}
g_myy = {}
function cutscene1_wife_init(e)
 g_myimage[e] = LoadImage(GetEntityString(e,0))
 g_mysprite[e] = 0
 g_myangle[e] = 0
 g_myx[e] = 80
 g_myy[e] = 25
end

function cutscene1_wife_main(e)
 if g_Entity[e]['plrinzone']==1 then
 if cutscenetimer_wife == nil then
   StartTimer(e)
   cutscenetimer_wife = 1
   end

 
 --FreezeAI()
 --FreezePlayer()
  if g_mysprite[e] == 0 then
   g_mysprite[e] = CreateSprite ( g_myimage[e] )
  end
  SetSpriteDepth ( g_mysprite[e], 100 )
  aspectratio = GetImageWidth(g_myimage[e]) / GetImageHeight(g_myimage[e])
  SetSpriteSize ( g_mysprite[e], 100*aspectratio, 100 )
  SetSpriteOffset ( g_mysprite[e], 25*aspectratio, 25 )
  SetSpritePosition ( g_mysprite[e], g_myx[e], g_myy[e] )
  g_myx[e] = g_myx[e] - 0.08
  --g_myangle[e] = g_myangle[e] + 0.1
  --SetSpriteAngle( g_mysprite[e], g_myangle[e] )
  --SetSpriteColor ( g_mysprite[e], math.random(0,255), math.random(0,255), math.random(0,255), 255 )
 end
 
 
 
 if GetTimer(e) > 10000 and g_mysprite[e] ~= 0 then
     
    Destroy(e)
     DeleteSprite ( g_mysprite[e] )
  --   SendMessageF("unfreezeai",0)
  --   SendMessageF("unfreezeplayer",0)
  
  end
 
  --SendMessageF("unfreezeai",0)
    -- SendMessageF("unfreezeplayer",0)
  
end

Murderer:

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
g_myimage = {}
g_mysprite = {}
g_myangle = {}
g_myx = {}
g_myy = {}
function cutscene1_murderer_init(e)
 g_myimage[e] = LoadImage(GetEntityString(e,0))
 g_mysprite[e] = 0
 g_myangle[e] = 0
 g_myx[e] = 20
 g_myy[e] = 25
end

function cutscene1_murderer_main(e)
 if g_Entity[e]['plrinzone']==1 then
if cutscenetimer_murderer == nil then
   StartTimer(e)
   cutscenetimer_murderer = 1
   end

--FreezeAI()
-- FreezePlayer()
  if g_mysprite[e] == 0 then
   g_mysprite[e] = CreateSprite ( g_myimage[e] )
  end
  SetSpriteDepth ( g_mysprite[e], 100 )
  aspectratio = GetImageWidth(g_myimage[e]) / GetImageHeight(g_myimage[e])
  SetSpriteSize ( g_mysprite[e], 90*aspectratio, 90 )
  SetSpriteOffset ( g_mysprite[e], 25*aspectratio, 25 )
  SetSpritePosition ( g_mysprite[e], g_myx[e], g_myy[e] )
  g_myx[e] = g_myx[e] - 0.05
  --g_myangle[e] = g_myangle[e] + 0.1
  --SetSpriteAngle( g_mysprite[e], g_myangle[e] )
  --SetSpriteColor ( g_mysprite[e], math.random(0,255), math.random(0,255), math.random(0,255), 255 )
  end
 
 
  
 if GetTimer(e) > 10000 and g_mysprite[e] ~= 0 then
  --   Destroy(e)
     DeleteSprite ( g_mysprite[e] )
 --    SendMessageF("unfreezeai",0)
   --  SendMessageF("unfreezeplayer",0)
     Destroy(e)
  
  end
  --SendMessageF("unfreezeai",0)
    -- SendMessageF("unfreezeplayer",0)
  
 
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
g_myimage = {}
g_mysprite = {}
g_myangle = {}
g_myx = {}
g_myy = {}
function cutscene1_murderer_init(e)
 g_myimage[e] = LoadImage(GetEntityString(e,0))
 g_mysprite[e] = 0
 g_myangle[e] = 0
 g_myx[e] = 20
 g_myy[e] = 25
end

function cutscene1_murderer_main(e)
 if g_Entity[e]['plrinzone']==1 then
if cutscenetimer_murderer == nil then
   StartTimer(e)
   cutscenetimer_murderer = 1
   end

 --FreezeAI()
-- FreezePlayer()
  if g_mysprite[e] == 0 then
   g_mysprite[e] = CreateSprite ( g_myimage[e] )
  end
  SetSpriteDepth ( g_mysprite[e], 100 )
  aspectratio = GetImageWidth(g_myimage[e]) / GetImageHeight(g_myimage[e])
  SetSpriteSize ( g_mysprite[e], 90*aspectratio, 90 )
  SetSpriteOffset ( g_mysprite[e], 25*aspectratio, 25 )
  SetSpritePosition ( g_mysprite[e], g_myx[e], g_myy[e] )
  g_myx[e] = g_myx[e] - 0.05
  --g_myangle[e] = g_myangle[e] + 0.1
  --SetSpriteAngle( g_mysprite[e], g_myangle[e] )
  --SetSpriteColor ( g_mysprite[e], math.random(0,255), math.random(0,255), math.random(0,255), 255 )
  end
 
 
  
 if GetTimer(e) > 10000 and g_mysprite[e] ~= 0 then
  --   Destroy(e)
     DeleteSprite ( g_mysprite[e] )
 --    SendMessageF("unfreezeai",0)
   --  SendMessageF("unfreezeplayer",0)
     Destroy(e)
  
  end
  --SendMessageF("unfreezeai",0)
    -- SendMessageF("unfreezeplayer",0)
  
 
end

Also, it's hard to get the images layered in the right order.

I would really appreciate some help.

Julian - increasingly disillusioned and jaded

PM

AmenMoses

GameGuru Master

8

Years of Service

User Offline

Joined: 20th Feb 2016

Location: Portsmouth, England

Profile

Posted: 7th Sep 2019 20:59

Link

SetSpriteDepth is used to layer sprites, as it says in global.lua:
"SetSpriteDepth: SetSpriteDepth ( mySprite , 10 ) (0 is front, 100 is back)"

Been there, done that, got all the T-Shirts!

PM

lordjulian

10

Years of Service

User Offline

Joined: 10th Jan 2014

Location:

Profile

Posted: 7th Sep 2019 21:28

Link

OK. Thanks for the tip.

Julian - increasingly disillusioned and jaded

PM

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 7th Sep 2019 21:48

Link

If I remember right set sprite depth only works with pastesprite

Primary Desktop:
i7 7700,k NV1070 8GB, 16GB 3200mhz memory, 1x 2TB Hybrid, Win10.
Secondary Desktop:
i5 4760k, NV960 2GB, 16GB 2333mhz memory, 1x 2TB Hybrid, Win10.
Laptop:
i3, Intel 4000 series graphics, 6GB memory, 1x 500gb HDD, Win8.1.

PM Email Website

AmenMoses

GameGuru Master

8

Years of Service

User Offline

Joined: 20th Feb 2016

Location: Portsmouth, England

Profile

Posted: 7th Sep 2019 21:53

Link

No, it works fine, PasteSprite is for when you want text as well.

Been there, done that, got all the T-Shirts!

PM

lordjulian

10

Years of Service

User Offline

Joined: 10th Jan 2014

Location:

Profile

Posted: 8th Sep 2019 09:51

Link

Is there a better way to execute this?

Julian - increasingly disillusioned and jaded

PM

AmenMoses

GameGuru Master

8

Years of Service

User Offline

Joined: 20th Feb 2016

Location: Portsmouth, England

Profile

Posted: 8th Sep 2019 11:05

Link

Bit confused by this : LoadImage(GetEntityString(e,0))

Why are you putting the image file in the sound slot?

If you just put the image file directly in the script then you can combine the scripts into one.

i.e.

+ Code Snippet

local back_spr = back_spr or CreateSprite( LoadImage( "scriptbank\\images\\background.png" ) )
local wife_spr = wife_spr or  CreateSprite( LoadImage( "scriptbank\\images\\wife.png" ) )

SetSpriteDepth( back_spr, 100 )
SetSpriteDepth( wife_spr, 99 )

Been there, done that, got all the T-Shirts!

PM

lordjulian

10

Years of Service

User Offline

Joined: 10th Jan 2014

Location:

Profile

Posted: 8th Sep 2019 11:42 Edited at: 8th Sep 2019 11:46

Link

I am using the Image Zone marker and I modified its script so maybe that's why it's in that slot.

Anyway, thanks very much. I'll try loading the three images to get everything into one script.

Julian - increasingly disillusioned and jaded

PM

3com

10

Years of Service

User Offline

Joined: 18th May 2014

Location: Catalonia

Profile

Posted: 8th Sep 2019 12:26 Edited at: 8th Sep 2019 12:28

Link

Quote: "I have three images (background, wife and murderer). I am trying to create some parallax scrolling type effect."

This is a prototype of code, but you has to match with your, to fit yours needs.

+ Code Snippet

spr_images = {}
mySprite = 0
CreateSprite( LoadImage( "scriptbank\\images\\background.png" ) )
SetSpriteDepth( mySprite , 100 )
SetSpriteSize (mySprite , 200*aspectratio, -1 )  --not sure about this.
SetSpritePosition ( mySprite , 200, 200 )

function yourname_init(e)
    spr_images[1] = LoadImage( "scriptbank\\images\\background.png" ) )
   spr_images[2] = LoadImage( "scriptbank\\images\\wife.png" ) )
  spr_images[3]  LoadImage( "scriptbank\\images\\snife.png" ) )
end --init

function yourname_main(e)

SetSpritePosition ( mySprite , x, y) -- type here yours X,Y, coords.

for i = 1,3,1 do
  SetSpriteImage ( mySprite , spr_images[i] )  -- here you should get like gif file effect.
end

end --main

Or I'm getting your point bad?

Laptop: Lenovo - Intel(R) Celeron(R) CPU 1005M @ 1.90GHz

OS: Windows 10 (64) - Ram: 4 gb - Hd: 283 gb - Video card: Intel(R) HD Graphics
cpu mark: 10396.6
2d graphics mark: 947.9
3d graphics mark: 8310.9
memory mark 2584.8
Disk mark: 1146.3
Passmark rating: 3662.4

PM

lordjulian

10

Years of Service

User Offline

Joined: 10th Jan 2014

Location:

Profile

Posted: 8th Sep 2019 13:18

Link

Thank you very much, 3com. That's a big help!

Julian - increasingly disillusioned and jaded

PM

3com

10

Years of Service

User Offline

Joined: 18th May 2014

Location: Catalonia

Profile

Posted: 8th Sep 2019 14:54

Link

Glad to help'u mate.

Laptop: Lenovo - Intel(R) Celeron(R) CPU 1005M @ 1.90GHz

OS: Windows 10 (64) - Ram: 4 gb - Hd: 283 gb - Video card: Intel(R) HD Graphics
cpu mark: 10396.6
2d graphics mark: 947.9
3d graphics mark: 8310.9
memory mark 2584.8
Disk mark: 1146.3
Passmark rating: 3662.4

PM

Scripts / Cutscene with Images