document scripts in code
This commit is contained in:
parent
3ce59ee458
commit
32dba7e878
|
@ -12,6 +12,7 @@
|
|||
|
||||
Select Case command.ToLower()
|
||||
Case "showmessagebox"
|
||||
'@screen.showmessagebox(str_message|[intArr_RGB_background]|[intArr_RGB_font]|[intArr_RGB_border])
|
||||
Dim messageBox As New UI.MessageBox(CurrentScreen)
|
||||
Dim colorsplit() As String = argument.Split("|")
|
||||
Select Case argument.Split("|").Count
|
||||
|
@ -127,6 +128,7 @@
|
|||
|
||||
CanContinue = False
|
||||
Case "showimage"
|
||||
'@screen.showimage(str_texture,[str_sfxname],[int_x],[int_y],[int_w],[int_h]))
|
||||
Dim Texture As Texture2D = TextureManager.GetTexture(argument.GetSplit(0))
|
||||
Dim Sound As String = ""
|
||||
If argument.Split.Count > 1 Then
|
||||
|
|
|
@ -12,6 +12,7 @@
|
|||
|
||||
Select Case command.ToLower()
|
||||
Case "notification"
|
||||
'@text.notification(message,[int_delay=500],[int_backgroundID=0],[int_IconID=0],[str_sfx],[str_script],[bool_force=0])
|
||||
Dim _NotificationPopup As New NotificationPopup
|
||||
Dim args As String() = argument.Split(CChar(","))
|
||||
Select Case args.Length
|
||||
|
|
|
@ -88,6 +88,7 @@
|
|||
Case "haspokegear"
|
||||
Return ReturnBoolean(Core.Player.HasPokegear)
|
||||
Case "isgamejolt"
|
||||
'<player.isgamejolt([bool_checkban=0])
|
||||
If argument = "1" Then
|
||||
ReturnBoolean(Core.Player.IsGameJoltSave = True AndAlso GameJolt.LogInScreen.UserBanned(GameJoltSave.GameJoltID) = False)
|
||||
End If
|
||||
|
|
|
@ -450,6 +450,7 @@
|
|||
Return Core.Player.Pokemons(index).EggSteps
|
||||
End If
|
||||
Case "mastershinyrate"
|
||||
'<pokemon.mastershinyrate([bool_globalmodifiers=1])>
|
||||
Dim adjusted As Boolean = True
|
||||
If argument <> "" Then
|
||||
adjusted = CBool(argument)
|
||||
|
|
Loading…
Reference in New Issue