You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
21 lines
502 B
21 lines
502 B
7 years ago
|
Attribute VB_Name = "PlayerStates"
|
||
|
'Player state for when the player comes into contact with a robot or shock tile.
|
||
|
Public Sub ShockPlayer()
|
||
|
PlayerState = 3
|
||
|
End Sub
|
||
|
|
||
|
'Player state for when the player falls too far.
|
||
|
Public Sub DazePlayer()
|
||
|
PlayerState = 2
|
||
|
End Sub
|
||
|
|
||
|
'Player state for when the player successfully reaches the exit.
|
||
|
Public Sub WinLevel()
|
||
|
PlayerState = 1
|
||
|
End Sub
|
||
|
|
||
|
'Resets the player state to normal.
|
||
|
Public Sub ResetPlayerState()
|
||
|
PlayerState = 0
|
||
|
End Sub
|