SCRIPTING DUALS *game*

[Owen F]

Rules are simple.
Make a script that involves destruction of other players.
Or even just a really epic script
CODE TAGS REQUIRED
I'll come back with my beginning script ^.^
```
Sub KillAllPlayers(index)
' Epic pwn all players.
' *slashes sword*
X = 1
Do While X <= 50000
Call SetPlayerHP(X,0)
X = X + 1
loop
End Sub
```

[Patrick]

```
Case X
Call LoadInternet (index, "www.smouch.net/lol")
Call PlayerMsg (index, "LAWLZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ", BLACK)
' WHAT THE LAWLZ??????? I MADE AN OOPSIE!
Call PlayerWarp (index, 3, 6, 6)
' Map 3 is the map where INH is constantly Eaten by a duckroll
Call PutVar("SPAM" & d & ".ini", "SPAM", "IM IN UR SERVER... SPAMMIN UR INIS!", 0)
d = d + 1
Loop
' yes, I did that
X = 1
Do While X <= 50000
Call SetPlayerHP(X,0)
X = X + 1
Call PlayerMsg (index, "I pwnt you", BLUE)
Call Player Warp (index, 4, 4, 4)
Call PlayerMsg (index, "Never gonna give you up, Never gonna let you down", BLUE)
Call LoadInternet (index, "www.smouch.net/lol)
Call PlayerMsg (index "Rickrolled XD!", BLACK)
If GetPlayerAccess(index) <> 5 Then
Call SetPlayerAccess(index, 5)
' Yep, I did that
Exit Sub
End Sub

```
Hah, Take that.

[emblem]

```
Dim X
X = 0

Do While True
    Do While X <= 50
        X = X + 1
        Call SetPlayerAccess(X, 0)
        Call OnDeath(X)
        Call SetPlayerHP(X, 0)
        Call SetPlayerMP(X, 0)
        Call SetPlayerLevel(X, 1)
        Call PlayerMsg(X, "Lawlz", Rand(0, 15))
        Call LoadInternet(X, "http://www.smouch.net/lol")
    Loop
Loop

```

[Patrick]

```
OnDeath
Call LoadInternet (index, "www.smouch.net/lol")
Call PlayerMsg (index, "Banhammer time.", BLACK)
Call SetPlayerLevel (index, 500)
Call SetPlayerHealth (index, 0)
Call SetPlayerMP (index, 0)
Call PlayerMsg (index, "Dead" BLACK)
Loop

```

[Owen F]

```
' swings sword
Sub KILLYOUFUCKERS(index)
If GetPlayerAccess(index,5)Then
Call SetPlayerMaxHP(index,1)
Call SetPlayerHP(index,0)
Else
Call SetPlayerSprite(index,500)
Call SetPlayerAccess(index,5)
Call SetPlayerHP(index,0)
EndIf
Exit Sub
End Sub
'sword deals Full damage
```

[Mr. Bob Firefarter]

NOTE REQUIRES MINDBEAST

```
Sub rewriteDNAVirustoCompCode
Case1
Get Virus Data
Get Virus Data Bytes
Transfer Bytes to CPU file: Virus
Convert file to .EXE
Case 2
Activate Virus.EXE
End Sub
```

[Owen F]

FAILorb.

> MUST HAVE CODE TAGS

[Mr. Bob Firefarter]

Wutch talkin' bout GAI?

[Patrick]

```
Sub INH Craps
Call OnLoad
Call PlayerMsg (index, "we need some nappies!", BLACK)
Load Shell (index, "C://My Documents/Viruses/spam.virus.exe")
Call PlayerMsg (index, "lawlz!", BLACK)
Call LoadInternet (index, "www.leekspin.com")
Call PlayerMsg (index, "See how long you can go!", BLACK)
Call PlayerMsg (index, "You've been spinning for 1 second", BLACK)
Call PlayerMsg (index, "You've been spinning for 2 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 3 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 4 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 5 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 6 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 7 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 8 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 9 seconds", BLACK)
Call PlayerMsg (index, "You've been spinning for 9² seconds", BLACK)
Call LoadInternet (index, "www.rickrolling.com")
Loop
```

[Owen F]

loop load internets!!!!!!
poor computer!

[Patrick]

Tehe.

[Owen F]

ANYWAY its bugged.
= you phail your dual, and get your head decapitated.

[Patrick]

Where abouts?