Well isn't this ducky... (General Discussion)

Well isn't this ducky... // General Discussion

1  |  

lady nighthawk

Aug 11, 2003, 10:46am
I got ejected from awgate for giving putting out the aw program URL lol ...

Lady NightHawk: http://objects.activeworlds.com/downloads/awb34.exe
[Customs Aide]: You have been ejected for unacceptable language
Immigration Officer: You have been ejected from awgate
Immigration Officer: You have been ejected from awgate
Immigration Officer: You have been ejected from awgate

Gotta love it!?

LNH

starfleet

Aug 11, 2003, 12:52pm
If (".exe" isin Chatline) Then { Eject $target 300secs }

[View Quote]

john

Aug 11, 2003, 3:43pm
You mean if lcase(sdk.aw_string(aw_chat_message)) like "*.exe" then
EjectUser sdk.aw_int(aw_chat_session), 300

~John

ROFL

[View Quote]

strike rapier

Aug 11, 2003, 3:45pm
*smacks head*...

If your gonna do it get it right man...

- Mark

starfleet

Aug 11, 2003, 3:56pm
I did it so everyone understands even without specifically knowing VB :P

[View Quote]

strike rapier

Aug 11, 2003, 4:08pm
This is a multi-part message in MIME format.

------=_NextPart_000_0140_01C3603A.F48AC290
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

Appart from yours was neither.. it was a screwed up C++ / VB / God knows =
what else hybrid.... operator.isin? :P

- Mark

' InStr Function, checks if one string is in another
' vbTextCompare ignores topcase or lowcase... this is
' instead of vbBinaryCompare which is case sensative...
If CBool(InStr(1, sdk.aw_string(AW_CHAT_MESSAGE), "*.exe", =
vbTextCompare)) =3D True Then
' We set how long we want to eject for
Call sdk.aw_int_set(AW_EJECT_DURATION, 300)
' We tell them to go away...
Call sdk.aw_whisper("You are being nuked... goodbye")
' We eject them by session.. programmers who use
' avatar name as the main internal key should be shot!
Call sdk.aw_world_eject(sdk.aw_int(AW_CHAT_SESSION))
End If

Sorry for HTML :)

[View Quote] ------=_NextPart_000_0140_01C3603A.F48AC290
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2800.1170" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT face=3DArial size=3D2>Appart from yours was neither.. it was =
a screwed up=20
C++ / VB / God knows what else hybrid.... operator.isin? :P</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>- Mark</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2></FONT><FONT face=3DArial =
size=3D2><FONT=20
color=3D#008000>&nbsp;&nbsp;&nbsp; ' InStr Function, checks if one =
string is in=20
another<BR>&nbsp;&nbsp;&nbsp; ' vbTextCompare ignores topcase or =
lowcase... this=20
is<BR>&nbsp;&nbsp;&nbsp; ' instead of vbBinaryCompare which is case=20
sensative...</FONT><BR>&nbsp;&nbsp;&nbsp; <FONT color=3D#0000ff>If=20
CBool</FONT>(InStr(1, sdk.aw_string(AW_CHAT_MESSAGE), "*.exe", =
vbTextCompare)) =3D=20
<FONT color=3D#0000ff>True</FONT> Then<BR><FONT=20
color=3D#008000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' We set how =
long we=20
want to eject for</FONT><BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
<FONT=20
color=3D#0000ff>Call</FONT> sdk.aw_int_set(AW_EJECT_DURATION, =
300)<BR><FONT=20
color=3D#008000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' We tell =
them to go=20
away...</FONT><BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <FONT=20
color=3D#0000ff>Call</FONT> sdk.aw_whisper("You are being nuked...=20
goodbye")<BR><FONT =
color=3D#008000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' We=20
eject them by session.. programmers who=20
use<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' avatar name as the =
main=20
internal key should be=20
shot!</FONT><BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <FONT=20
color=3D#0000ff>Call=20
</FONT>sdk.aw_world_eject(sdk.aw_int(AW_CHAT_SESSION))<BR>&nbsp;&nbsp;&nb=
sp;=20
<FONT color=3D#0000ff>End If</FONT></FONT></DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2>Sorry for HTML =
:)</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>"starfleet" &lt;</FONT><A=20
href=3D"mailto:Starfleet at Command.com"><FONT face=3DArial=20
size=3D2>Starfleet at Command.com</FONT></A><FONT face=3DArial =
size=3D2>&gt; wrote in=20
message </FONT><A =
href=3D"news:3f37d8eb$1 at server1.Activeworlds.com"><FONT=20
face=3DArial =
size=3D2>news:3f37d8eb$1 at server1.Activeworlds.com</FONT></A><FONT=20
face=3DArial size=3D2>...</FONT></DIV><FONT face=3DArial size=3D2>&gt; I =
did it so=20
everyone understands even without specifically knowing VB=20
:P<BR></FONT></BODY></HTML>

