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

A couple Fishing Script question


Viktan
 Share

Recommended Posts

Alright I'm working on a fishing script in a new project  and I need a bit of help getting the script how I like it.

1st question is if a Else If would be proper to place after a End If like this
Case 0
  Dim weapon
  weapon = GetPlayerWeaponSlot(index)
  If weapon = 0 Then
      Call PlayerMsg(index, "You don't have a Fishing Rod equipped!", 15)
      ElseIf GetPlayerInvItemNum(index, weapon) = 11 Then
      Call GoFishing(index, 12, 11, "Blue Tuna")
      Else
      Call PlayerMsg(index, "You don't have a Fishing Rod equipped", 15)
  End If
      **ElseIf
            weapon = 0 Then
            CallPlayerMsg(index,  blah blah)**

End Select
End Sub
or would I just need to put an IF statement?

To explain a bit, I need the script to check to see if a better rod is equipped so it allows you to catch better fish

2nd question is, is it possible to make it where lets say I have cooper rod equipped and the cooper rod is better then the wooded rod, it allows me to catch not only better fish, but the same fish as the wooden rod would allow me to catch?
Link to comment
Share on other sites

1st question: You have to put the ElseIf before the End If, or the script won't work. 

2nd question: It's possible, but I can't tell exactly how at the moment.  It'd probably take a lot more work than giving each rod its own unique set of fish to catch, though.
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...