PDA

View Full Version : New version of IcameFrom Pro Script



Drake
04-26-2010, 02:56 PM
New version of IcameFrom Pro Script
Up for Palacechat, OpenPalace and Phalanx


ON SIGNON {
;Script thepalace ICameFrom Pro By Dr@ke (All) (Version 1.5)
ICameFrom GLOBAL
{ "-Nowhere-" ICameFrom = } 0 ICameFrom == IF
{ "-Too Long-" ICameFrom = } ICameFrom "^[0-9, ^!]*...................................." GREPSTR IF
{ "-?-" ICameFrom = } "BotBotV82" ICameFrom ==
"Dr.X" ICameFrom == OR "Nowhere" ICameFrom == OR IF
{ "-Here-" ICameFrom = } SERVERNAME ICameFrom == IF
{ "Invalid Client" Inf = } { { { { "PC" Inf = } { "MAC" Inf = } DATETIME 0 > IFELSE } { "PalaceChat" Inf = } PALACECHAT NOT IFELSE } { "Phalanx" Inf = } px NOT IFELSE } IPTVERSION 0 > NOT ISGOD OR IFELSE
{ "'page (.Web Client.)" SAY }
{ "(." Inf & ".) " & "(." & ICameFrom & ".)" & SUSRMSG } ISGUEST OPENPALACE OR IFELSE
SERVERNAME ICameFrom = }_______________________________
http://palacesec.freehostia.com/ (http://palacesec.freehostia.com)

Dr@ke

Drake
05-18-2010, 06:34 PM
Up for some others versions of Palacechat, PPC MAC...


ON SIGNON {
;Script ICameFrom Pro By Dr@ke (All) (Version 1.5)
ICameFrom GLOBAL
{ "-Nowhere-" ICameFrom = } 0 ICameFrom == IF
{ "-Too Long-" ICameFrom = } ICameFrom "^[0-9, ^!]*...................................." GREPSTR IF
{ "-?-" ICameFrom = } "BotBotV82" ICameFrom ==
"Dr.X" ICameFrom == OR "Nowhere" ICameFrom == OR IF
{ "-Here-" ICameFrom = } SERVERNAME ICameFrom == IF
{ "Invalid Client" Inf = } { { { { "PC" Inf = } { "MAC" Inf = } DATETIME 0 > IFELSE } { "PalaceChat" Inf = } PALACECHAT NOT IFELSE } { "Ph@lanx" Inf = } px NOT IFELSE } IPTVERSION 0 > NOT ISGOD OR IFELSE
{ "'page (.Web Client.)" SAY }
{ "(." Inf & ".) " & "(." & ICameFrom & ".)" & SUSRMSG } ISGUEST OPENPALACE OR IFELSE
SERVERNAME ICameFrom = }
;Others versions of Palacechat
;START_ONSIGNON
dim icamef as string
icamef=getstring("server.ijustcamefrom")
if icamef="" then icamef="-Nowhere-"
say "'page (.PalaceChat.) (."+icamef+".)"
setstring("server.ijustcamefrom",servername)
;END_ONSIGNON