Fishing

[Anthony]

In 3.77 all those variables have been replaced with EditorTileX and EditorTileY.

It shouldn't really matter where they are placed, just that they are in there somewhere.

[kasuko]

Haha... I did the tutorial over again one last time and it worked like a charm... there is one fishy thing though (no pun intended), When I tested it I never caught anything all it said was, "Your attempt at catching a fish, has failed." (lol what's up with that comma there xD) Any way thanks for all your help! I get much more help from you guys then I do from the egotistical people over at Elysium -points at Robin- haha just kidding, I having nothing against him.

[Pix€l]

I've a problem in this line to the ModPlayer to the serveur:

Code:

Function GetPlayerInvItemNum(ByVal Index As Long, ByVal InvSlot As Long) As Long
    GetPlayerInvItemNum = Player(Index).Char(TempPlayer(Index).CharNum).Inv(InvSlot).Num
End Function

This bug that occurs when the player does not have the objects to fish, and the server crash which is very annoying!
Please help me :oops:
THX

[Pix€l]

Up , pls !

[Tony]

What's the error?

Try this

Bug, seems small, but it's a big thing with this system.

Find:

Code:

If GetPlayerEquipmentSlot(Index, Weapon) = FishRod Then

Replace with:

Code:

If GetPlayerInvItemNum(Index, GetPlayerEquipmentSlot(Index, Weapon)) = FishRod Then

[Pix€l]

This line of code and already included in my source code is and always!

The code is now I think, when the attacking player melee (unarmed) or when he can not lure ...

[Nean]

No, we want the specific RTE number. Tell us what it actually says, such as: "Runtime Error 9: Subscript out of Range", or some BS, or "Run Time Error 13: Type Mismatch", etc, etc.

[Pix€l]

"Runtime Error 9: Subscript out of Range" :?

[Pix€l]

Up pls !

[Pix€l]

Up!
Pls help me , my game is bugged ...
A Error 9 is present ...

[Acruno]

What line is highlighted in the IDE?

[Pix€l]

This line

Code:

GetPlayerInvItemNum = Player(Index).Char(TempPlayer(Index).CharNum).Inv(InvSlot).Num

[Nean]

Add something like: If FishRod > 0 Then

Above the If FishBait 0

[Pix€l]

A Error 9 is present ...
Help me pls

[Pbcrazy]

you really need to post the line of code it highlights. else we can't help you to well...

[Nean]

Add something like: If FishRod > 0 Then

Above the If FishBait 0

[Pix€l]

in this line to the ModPlayer to the serveur :

Code:

GetPlayerInvItemNum = Player(Index).Char(TempPlayer(Index).CharNum).Inv(InvSlot).Num

[Nean]

Add something like: If FishRod > 0 Then

Above the If FishBait 0

[Matt]

Add something like: If FishRod > 0 Then

Above the If FishBait 0

Give up, Nean. He's not taking the hint. At all..

[Nean]

Add something like: If FishRod > 0 Then

Above the If FishBait 0

Give up, Nean. He's not taking the hint. At all..

Yeah. If he's too stupid to take the hint, than he doesn't deserve the help.

[Nean]

Hmmm, I went through and added all of this to the newest Mirage, and found a few errors. For starters:

Code:

If GetPlayerInvItemNum(Index, GetPlayerEquipmentSlot(Index, Weapon)) = FishRod Then

is causing a packet malfunction (Hack attempt), if you don't have it equipped. If I just do it:

Code:

If GetPlayerEquipmentSlot(Index, Weapon) = FishRod Then

Than it works just fine. Someone know what's going on?

[Matt]

No, see.. You have to check the inventory, to find the slot that the rod is equipped in..

[Nean]

So I would use a loop?

[Matt]

So I would use a loop?

No, that's what this does:

Code:

If GetPlayerInvItemNum(Index, GetPlayerEquipmentSlot(Index, Weapon)) = FishRod Then

[Nean]

So I would use a loop?

No, that's what this does:

Code:

If GetPlayerInvItemNum(Index, GetPlayerEquipmentSlot(Index, Weapon)) = FishRod Then

Well that's all good and whatnot, however when I try to attack on a fish tile, without the fishing tool, it gives me a packet error (Packet Modification), and then it just says that I have lost my connection with MIrage Source. But when I just have it [code] If GetPlayerEquipMentSlot(index, Weapon) = FishRod Then [code], it works fine. Maybe there's something wrong with the GetPlayerInvItemNum function.