Scripting Help: Chatty NPC's and Triggering a response.

Author

Message

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 1st Dec 2015 15:43 Edited at: 1st Dec 2015 15:46

Link

HI guys, I wonder if you can help me out. The game I am trying to make requires you to investigate the whereabouts of a missing person by talking to NPC's in a chain and I'm trying to figure out how to do that.

For the chatting part I've found a script on these boards which looks like it would work ....

-- LUA Script - precede every function and global member with lowercase name of script
 
function chat_init(e)
 
  textlines = {} 
   
  textlines[] = {
    name = "Hello, how are you today?",
    description = "Fine, thank you."
  }
   
  textlines[1] = {
    name = "Nice weather, is not it?",
    description = "Mustn't grumble."
  }
   
  textlines[2] = {
    name = "Have you seen Deputy Monroe recently?.",
    description = "Nope, but ole Tom the butcher may have seen him."
  }
   
  textlines[3] = {
    name = "Thanks, i'll check with him.",
    description = "You're welcome."
  }
   
  textlines[4] = {
    name = "See you later.",
    description = "Goodbye."
  }
   
  selected_line = 0
  chosen_line = nil
  textsize = 2
end
 
function chat_main(e)
 if g_Entity[e]['plrinzone']==1 then
   
  if chosen_line == nil then
   offset = 100 - ((#textlines*2)+1+10)
  for showline = 0,#textlines,1 do
   
   PromptTextSize(2)
   textsize = 2
   if showline == math.floor(selected_line) then
    PromptTextSize(3)
    textsize = 3
   end
   offset = offset + textsize
   TextCenterOnX(50,offset, textsize, textlines[showline].name)
    
  end
   
        key=GetInKey()
 
        if key=="n" and pressed == 0 then
            selected_line = selected_line - 1
            pressed = 1
        end
        if key=="m" and pressed == 0 then
            selected_line = selected_line + 1
            pressed = 1
        end
        if key=="b" and pressed == 0 then
            chosen_line = math.floor(selected_line)
            pressed = 1
        end
        if key=="" and then
            pressed = 0
        end
        if selected_line < 0 then
            selected_line=0
        end
        if selected_line > #textlinesthen
            selected_line = #textlines
        end
    ...
end

--PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
   
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end
 end
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script
 
function chat_init(e)
 
  textlines = {} 
   
  textlines[] = {
    name = "Hello, how are you today?",
    description = "Fine, thank you."
  }
   
  textlines[1] = {
    name = "Nice weather, is not it?",
    description = "Mustn't grumble."
  }
   
  textlines[2] = {
    name = "Have you seen Deputy Monroe recently?.",
    description = "Nope, but ole Tom the butcher may have seen him."
  }
   
  textlines[3] = {
    name = "Thanks, i'll check with him.",
    description = "You're welcome."
  }
   
  textlines[4] = {
    name = "See you later.",
    description = "Goodbye."
  }
   
  selected_line = 0
  chosen_line = nil
  textsize = 2
end
 
function chat_main(e)
 if g_Entity[e]['plrinzone']==1 then
   
  if chosen_line == nil then
   offset = 100 - ((#textlines*2)+1+10)
  for showline = 0,#textlines,1 do
   
   PromptTextSize(2)
   textsize = 2
   if showline == math.floor(selected_line) then
    PromptTextSize(3)
    textsize = 3
   end
   offset = offset + textsize
   TextCenterOnX(50,offset, textsize, textlines[showline].name)
    
  end
   
        key=GetInKey()
 
        if key=="n" and pressed == 0 then
            selected_line = selected_line - 1
            pressed = 1
        end
        if key=="m" and pressed == 0 then
            selected_line = selected_line + 1
            pressed = 1
        end
        if key=="b" and pressed == 0 then
            chosen_line = math.floor(selected_line)
            pressed = 1
        end
        if key=="" and then
            pressed = 0
        end
        if selected_line < 0 then
            selected_line=0
        end
        if selected_line > #textlinesthen
            selected_line = #textlines
        end
    ...
end

   
  --PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
   
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end
 end
end

... that should in theory allow me to have a short conversation, however the next NPC in the chain I need to have a standard non-chatty neutral AI unless I have spoken to the first.

The way I thought of doing it was to have two almost identical NPC's on the same spot, one with a normal AI spawned at the start, the other with a chat AI not spawned at the start, then at the end the chat script I could destroy one and spawn the other.

Is this possible? If so what code would be needed and where would it go in the above script?

Or is there an easier way to do it? If so could somebody explain how?

PM Email Website

Moshroom

9

Years of Service

User Offline

Joined: 18th Jul 2015

Location: Finland

Profile

Posted: 1st Dec 2015 16:54 Edited at: 1st Dec 2015 16:57

Link

I think creating multiple almost identical entities is unneccessary complicated. Haven't tested your script so not 100 % sure, but I would try to add something like this to the main function:

+ Code Snippet

if chosen_line == 2 then -- Whatever option you want to use to activate the next guy
 flag_first_finished = 1
end

And in the next script:

+ Code Snippet

if flag_first_finished == 1 then
 -- Whatever the next guy does
end

PM Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 1st Dec 2015 17:02

Link

OK thanks for the reply, i'm really sorry but I don't have a clue with LUA scripting, I have no idea what those lines of code you gave do, what I add to them (the parts marked in green) or where to put them, could you elaborate please?

PM Email Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 1st Dec 2015 17:35 Edited at: 1st Dec 2015 17:48

Link

Would this be right?

My first character would have the following script ...

-- LUA Script - precede every function and global member with lowercase name of script
  
function chat_init(e)
  
  textlines = {} 
    
  textlines[] = {
    name = "Hello, how are you today?",
    description = "Fine, thank you."
  }
    
  textlines[1] = {
    name = "Nice weather, is not it?",
    description = "Mustn't grumble."
  }
    
  textlines[2] = {
    name = "Have you seen Deputy Monroe recently?.",
    description = "Nope, but ole Tom the butcher may have seen him."
  }
    
  textlines[3] = {
    name = "Thanks, i'll check with him.",
    description = "You're welcome."
  }
    
  textlines[4] = {
    name = "See you later.",
    description = "Goodbye."
  }
    
  selected_line = 0
  chosen_line = nil
  textsize = 2
end
  
function chat_main(e)
 if g_Entity[e]['plrinzone']==1 then
    
  if chosen_line == nil then
   offset = 100 - ((#textlines*2)+1+10)
  for showline = 0,#textlines,1 do
   
   PromptTextSize(2)
   textsize = 2
   if showline == math.floor(selected_line) then
    PromptTextSize(3)
    textsize = 3
   end

offset = offset + textsize
   TextCenterOnX(50,offset, textsize, textlines[showline].name)
     
  end

key=GetInKey()
  
        if key=="n" and pressed == 0 then
            selected_line = selected_line - 1
            pressed = 1
        end
        if key=="m" and pressed == 0 then
            selected_line = selected_line + 1
            pressed = 1
        end
        if key=="b" and pressed == 0 then
            chosen_line = math.floor(selected_line)
            pressed = 1
        end
        if key=="" and then
            pressed = 0
        end
        if selected_line < 0 then
            selected_line=0
        end
        if selected_line > #textlinesthen
            selected_line = #textlines
        end
      if chosen_line == 2 then -- Whatever option you want to use to activate the next guy
 	flag_first_finished = 1
  end
end
 
    
  --PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
    
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end
 end
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script
  
function chat_init(e)
  
  textlines = {} 
    
  textlines[] = {
    name = "Hello, how are you today?",
    description = "Fine, thank you."
  }
    
  textlines[1] = {
    name = "Nice weather, is not it?",
    description = "Mustn't grumble."
  }
    
  textlines[2] = {
    name = "Have you seen Deputy Monroe recently?.",
    description = "Nope, but ole Tom the butcher may have seen him."
  }
    
  textlines[3] = {
    name = "Thanks, i'll check with him.",
    description = "You're welcome."
  }
    
  textlines[4] = {
    name = "See you later.",
    description = "Goodbye."
  }
    
  selected_line = 0
  chosen_line = nil
  textsize = 2
end
  
function chat_main(e)
 if g_Entity[e]['plrinzone']==1 then
    
  if chosen_line == nil then
   offset = 100 - ((#textlines*2)+1+10)
  for showline = 0,#textlines,1 do
   
   PromptTextSize(2)
   textsize = 2
   if showline == math.floor(selected_line) then
    PromptTextSize(3)
    textsize = 3
   end

   offset = offset + textsize
   TextCenterOnX(50,offset, textsize, textlines[showline].name)
     
  end

   
        key=GetInKey()
  
        if key=="n" and pressed == 0 then
            selected_line = selected_line - 1
            pressed = 1
        end
        if key=="m" and pressed == 0 then
            selected_line = selected_line + 1
            pressed = 1
        end
        if key=="b" and pressed == 0 then
            chosen_line = math.floor(selected_line)
            pressed = 1
        end
        if key=="" and then
            pressed = 0
        end
        if selected_line < 0 then
            selected_line=0
        end
        if selected_line > #textlinesthen
            selected_line = #textlines
        end
      if chosen_line == 2 then -- Whatever option you want to use to activate the next guy
 	flag_first_finished = 1
  end
end
 
    
  --PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
    
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end
 end
end

and my second character would have this script ...

-- LUA Script - precede every function and global member with lowercase name of script
  
function chat2_init(e)
  
if flag_first_finished == 1 then

textlines = {} 
    
  textlines[] = {
    name = "Hello, how are you today?",
    description = "Fine, thank you."
  }

textlines[1] = {
    name = "Have you seen Deputy Monroe recently?",
    description = "Yes, he's tied up in my walk in freezer."
  }

selected_line = 0
  chosen_line = nil
  textsize = 2
end
end
  
function chat2_main(e)
 if g_Entity[e]['plrinzone']==1 then
    
  if chosen_line == nil then
   offset = 100 - ((#textlines*2)+1+10)
  for showline = 0,#textlines,1 do
   
   PromptTextSize(2)
   textsize = 2
   if showline == math.floor(selected_line) then
    PromptTextSize(3)
    textsize = 3
   end

offset = offset + textsize
   TextCenterOnX(50,offset, textsize, textlines[showline].name)
     
  end

key=GetInKey()
  
        if key=="n" and pressed == 0 then
            selected_line = selected_line - 1
            pressed = 1
        end
        if key=="m" and pressed == 0 then
            selected_line = selected_line + 1
            pressed = 1
        end
        if key=="b" and pressed == 0 then
            chosen_line = math.floor(selected_line)
            pressed = 1
        end
        if key=="" and then
            pressed = 0
        end
        if selected_line < 0 then
            selected_line=0
        end
        if selected_line > #textlinesthen
            selected_line = #textlines
        end
    if chosen_line == 1 then -- Whatever option you want to use to activate the next guy
 	flag_second_finished = 1
  end
end
 
    
  --PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
    
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end
 end
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script
  
function chat2_init(e)
  
if flag_first_finished == 1 then

  textlines = {} 
    
  textlines[] = {
    name = "Hello, how are you today?",
    description = "Fine, thank you."
  }
  

  textlines[1] = {
    name = "Have you seen Deputy Monroe recently?",
    description = "Yes, he's tied up in my walk in freezer."
  }

    
  selected_line = 0
  chosen_line = nil
  textsize = 2
end
end
  
function chat2_main(e)
 if g_Entity[e]['plrinzone']==1 then
    
  if chosen_line == nil then
   offset = 100 - ((#textlines*2)+1+10)
  for showline = 0,#textlines,1 do
   
   PromptTextSize(2)
   textsize = 2
   if showline == math.floor(selected_line) then
    PromptTextSize(3)
    textsize = 3
   end

   offset = offset + textsize
   TextCenterOnX(50,offset, textsize, textlines[showline].name)
     
  end

      
        key=GetInKey()
  
        if key=="n" and pressed == 0 then
            selected_line = selected_line - 1
            pressed = 1
        end
        if key=="m" and pressed == 0 then
            selected_line = selected_line + 1
            pressed = 1
        end
        if key=="b" and pressed == 0 then
            chosen_line = math.floor(selected_line)
            pressed = 1
        end
        if key=="" and then
            pressed = 0
        end
        if selected_line < 0 then
            selected_line=0
        end
        if selected_line > #textlinesthen
            selected_line = #textlines
        end
    if chosen_line == 1 then -- Whatever option you want to use to activate the next guy
 	flag_second_finished = 1
  end
end
 
    
  --PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
    
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end
 end
end

Is that correct?

PM Email Website

Moshroom

9

Years of Service

User Offline

Joined: 18th Jul 2015

Location: Finland

Profile

Posted: 1st Dec 2015 21:25

Link

The script follows a bit different logic than mine and it seems like there is a part of it missing. Is this based on another script? Can you post a link to the original one?

PM Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 1st Dec 2015 22:05 Edited at: 1st Dec 2015 22:09

Link

It was form another thread here, I can't remember where now, but I just can't get it working it was error after error no matter what I changed, I doubt it worked in the first place, so I gave up.

However I got something else working instead. No chat options, but the NPC says a few lines, then activates the flag and tells you to go to someone else who will now talk to you, he activates another flag and a hidden winzone spawns.

Makes a pretty decent story driven game

First NPC gets this:

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
 
local time1 = 0
local time2 = 0
local timepassed = 0
local timeset = 0
 
 
--change value here to desired delay between prompts (in seconds)
local delay = 1
 
 
----
function chat_main(e)
PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 
if PlayerDist < 80 then
 
if timeset == 0 then
    time1 = g_Time
    timeset = 1
end
 
time2 = g_Time
timepassed = (time2 - time1) / 1000
 
    Prompt("first line goes here")
 if timepassed >= delay then
    Prompt("2nd line goes here")
 end
 if timepassed >= (delay * 2) then
    Prompt("3rd line goes here")
 end
 if timepassed >= (delay * 3) then
    Prompt("4th line goes here")
 end
 if timepassed >= (delay * 4) then
    Prompt("5th line goes here")
 end
 if timepassed >= (delay * 5) then
    flag_first_finished = 1
    Prompt("Go see the other guy")
end
  
 --if player moves out of range reset the story
 else
    timeset = 0
 end
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
 
local time1 = 0
local time2 = 0
local timepassed = 0
local timeset = 0
 
 
--change value here to desired delay between prompts (in seconds)
local delay = 1
 
 
----
function chat_main(e)
PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 
if PlayerDist < 80 then
 
if timeset == 0 then
    time1 = g_Time
    timeset = 1
end
 
time2 = g_Time
timepassed = (time2 - time1) / 1000
 
    Prompt("first line goes here")
 if timepassed >= delay then
    Prompt("2nd line goes here")
 end
 if timepassed >= (delay * 2) then
    Prompt("3rd line goes here")
 end
 if timepassed >= (delay * 3) then
    Prompt("4th line goes here")
 end
 if timepassed >= (delay * 4) then
    Prompt("5th line goes here")
 end
 if timepassed >= (delay * 5) then
    flag_first_finished = 1
    Prompt("Go see the other guy")
end
  
 --if player moves out of range reset the story
 else
    timeset = 0
 end
end

Second NPC gets this:

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
 
local time1 = 0
local time2 = 0
local timepassed = 0
local timeset = 0
 
 
--change value here to desired delay between prompts (in seconds)
local delay = 1
 
 
----
function chat2_main(e)
if flag_first_finished == 1 then
PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 
if PlayerDist < 80 then
 
if timeset == 0 then
    time1 = g_Time
    timeset = 1
end
 
time2 = g_Time
timepassed = (time2 - time1) / 1000
 
    Prompt("first line goes here")
 if timepassed >= delay then
    Prompt("2nd line goes here")
 end
 if timepassed >= (delay * 2) then
    Prompt("3rd line goes here")
 end
 if timepassed >= (delay * 3) then
    Prompt("4th line goes here")
 end
 if timepassed >= (delay * 4) then
    Prompt("5th line goes here")
 end
 if timepassed >= (delay * 5) then
    flag_second_finished = 1
    Prompt("Go see the other guy")
end
  
 --if player moves out of range reset the story
 else
    timeset = 0
 end
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
 
local time1 = 0
local time2 = 0
local timepassed = 0
local timeset = 0
 
 
--change value here to desired delay between prompts (in seconds)
local delay = 1
 
 
----
function chat2_main(e)
if flag_first_finished == 1 then
PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 
if PlayerDist < 80 then
 
if timeset == 0 then
    time1 = g_Time
    timeset = 1
end
 
time2 = g_Time
timepassed = (time2 - time1) / 1000
 
    Prompt("first line goes here")
 if timepassed >= delay then
    Prompt("2nd line goes here")
 end
 if timepassed >= (delay * 2) then
    Prompt("3rd line goes here")
 end
 if timepassed >= (delay * 3) then
    Prompt("4th line goes here")
 end
 if timepassed >= (delay * 4) then
    Prompt("5th line goes here")
 end
 if timepassed >= (delay * 5) then
    flag_second_finished = 1
    Prompt("Go see the other guy")
end
  
 --if player moves out of range reset the story
 else
    timeset = 0
 end
end

Winzone gets this:

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script

function winzone_init(e)
end

function winzone2_main(e)
if flag_second_finished == 1 then
 if g_Entity[e]['plrinzone']==1 then
  JumpToLevelIfUsed(e)
 end
end
end

Although your advice didn't help with the original script, it REALY helped me work the new script out big time, very much appreciated!

PM Email Website

Moshroom

9

Years of Service

User Offline

Joined: 18th Jul 2015

Location: Finland

Profile

Posted: 1st Dec 2015 22:16 Edited at: 1st Dec 2015 22:17

Link

Nice to hear you got it to work. If you want to learn more about Lua, I recommend this:

http://www.lua.org/pil/contents.html

First 5 chapters should be enough to get you started.

PM Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 1st Dec 2015 22:33

Link

Cool, something to read at work tomorrow!

Seriously though, I haven't a clue about LUA, i'm just taking bits and pieces of scripts I find and patching them together hoping they work, sometimes they do and sometimes they don't, but every time I learn something new

PM Email Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 1st Dec 2015 22:39 Edited at: 2nd Dec 2015 10:12

Link

I'm actually quite pleased about the hidden winzone part, it's a really simple script, only a couple of extra lines added to the original winzone script, but it's something that has bugged me for a while and something I can see on the forum that has bugged a few people.

It seems t be impossible to make a winzone spawn on an action, and most threads I've seen on the subject try to do it with some complicated script that uses lots of entities and multiple scripts and even then it doesn't work how they want.

I was taking a break from the chat script and looking at ways to spawn a winzone at the end of the story, trying to get a hide command to work, at the same time I was looking at your flag command, and a light came on in my head. Instead of hiding the winzone I just put its commands inside an if flag function so it's basically not active unless the flag is active, something so simple yet so elusive lol

PM Email Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 3rd Dec 2015 07:59 Edited at: 3rd Dec 2015 07:59

Link

Well that all worked quite well, I've even added some that us if flags to have one conversation then send you to another person who sends you back to the same character for a different conversation

Only one snag I've hit though, once you have had the conversation if you move away and come back it repeats the conversation, this is obviously because of the time reset function in there to reset the conversation when you move away, however if I remove that you still get the last line of the conversation whenever you're in range.

Now I thought to get around this by adding another if flag and using SwitchScript to change them to ai_neutral once the conversation ends, but for some reason I can't get it to work. Whenever I add the line SwitchScript(e,ai_neutral) it just bombs out telling me there is no call to the function ai_neutral_main

Any ideas what i'm doing wrong?
(see code below)

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
  
local time1 = 0
local time2 = 0
local timepassed = 0
local timeset = 0
  
  
--change value here to desired delay between prompts (in seconds)
local delay = 1
  
  
----
function chat2_main(e)

if flag_second_finished == 1 then
SwithScript(e,ai-neutral)
end

else

if flag_first_finished == 1 then
PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
  
if PlayerDist < 80 then
  
if timeset == 0 then
    time1 = g_Time
    timeset = 1
end
  
time2 = g_Time
timepassed = (time2 - time1) / 1000
  
    Prompt("first line goes here")
 if timepassed >= delay then
    Prompt("2nd line goes here")
 end
 if timepassed >= (delay * 2) then
    Prompt("3rd line goes here")
 end
 if timepassed >= (delay * 3) then
    Prompt("4th line goes here")
 end
 if timepassed >= (delay * 4) then
    Prompt("5th line goes here")
 end
 if timepassed >= (delay * 5) then
    flag_second_finished = 1
    Prompt("Go see the other guy")
end
   
 --if player moves out of range reset the story
 else
    timeset = 0
 end
end

+ Code Snippet


-- LUA Script - precede every function and global member with lowercase name of script + '_main'
  
local time1 = 0
local time2 = 0
local timepassed = 0
local timeset = 0
  
  
--change value here to desired delay between prompts (in seconds)
local delay = 1
  
  
----
function chat2_main(e)

if flag_second_finished == 1 then
SwithScript(e,ai-neutral)
end

else

if flag_first_finished == 1 then
PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
  
if PlayerDist < 80 then
  
if timeset == 0 then
    time1 = g_Time
    timeset = 1
end
  
time2 = g_Time
timepassed = (time2 - time1) / 1000
  
    Prompt("first line goes here")
 if timepassed >= delay then
    Prompt("2nd line goes here")
 end
 if timepassed >= (delay * 2) then
    Prompt("3rd line goes here")
 end
 if timepassed >= (delay * 3) then
    Prompt("4th line goes here")
 end
 if timepassed >= (delay * 4) then
    Prompt("5th line goes here")
 end
 if timepassed >= (delay * 5) then
    flag_second_finished = 1
    Prompt("Go see the other guy")
end
   
 --if player moves out of range reset the story
 else
    timeset = 0
 end
end

PM Email Website

hiredgunz48

9

Years of Service

User Offline

Joined: 9th Sep 2015

Location: Seattle, Washington

Profile

Posted: 3rd Dec 2015 23:25 Edited at: 3rd Dec 2015 23:46

Link

I don't know if this will work for you, but it's what I came up with for my "fallout" type game with chatty characters, and you can skip the timers altogether. I was inspired by another script I'm sure, but don't remember which, so I'm not sure who to share credit with! This script allows you to fill the screen with several different text screens with one character, then stops the convo from reappearing after moving away from them after it's done.

local text_lines = {} -- array for table of lines
local tex_finshed = {} -- check variable for finished text, clears last group of text
local pressed = 0 -- check variable for pressed E
local text_lines_num = 0 -- number of lines
objectives = 0 -- test which objectives have been finished
local done = 0 -- test for end of convo's for first through N# of characters. This one's the first character

function john1a_init_name(e,name)
  weapon_name[e] = name
  tex_finshed[e] = 1
end

function john1a_main(e)

local PlayerDist = GetPlayerDistance(e)
  
  if PlayerDist > 100 and done == 0 then

-- The below is just to get the next objection distance and show it. Not needed for convos.

Prompt("Objective Distance: "..  math.floor(GetPlayerDistance(e)))

-- finish objective distance check

end

if PlayerDist < 100 and tex_finshed[e] == 1 and objectives == 0 then
    
    done = 1

RotateToPlayerSlowly(e,15)

text_lines_num = 9 -- change to number of text lines below.

text_lines[1] =  weapon_name[e]..": Ahh, there you are recruit."
    text_lines[2] = "Welcome to the Justice Central Outpost Unit, Hearts & Minds,"
    text_lines[3] = "As you know, since the world's economies and governments collasped,"
    text_lines[4] = "unchecked anarchy and violence have become the norm. Unacceptable."
    text_lines[5] = "Our goal is to restore peace and order to America."
    text_lines[6] = " "
    text_lines[7] = "This unit's goals though are to win the hearts and minds,"
    text_lines[8] = "of locals in key spots so we can establish Justice outposts."
    text_lines[9] = "At each mission area, an agent of ours will brief you."

send = gen_text(text_lines,text_lines_num)

if send >= text_lines_num then
      Prompt ("Press [E] to continue")

if GetScancode() == 18 and pressed == 0 then
        pressed = 1

tex_finshed[e] = 2

end
    end
    end

if tex_finshed[e]== 2 and PlayerDist < 100 then

if GetInKey() == "" then
      pressed = 0
    end

-- Second dialog box here

text_lines_num = 9 -- change to number of text lines. COPY FROM HERE...

text_lines[1] = "Also, while on missions, help locals so you gain REPUTATION.."
    text_lines[2] = "Once your reputation has reached 1000,"
    text_lines[3] = "Our helicopter will pick you up to return here for debriefing."
    text_lines[4] = " "
    text_lines[5] = "Okay, time to get you your gear,and some training."
    text_lines[6] = "Straight out the front door is the supply building."
    text_lines[7] = "After getting your gear/training. you can then return to the"
    text_lines[8] = "helicopter and start your first mission."
    text_lines[9] = "Be sure to take the Key from my desk before you leave here."

send = gen_text(text_lines,text_lines_num)

if send >= text_lines_num then
      Prompt ("Press [E] to finish")

if GetScancode() == 18 and pressed == 0 then
        pressed = 1
        
        Spawn(686) --  key enttity number

tex_finshed[e] = 3
      end  
    end 
  end
  
  if tex_finshed[e]== 3 and PlayerDist < 100 then

if GetInKey() == "" then
      pressed = 0
    end

-- third dialog box here

text_lines_num = 9 -- change to number of text lines.

text_lines[1] = weapon_name[e].."-- Any questions?"
    text_lines[2] = "YOU: Yeah... When is payday?"
    text_lines[3] = weapon_name[e].."-- It's every Wednesday, 200 coins to start."
    text_lines[4] = " "
    text_lines[5] = "YOU: Awesome, thanks."
    text_lines[6] = weapon_name[e].."-- Alright, then get out there and make me and"
    text_lines[7] = "Justice proud of you son."
    text_lines[8] = "YOU: I will, and thank you sir."
    text_lines[9] = weapon_name[e].."-- See you when your mission is over..."

send = gen_text(text_lines,text_lines_num)

if send >= text_lines_num then
      Prompt ("Press [E] to finish")

if GetScancode() == 18 and pressed == 0 then
        pressed = 1

tex_finshed[e] = 4
        
         --Hide(42)
         --Spawn(37)
         objectives = 1
  
      end  
    end  
    -- more text boxes here
  end
end

function gen_text(texting, num)
  y_axis = 34
  for i = 1, num, 1 do 
    TextCenterOnXColor(50,y_axis,1,texting[i], 255,255,0)
    y_axis = y_axis + 4 -- width between lines
    i_num = i + 1 
  end
  yadjust = y_axis + 1
  Panel(24, 28, 77, yadjust) -- adjusts vertical width of dialog panel to conversations.
  return i_num
end

+ Code Snippet

local text_lines = {} -- array for table of lines
local tex_finshed = {} -- check variable for finished text, clears last group of text
local pressed = 0 -- check variable for pressed E
local text_lines_num = 0 -- number of lines
objectives = 0 -- test which objectives have been finished
local done = 0 -- test for end of convo's for first through N# of characters. This one's the first character

function john1a_init_name(e,name)
  weapon_name[e] = name
  tex_finshed[e] = 1
end

function john1a_main(e)

  local PlayerDist = GetPlayerDistance(e)
  
  if PlayerDist > 100 and done == 0 then

      -- The below is just to get the next objection distance and show it. Not needed for convos.

      Prompt("Objective Distance: "..  math.floor(GetPlayerDistance(e)))

     -- finish objective distance check

      end

  if PlayerDist < 100 and tex_finshed[e] == 1 and objectives == 0 then
    
    done = 1

    RotateToPlayerSlowly(e,15)


    text_lines_num = 9 -- change to number of text lines below.

    text_lines[1] =  weapon_name[e]..": Ahh, there you are recruit."
    text_lines[2] = "Welcome to the Justice Central Outpost Unit, Hearts & Minds,"
    text_lines[3] = "As you know, since the world's economies and governments collasped,"
    text_lines[4] = "unchecked anarchy and violence have become the norm. Unacceptable."
    text_lines[5] = "Our goal is to restore peace and order to America."
    text_lines[6] = " "
    text_lines[7] = "This unit's goals though are to win the hearts and minds,"
    text_lines[8] = "of locals in key spots so we can establish Justice outposts."
    text_lines[9] = "At each mission area, an agent of ours will brief you."

    send = gen_text(text_lines,text_lines_num)

    if send >= text_lines_num then
      Prompt ("Press [E] to continue")

      if GetScancode() == 18 and pressed == 0 then
        pressed = 1

        tex_finshed[e] = 2 

      end
    end
    end

  if tex_finshed[e]== 2 and PlayerDist < 100 then

    if GetInKey() == "" then
      pressed = 0
    end

    -- Second dialog box here

    text_lines_num = 9 -- change to number of text lines. COPY FROM HERE...

    text_lines[1] = "Also, while on missions, help locals so you gain REPUTATION.."
    text_lines[2] = "Once your reputation has reached 1000,"
    text_lines[3] = "Our helicopter will pick you up to return here for debriefing."
    text_lines[4] = " "
    text_lines[5] = "Okay, time to get you your gear,and some training."
    text_lines[6] = "Straight out the front door is the supply building."
    text_lines[7] = "After getting your gear/training. you can then return to the"
    text_lines[8] = "helicopter and start your first mission."
    text_lines[9] = "Be sure to take the Key from my desk before you leave here."

    send = gen_text(text_lines,text_lines_num)

    if send >= text_lines_num then
      Prompt ("Press [E] to finish")


      if GetScancode() == 18 and pressed == 0 then
        pressed = 1
        
        Spawn(686) --  key enttity number

        tex_finshed[e] = 3
      end  
    end 
  end
  
  if tex_finshed[e]== 3 and PlayerDist < 100 then

    if GetInKey() == "" then
      pressed = 0
    end

    -- third dialog box here

    text_lines_num = 9 -- change to number of text lines. 

    text_lines[1] = weapon_name[e].."-- Any questions?"
    text_lines[2] = "YOU: Yeah... When is payday?"
    text_lines[3] = weapon_name[e].."-- It's every Wednesday, 200 coins to start."
    text_lines[4] = " "
    text_lines[5] = "YOU: Awesome, thanks."
    text_lines[6] = weapon_name[e].."-- Alright, then get out there and make me and"
    text_lines[7] = "Justice proud of you son."
    text_lines[8] = "YOU: I will, and thank you sir."
    text_lines[9] = weapon_name[e].."-- See you when your mission is over..."

    send = gen_text(text_lines,text_lines_num)

    if send >= text_lines_num then
      Prompt ("Press [E] to finish")


      if GetScancode() == 18 and pressed == 0 then
        pressed = 1

        tex_finshed[e] = 4
        
         --Hide(42)
         --Spawn(37)
         objectives = 1
  
      end  
    end  
    -- more text boxes here
  end
end

function gen_text(texting, num)
  y_axis = 34
  for i = 1, num, 1 do 
    TextCenterOnXColor(50,y_axis,1,texting[i], 255,255,0)
    y_axis = y_axis + 4 -- width between lines
    i_num = i + 1 
  end
  yadjust = y_axis + 1
  Panel(24, 28, 77, yadjust) -- adjusts vertical width of dialog panel to conversations.
  return i_num
end

You may want to move the function "gen_text" to your default.lua or somewhere else, as adding the function to several characters is redundant.

I haven't tried it yet, but you might be also able to use the "SwitchScript(e,str)" command to give the 1st character a new convo script that will only activate after the first convo is done, then setting a value for a second character's finished conversation that sends you back to the first person, and makes the first person's second convo active.

Windows 10 64bit, Intel(R) Core(TM) i5-4590 CPU @ 3.30GHz, 3301 Mhz, 4 Core(s), NVIDIA GeForce GTX 960 2 gig GDDR5, 16 gigs ram

PM Email

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 4th Dec 2015 07:50 Edited at: 4th Dec 2015 07:58

Link

Quote: "
I haven't tried it yet, but you might be also able to use the "SwitchScript(e,str)" command to give the 1st character a new convo script that will only activate after the first convo is done"

That's exactly what i'm trying to do, but every time I use SwitchScript in my script I get the error message stating "there is no call to the function ai_neutral_main", that's the bit I need help with, the convo side of it works fine, I just can't get it to switch to a new script.

On a side note, it's funny you showed me a script usiing text panels instead of prompt. I'd literally just finished rewriting my story scripts to use text panels instead of prompt, removed the timer and added scripting to trigger the convo by pressing E, when I checked here

And even weirder, I just noticed your pictures, the character you use is identical to one I use and the position in the room he's in is almost identical, right down to the filing cabinet too lol

PM Email Website

Moshroom

9

Years of Service

User Offline

Joined: 18th Jul 2015

Location: Finland

Profile

Posted: 4th Dec 2015 09:41

Link

Try to changes this:

+ Code Snippet

SwithScript(e,ai-neutral)

To this:

+ Code Snippet

SwithScript(e,ai_neutral)

PM Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 4th Dec 2015 09:59 Edited at: 4th Dec 2015 12:27

Link

I think I have a final draft for my script now, it seems to do all I need it to do.

Basically, you move up to the character, press E and get a text panel and activates a flag, you press E to close the panel and when you press E again it detects the flag and displays the next text panel, activates a different flag and deactivates the first flag.

By changing/adding/deleting the flags in the script I can manipulate it to move back and forth between different characters and they will all have a default unflagged conversation panel before and after you read their flagged conversation panels.

function chatty_init(e) -- CHANGE "CHATTY" TO THE NAME OF YOUR SCRIPT
  textbox_pressed = 0
  talking = 0
end
   
function chaty_main(e) -- CHANGE "CHATTY" TO THE NAME OF YOUR SCRIPT

PlayerDist = GetPlayerDistance(e)

-- THIS WILL BE THE SECOND CONVERSATION
    if flag_first_finished == 1 then -- CHANGE "FIRST" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
  if PlayerDist < 150 then
     
    if talking == 0 then
      Prompt ( "Press E to talk" )
    else
      Prompt ( "Press E to stop talking" )
    end
     
    if GetInKey() == "e" and textbox_pressed == 0 then
      if talking == 1 then 
        talking = 0
      else
        talking = 1
      end
      textbox_pressed = 1
    end

if talking == 1 then
      Panel(20,85,80,95)
      Panel(20,15,80,85)
    TextColor(25,20,1,"Hello again!",0,255,255)
    TextColor(25,28,1,"If you come back later i will revert back to the first conversation",0,255,0)
    TextColor(25,32,1,"...",0,255,0)
    TextColor(25,36,1,"...",0,255,0)
    TextColor(25,44,1,"...",0,255,255)
    TextCenterOnXColor(50,87,4,"CONVERSATION RESET",255,0,0)
    flag_second_finished = 1 -- CHANGE "SECOND" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
    flag_first_finished = 0 -- CHANGE "FIRST" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
    end  
  end
else

-- THIS WILL BE THE FIRST CONVERSATION, 
  if PlayerDist < 150 then
     
    if talking == 0 then
      Prompt ( "Press E to talk" )
    else
      Prompt ( "Press E to stop talking" )
    end
     
    if GetInKey() == "e" and textbox_pressed == 0 then
      if talking == 1 then 
        talking = 0
      else
        talking = 1
      end
      textbox_pressed = 1
    end 
    if talking == 1 then
      Panel(20,85,80,95)
      Panel(20,15,80,85)
    TextColor(25,20,1,"Lucy:                   Hello!.",0,255,0)
    TextColor(25,24,1,"Come back later for the second conversation",0,255,0)
    TextColor(25,32,1,"...",0,255,255)
    TextColor(25,40,1,"...",0,255,0)
    TextColor(25,48,1,"...",0,255,255)
    TextColor(25,56,1,"...",0,255,0)
    TextCenterOnXColor(50,87,4,"COME BACK LATER.",255,0,0)
    flag_first_finished = 1 -- CHANGE "FIRST" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
end
 end
end
  
  if GetInKey() == "" then
    textbox_pressed = 0
  end
end

+ Code Snippet

function chatty_init(e) -- CHANGE "CHATTY" TO THE NAME OF YOUR SCRIPT
  textbox_pressed = 0
  talking = 0
end
   
function chaty_main(e) -- CHANGE "CHATTY" TO THE NAME OF YOUR SCRIPT

  PlayerDist = GetPlayerDistance(e)

-- THIS WILL BE THE SECOND CONVERSATION
    if flag_first_finished == 1 then -- CHANGE "FIRST" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
  if PlayerDist < 150 then
     
    if talking == 0 then
      Prompt ( "Press E to talk" )
    else
      Prompt ( "Press E to stop talking" )
    end
     
    if GetInKey() == "e" and textbox_pressed == 0 then
      if talking == 1 then 
        talking = 0
      else
        talking = 1
      end
      textbox_pressed = 1
    end  
     

    if talking == 1 then
      Panel(20,85,80,95)
      Panel(20,15,80,85)
    TextColor(25,20,1,"Hello again!",0,255,255)
    TextColor(25,28,1,"If you come back later i will revert back to the first conversation",0,255,0)
    TextColor(25,32,1,"...",0,255,0)
    TextColor(25,36,1,"...",0,255,0)
    TextColor(25,44,1,"...",0,255,255)
    TextCenterOnXColor(50,87,4,"CONVERSATION RESET",255,0,0)
    flag_second_finished = 1 -- CHANGE "SECOND" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
    flag_first_finished = 0 -- CHANGE "FIRST" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
    end  
  end
else

 
-- THIS WILL BE THE FIRST CONVERSATION, 
  if PlayerDist < 150 then
     
    if talking == 0 then
      Prompt ( "Press E to talk" )
    else
      Prompt ( "Press E to stop talking" )
    end
     
    if GetInKey() == "e" and textbox_pressed == 0 then
      if talking == 1 then 
        talking = 0
      else
        talking = 1
      end
      textbox_pressed = 1
    end 
    if talking == 1 then
      Panel(20,85,80,95)
      Panel(20,15,80,85)
    TextColor(25,20,1,"Lucy:                   Hello!.",0,255,0)
    TextColor(25,24,1,"Come back later for the second conversation",0,255,0)
    TextColor(25,32,1,"...",0,255,255)
    TextColor(25,40,1,"...",0,255,0)
    TextColor(25,48,1,"...",0,255,255)
    TextColor(25,56,1,"...",0,255,0)
    TextCenterOnXColor(50,87,4,"COME BACK LATER.",255,0,0)
    flag_first_finished = 1 -- CHANGE "FIRST" TO WHATEVER YOU WANT YOUR FLAG TO BE CALLED
end
 end
end
  
  if GetInKey() == "" then
    textbox_pressed = 0
  end
end

and because it uses flags you can use it to activate/use other entities by just putting the code in the main part of the items scrip inside an if flag command as below:

+ Code Snippet


if flag_XX_finished == 1 then -- WHERE XX IS THE NAME OF THE FLAG

end

Here's how it looks in a winzone script:

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script

function winzone2_flag_init(e)
end

function winzone2_flag_main(e)
if flag_winzone_finished == 1 then
 if g_Entity[e]['plrinzone']==1 then
  JumpToLevelIfUsed(e)
 end
end
end

If the winsome flag is 0 then the winzone script will do nothing, effectively being hidden, if the flag is 1 then it will operate as a normal winzone.

PM Email Website

hiredgunz48

9

Years of Service

User Offline

Joined: 9th Sep 2015

Location: Seattle, Washington

Profile

Posted: 4th Dec 2015 16:15 Edited at: 4th Dec 2015 16:26

Link

Quote: "And even weirder, I just noticed your pictures, the character you use is identical to one I use and the position in the room he's in is almost identical, right down to the filing cabinet too lol"

That is weird

Do you happen to be a fallout player too?

Oh, you might want to use GetScancode() == 18 instead of checking for "e" or "E" as it gets the keypress no matter whether it's caps or not.. otherwise, if you hit the caps lock, the convos and anything using the "e" key stops working when the caps key is on.

Otherwise, looks good!

Windows 10 64bit, Intel(R) Core(TM) i5-4590 CPU @ 3.30GHz, 3301 Mhz, 4 Core(s), NVIDIA GeForce GTX 960 2 gig GDDR5, 16 gigs ram

PM Email

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 4th Dec 2015 16:32 Edited at: 5th Dec 2015 02:13

Link

Quote: "

Try to changes this:

+ Code Snippet

1

SwithScript(e,ai-neutral)

To this:

+ Code Snippet

1

SwithScript(e,ai_neutral)

"

Sorry Moshroom that's won't fix it, because the typo isn't in the script i'm using, it's only a typo in my code snippet (I typed it fast at work), still having issues with switching.

PM Email Website

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 4th Dec 2015 16:39

Link

Quote: "
That is weird

Do you happen to be a fallout player too?

"

I played the first halo to death, got bored in an hour in the second one, hated the third one in minutes, never bothered with the off-shoots/add-ons and am refusing to touch the fourth one

Quote: "
Oh, you might want to use GetScancode() == 18 instead of checking for "e" or "E" as it gets the keypress no matter whether it's caps or not.. otherwise, if you hit the caps lock, the convos and anything using the "e" key stops working when the caps key is on.

Otherwise, looks good!
"

Thanks for the tip.

So if I understand correctly, I replace all instances of:

+ Code Snippet

    if GetInKey() == "e" and textbox_pressed == 0 then

with:

+ Code Snippet

    GetScancode() == 18 and textbox_pressed == 0 then

is that right?

PM Email Website

smallg

Community Leader

19

Years of Service

User Offline

Joined: 8th Dec 2005

Location:

Profile

Posted: 5th Dec 2015 20:31 Edited at: 5th Dec 2015 20:33

Link

+ Code Snippet

if GetScancode() == 18 and textbox_pressed == 0 then

yes

Quote: "That's exactly what i'm trying to do, but every time I use SwitchScript in my script I get the error message stating "there is no call to the function ai_neutral_main", that's the bit I need help with, the convo side of it works fine, I just can't get it to switch to a new script."

SwitchScript(e,str)
requires the script name to be set as a string (i'm assuming you already did this to get the error but your example above isnt in string format so i'm just clarifying for anyone else who may read this)
2ndly the command requires the code be in the same script page/file or it is linked using include/require
i.e.

+ Code Snippet

function first_script_main(e)
if condition == 1 then
SwitchScript(e,"second_script")
end
end

function second_script_main(e)
--do whatever
end

or

+ Code Snippet

function first_script_init(e)
package.path = "scriptbank/?.lua;"
require('linked_script_name')
end


function first_script_main(e)
if condition == 1 then
SwitchScript(e,"linked_script_name")
end
end

life\'s one big game

windows vista ultimate

i5 @3.3ghz, 4gb ram, AMD R9 200 series , directx 11

PM Email

Belidos

3D Media Maker

9

Years of Service

User Offline

Joined: 23rd Nov 2015

Playing: The Game

Profile

Posted: 5th Dec 2015 23:05

Link

Yeah my syntax was right, I just didn't know that you had to call the function before applying the command, thanks i'll look into it tomorrow.

PM Email Website

Scripts / Scripting Help: Chatty NPC's and Triggering a response.