tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

coin scripts

This commit is contained in:
darkfire006 2023-05-29 20:33:16 -05:00
parent ddbbd21043
commit a11f46dcd6
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
P3D/World/ActionScript/V2/ScriptCommands/DoPlayer.vb
View File

@ -299,6 +299,16 @@
PlayerStatistics.Track("Obtained BP", bp) PlayerStatistics.Track("Obtained BP", bp)
End If End If
IsReady = True
Case "addcoins"
Dim coins As Integer = int(argument)
Core.Player.Coins += coins
If coins > 0 Then
PlayerStatistics.Track("Obtained Coins", coins)
End If
IsReady = True IsReady = True
Case "showrod" Case "showrod"
If Core.CurrentScreen.Identification = Screen.Identifications.OverworldScreen Then If Core.CurrentScreen.Identification = Screen.Identifications.OverworldScreen Then

2
P3D/World/ActionScript/V2/ScriptConstructs/DoPlayer.vb
View File

@ -75,6 +75,8 @@
Return Core.Player.Gender Return Core.Player.Gender
Case "bp" Case "bp"
Return Core.Player.BP.ToString() Return Core.Player.BP.ToString()
Case "coins"
Return Core.Player.Coins.ToString()
Case "badges" Case "badges"
Return Core.Player.Badges.Count Return Core.Player.Badges.Count
Case "thirdperson" Case "thirdperson"