Fix potion please

[adamsharp]

What Is Wrong With This?
```
Case 6
Call PlayerMsg(Index, "You Drink The First Part Of The Potion", 10)
Call SetPlayerHP(Index,GetPlayerHP(Index) + 75)
Call TakeItem(Index, 250, 1)
Call GiveItem(Index, 251, 1)
Exit Sub

```
Regards,
Adamsharp.

[balliztik1]

Doesn't look like anything's wrong, at a glance. As long as you have the take and give item subs, you should be fine, assuming your main.txt doesn't have an error somewhere else.

[xelander]

Case 6
Call PlayerMsg(Index, "You Drink The First Part Of The Potion", 10)
Call SetPlayerHP(Index,GetPlayerHP(Index) + 75)
Call TakeItem(Index, 250, 1)
Call GiveItem(Index, 251, 1)
Call SendHP(Index)
Exit Sub

[balliztik1]

It actually shouldn't need a SendHP in there. SetPlayerHP automatically refreshes the HP, according to the latest source code. Not sure about older versions, though.

What exactly isn't working? Are you not being healed? Is the item not being taken? Are you not getting the message?

[adamsharp]

nothing is happening at all
also

what is wrong with this?
```
' Executes every second, based on the server time.
Sub TimedEvent(Hours, Minutes, Seconds)
If Minutes = 0 Then
If Seconds = 0 Then
Call AdminMsg("Don't Forget To Read The News At Tlomaw.com", YELLOW)
Call AdminMsg("Look Its The Start Of A New Hour Here Have 25 Gold!", 10)
Call GiveCurrency(Index, 1, 25)
End If
End If
End Sub

```thank you
Regards,
Adamsharp.

[xelander]

Make sure Scripts are ON.

[balliztik1]

@adamsharp:

> nothing is happening at all
> also
>
> what is wrong with this?
> ```
> ' Executes every second, based on the server time.
> Sub TimedEvent(Hours, Minutes, Seconds)
> If Minutes = 0 Then
> If Seconds = 0 Then
> Call AdminMsg("Don't Forget To Read The News At Tlomaw.com", YELLOW)
> Call AdminMsg("Look Its The Start Of A New Hour Here Have 25 Gold!", 10)
> Call GiveCurrency(Index, 1, 25)
> End If
> End If
> End Sub
>
> ```thank you
> Regards,
> Adamsharp.

Couple things wrong with that. One, AdminMsgs aren't shown to players. I don't know if you were trying to send these to players, but you'd need GlobalMsgs for that. Second, "index" is not defined in that sub, so you can't give currency to player "index". You'd have to do something like:

```
For index = 1 to MAX_PLAYERS
    If IsPlaying(index) Then
        Call GiveCurrency(Index, 1, 25)
    End If
Next
```
As for the potion, that definitely means your main.txt is bugged. Either turn on ScriptErrors in the data.ini file and restart the server, then fix the errors that it finds, or post your main.txt so someone else can check into it.

[Ruins of Hell]

@adamsharp:

> what is wrong with this?
> ```
> shod code
>
> ```thank you
> Regards,
> Adamsharp.

Stop using Regards. You aren't Godlord, only he can do that cause he's a computer

What's wrong with it?

You removed the credit for Eclipse.

[kris_hole]

do you have teh give item take item subs?