Saving every minute.

[sir zach]

I wrote this code that is suppose to be called every minute, or when Seconds = 0.

```
Sub Bathe()

TotalTime = GetVar("Accounts\" & GetPlayerLogin(index) & "\" & GetPlayerName(index) & ".ini", "Bathe", "Time")

If TotalTime = "" Then
Call PutVar("Accounts\" & GetPlayerLogin(index) & "\" & GetPlayerName(index) & ".ini", "Bathe", "Time", "1")
Else If
NewTotal = TotalTime + 1
Call PutVar("Accounts\" & GetPlayerLogin(index) & "\" & GetPlayerName(index) & ".ini", "Bathe", "Time", NewTotal)
End If

End Sub
```

But that code isn't working AND nothing will be called when Seconds = 0\. Here is my timed event sub:

```
Sub TimedEvent(Hours, Minutes, Seconds)
If Minutes = 0 Then
If Seconds = 0 Then
Call AdminMsg("Don't forget to vote for Eclipse.", YELLOW)
End If
End If

If Seconds = 0 Then
Call Bathe()
End If

End Sub
```

Side Note: I have tried to include the bathe sub from another file and inside the timed event sub.