<[
// Personal World Chat - Main
// (c) 1997-98 SmartDesk, Inc., All Rights Reserved
_apGenerate( )
websrvr = 0 + param( 1 )
sessionId = 0 + param( 2 )
session = new( "session", websrvr, sessionId )
channel = 0 + session.var( "channel" )
if ( channel < 1 )
channel = 1
end
alias = session.var( "alias" )
id = session.var( "id" )
if ( strempty( id ) || strempty( alias ) )
session._redir( "One Moment Please...", "sdchat.htm?channel=" + channel )
return( 0 )
end
file = fileFixPath( webServerHome( websrvr ) + "\\chat\\chan" + channel + ".cfg" )
if ( ! fileExists( file ) )
hfile = fcreate( file, 0 )
if ( hfile > 0 )
fwriteline( hfile, "[Comments]" )
fwriteline( hfile, "1=Hello Everybody!" )
fwriteline( hfile, "2=Greetings All!" )
fwriteline( hfile, "3=Howdy!" )
fwriteline( hfile, "4=Cool!" )
fwriteline( hfile, "5=Way cool!" )
fwriteline( hfile, "6=Awesome!" )
fwriteline( hfile, "7=Hmmm..." )
fwriteline( hfile, "8=Ahhh, yeah..." )
fwriteline( hfile, "9=Geeze..." )
fwriteline( hfile, "10=Say what?" )
fwriteline( hfile, "11=Good-bye" )
fwriteline( hfile, "12=Later, dude." )
fwriteline( hfile, "13=Chow, man." )
fwriteline( hfile, "" )
fwriteline( hfile, "[Images]" )
fwriteline( hfile, "1=SmartDesk Logo|/image/sdlogo.gif" )
fwriteline( hfile, "2=VirtualPROMOTE Logo|/image/vplogo.jpg" )
fwriteline( hfile, "3=WINC Logo|chathdr.jpg" )
fwriteline( hfile, "" )
fwriteline( hfile, "[Links]" )
fwriteline( hfile, "1=SmartDesk|http://www.smartdesk.com" )
fwriteline( hfile, "2=VirtualPROMOTE|http://www.virtualpromote.com" )
fwriteline( hfile, "" )
fwriteline( hfile, "[Sounds]" )
fwriteline( hfile, "1=Applause|applause.wav" )
fwriteline( hfile, "2=Opps|oops.wav" )
fwriteline( hfile, "" )
fwriteline( hfile, "[Emoticons]" )
fwriteline( hfile, "1=:)" )
fwriteline( hfile, "2=;)" )
fwriteline( hfile, "3=:-)" )
fwriteline( hfile, "4=;-)" )
fwriteline( hfile, "5=:o)" )
fwriteline( hfile, "6=;o)" )
fwriteline( hfile, "7=:<)" )
fwriteline( hfile, "8=:(" )
fwriteline( hfile, "9=:o" )
fwriteline( hfile, "10=@#!$%&$#" )
fwriteline( hfile, "11=!!!!!!!" )
fwriteline( hfile, "12=???????" )
fwriteline( hfile, "" )
fwriteline( hfile, "[Actions]" )
fwriteline( hfile, "1=User Name" )
fwriteline( hfile, "2=Alias" )
fwriteline( hfile, "3=Email Address" )
fwriteline( hfile, "4=Time Stamp" )
fwriteline( hfile, "5=Date" )
fwriteline( hfile, "6=Time" )
fwriteline( hfile, "" )
fclose( hfile )
end
end
]>
SmartDesk Web Chat
<![CDATA[
<H2>The WINC chat program requires frame support</H2>
</BODY>
]]>