#
#  [syncchat seemless intregation module by enigma of .toz. 810-651-6472]
#  Dox: put this in your \sbbs\exec directory, compile, and then edit the
#  text.dat file in \sbbs\ctrl and change the following line:
#
#  "\r\n_yhChat: n"                                    506 ChatPrompt
#  To:
#  "@EXEC:chat@"                                           506 ChatPrompt
#
#  Thanks go to Prophet for letting me be a beta tester, i hope this  mod
#  Will make it easier for sysops to use your product =]
#

print "\r\n_nchChncat Mehnu: "

cmd_home

getkey

cmdkey J
  exec_xtrn syncchat
  setstr "?"
  ungetstr
  return
end_cmd

cmdkey ?
  setstr "?"
  ungetstr
  return
end_cmd

cmdkey P
  setstr "P"
  ungetstr
  return
end_cmd

cmdkey S
  setstr "S"
  ungetstr
  return
end_cmd

cmdkey J
  setstr "J"
  ungetstr
  return
end_cmd

cmdkey C
  setstr "C"
  ungetstr
  return
end_cmd

cmdkey T
  setstr "T"
  ungetstr
  return
end_cmd

cmdkey D
  setstr "D"
  ungetstr
  return
end_cmd

cmdkey A
  setstr "A"
  ungetstr
  return
end_cmd

cmdkey Q
  setstr "Q"
  ungetstr
  return
end_cmd

cmdkey ^M
  setstr "Q"
  ungetstr
  return
end_cmd

return
