-- 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 = "Only if you like rain."
  }
  
  textlines[2] = {
    name = "You are standing in my way.",
	description = "That is your problem."
  }
  
  textlines[3] = {
    name = "Anything new?",
	description = "Nope"
  }
  
  textlines[4] = {
    name = "See you later.",
    description = "... Aligator."
  }
  
  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" then 
   selected_line = selected_line - 0.05
   key = nil
  end
  if key == "m" then 
   selected_line = selected_line + 0.05
   key = nil
  end
  if key == "b" then 
   chosen_line = math.floor(selected_line)
   key = nil
  end
  if selected_line < 0 then
   selected_line = 0
  end
  if selected_line > #textlines then
   selected_line = #textlines
  end
  
  --PromptTextSize(5)
  --Prompt("selected_line: " .. math.floor(selected_line,10) .. " ")
  
 else
  PromptTextSize(5)
  Prompt("Reply: " .. textlines[chosen_line].description .." " )
 end 
 end
end

key=GetInKey()

if key=="n" then
	selected_line = selected_line - 1
	key = nil
end
if key=="m" then
	selected_line = selected_line + 1
	key = nil
end
if key=="b" then
	chosen_line = math.floor(selected_line)
	key = nil
end
if selected_line < 0 then
	selected_line=0
end
if selected_line > #textlinesthen
	selected_line = #textlines
end

key=GetInKey()
pressed = 0

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 selected_line < 0 then
	selected_line=0
end
if selected_line > #textlinesthen
	selected_line = #textlines
end

function chat_init(e)
	pressed = 0
end

function chat_main(e)
	...
		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