Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

RTE 9 on stepping on this scripted tile.


Richy420Rich
 Share

Recommended Posts

Hi, I have recieved some RTE 9 reports when entering an area ran by these scripted tiles. I'm just wondering if it has something to do with the script or if there's a deeper reason as to why they recieve this error.

This is what I have under Scripted Tiles.

```
Case 16
If GetPlayerMap(index) = 372 And GetPlayerArmorSlot(index) = 0 And GetPlayerLegsSlot(index) = 0 And GetPlayerShieldSlot(index) = 0 And GetPlayerHelmetSlot(index) = 0 And GetPlayerNecklaceSlot(index) = 0 And GetPlayerRingSlot(index) = 0 And GetPlayerAccess(index) <= 1 Then
Call PlayerWarp(index, 141, 8, 14)
Call lockitems(index, 1)
Call PlayerMsg(index, "Upon entering, a magic seal has been placed on your items, making the rest impossible for you to use. This seal will break when you leave this area.", 14)
ElseIf GetPlayerMap(index) = 110 And GetPlayerArmorSlot(index) = 0 And GetPlayerLegsSlot(index) = 0 And GetPlayerShieldSlot(index) = 0 And GetPlayerHelmetSlot(index) = 0 And GetPlayerNecklaceSlot(index) = 0 And GetPlayerRingSlot(index) = 0 Then
Call PlayerWarp(index, 142, 10, 3)
Call lockitems(index, 1)
Call PlayerMsg(index, "Upon entering, a magic seal has been placed on your items, making the rest impossible for you to use. This seal will break when you leave this area.", 14)
ElseIf GetPlayerMap(index) = 178 And GetPlayerArmorSlot(index) = 0 And GetPlayerLegsSlot(index) = 0 And GetPlayerShieldSlot(index) = 0 And GetPlayerHelmetSlot(index) = 0 And GetPlayerNecklaceSlot(index) = 0 And GetPlayerRingSlot(index) = 0 Then
Call PlayerWarp(index, 143, 9, 14)
Call lockitems(index, 1)
Call PlayerMsg(index, "Upon entering, a magic seal has been placed on your items, making the rest impossible for you to use. This seal will break when you leave this area.", 14)
Else
Call PlayerMsg(index, "Arena Guard: You are only allowed to have a weapon in this Arena and/or you are higher then the restricted access level, you have been moved to the Garden, next time, make sure you follow the instructions.", 0)
Call PlayerWarp(index, 25, 9, 6)
End If
Exit Sub

Case 17
If GetPlayerMap(index) = 36 And GetPlayerArmorSlot(index) = 0 And GetPlayerLegsSlot(index) = 0 And GetPlayerShieldSlot(index) = 0 And GetPlayerHelmetSlot(index) = 0 And GetPlayerNecklaceSlot(index) = 0 And GetPlayerRingSlot(index) = 0 And GetPlayerAccess(index) <= 1 Then
If GetPlayerLevel(index) <= 25 Then
Call PlayerWarp(index, 113, 5, 14)
Call lockitems(index, 1)
Call PlayerMsg(index, "Upon entering, a magic seal has been placed on your items, making the rest impossible for you to use. This seal will break when you leave this area.", 14)
Else
Call NextArena(index)
End If
Else
Call PlayerMsg(index, "Arena Guard: You are only allowed to have a weapon in this Arena and/or you are higher then the restricted access level, you have been moved to the Garden, next time, make sure you follow the instructions.", 0)
Call PlayerWarp(index, 25, 9, 6)
End If
Exit Sub
End Select
End Sub
```
And this is the Sub I have for NextArena(index)

```
Sub NextArena(index)
Dim opt
Opt=Rand(3,1)

Select Case Opt
Case 0

Case 1
Call PlayerMsg(index, "Arena Guard: You will be warped to a random Arena!", 0)
Call lockitems(index, 1)
Call PlayerWarp(index, 141, 8, 14)
Exit Sub

Case 2
Call PlayerMsg(index, "Arena Guard: You will be warped to a random Arena!", 0)
Call lockitems(index, 1)
Call PlayerWarp(index, 142, 10, 3)
Exit Sub

Case 3
Call PlayerMsg(index, "Arena Guard: You will be warped to a random Arena!", 0)
Call lockitems(index, 1)
Call PlayerWarp(index, 143, 9, 14)
Exit Sub

Case Else

Exit Sub
End Select
End Sub
```
Any information regarding this would be appreciated. Thanks.
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...