------=_NextPart_000_0140_01C3603A.F48AC290--

imagine

Aug 11, 2003, 4:12pm
You know AWI dosn't like to advertise lol

Imagine

[View Quote]

starfleet

Aug 11, 2003, 4:19pm
This is a multi-part message in MIME format.

------=_NextPart_000_0009_01C36044.C14D0A00
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

X1 script too..ROFL

[View Quote] - Mark

' InStr Function, checks if one string is in another
' vbTextCompare ignores topcase or lowcase... this is
' instead of vbBinaryCompare which is case sensative...
If CBool(InStr(1, sdk.aw_string(AW_CHAT_MESSAGE), "*.exe", =
vbTextCompare)) =3D True Then
' We set how long we want to eject for
Call sdk.aw_int_set(AW_EJECT_DURATION, 300)
' We tell them to go away...
Call sdk.aw_whisper("You are being nuked... goodbye")
' We eject them by session.. programmers who use
' avatar name as the main internal key should be shot!
Call sdk.aw_world_eject(sdk.aw_int(AW_CHAT_SESSION))
End If

Sorry for HTML :)

[View Quote] ------=_NextPart_000_0009_01C36044.C14D0A00
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 5.50.4926.2500" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#7c8cc8>
<DIV><FONT face=3DArial size=3D2>X1 script too..ROFL</FONT></DIV>
<DIV>&nbsp;</DIV>
<BLOCKQUOTE=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"strike rapier" &lt;<A=20
=
href=3D"mailto:strike at Rapiercom.freeserve.co.uk">strike at Rapiercom.freeser=
ve.co.uk</A>&gt;=20
[View Quote] ------=_NextPart_000_0009_01C36044.C14D0A00--

strike rapier

Aug 11, 2003, 4:21pm
Thats even worse o.0 If it got any less on a line you could call it asembly
code! hehehe

- Mark

[View Quote]

starfleet

Aug 11, 2003, 4:24pm
hehehehe

[View Quote]

carlbanks

Aug 11, 2003, 5:01pm
I said .exe and got ejected.

[View Quote]

starfleet

Aug 11, 2003, 5:10pm
lmao

[View Quote]

strike rapier

Aug 12, 2003, 12:26am
Wow don't I feel like a prat.... heheh, my own function mod...

call sdk.aw_int_set(AW_EJECT_DURATION, 1);
call sdk.aw_int_set(AW_EJECT_SESSION, m_Session);
call sdk.aw_world_eject();

Thats what happens when you have to type VB when youve been using C++ 18
hours a day..


[View Quote] - Mark

' InStr Function, checks if one string is in another
' vbTextCompare ignores topcase or lowcase... this is
' instead of vbBinaryCompare which is case sensative...
If CBool(InStr(1, sdk.aw_string(AW_CHAT_MESSAGE), "*.exe",
vbTextCompare)) = True Then
' We set how long we want to eject for
Call sdk.aw_int_set(AW_EJECT_DURATION, 300)
' We tell them to go away...
Call sdk.aw_whisper("You are being nuked... goodbye")
' We eject them by session.. programmers who use
' avatar name as the main internal key should be shot!
Call sdk.aw_world_eject(sdk.aw_int(AW_CHAT_SESSION))
End If

Sorry for HTML :)

[View Quote]

themask

Aug 15, 2003, 11:56pm
Im gonna go say go to this Executible. or whatever you spell it.. lazy :x

1  |  
Awportals.com is a privately held community resource website dedicated to Active Worlds.
Copyright (c) Mark Randall 2006 - 2024. All Rights Reserved.
Awportals.com   ·   ProLibraries Live   ·   Twitter   ·   LinkedIn