It doesn't work perfectly but something happens

This commit is contained in:
JappaWakka 2023-05-25 18:37:37 +02:00
parent 046df24c43
commit 99bf455a6e
8 changed files with 494 additions and 339 deletions

Binary file not shown.

After

Width:  |  Height:  |  Size: 233 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 407 B

View File

@ -28208,6 +28208,9 @@
<Content Include="Content\Textures\VoltorbFlip\Cursor_Memo.png">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
<Content Include="Content\Textures\VoltorbFlip\HUD.png">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
<Content Include="Content\Textures\VoltorbFlip\Memo_Background.png">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
@ -28220,6 +28223,9 @@
<Content Include="Content\Textures\VoltorbFlip\Memo_Index.png">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
<Content Include="Content\Textures\VoltorbFlip\Quit_Button.png">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
<Content Include="Content\Textures\VoltorbFlip\Tile_Back.png">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>

View File

@ -16,7 +16,7 @@ Public Class FontContainer
Me._spriteFont = Font
Select Case FontName.ToLower()
Case "braille"
Case "braille", "voltorbflipfont"
Me._spriteFont.DefaultCharacter = CChar(" ")
Case Else
Me._spriteFont.DefaultCharacter = CChar("?")

File diff suppressed because it is too large Load Diff

View File

@ -280,17 +280,17 @@
If Core.Player.Inventory.GetItemAmount(54) > 0 Then
If Core.Player.Coins < 50000 Then
Core.SetScreen(New VoltorbFlip.VoltorbFlipScreen(CurrentScreen))
IsReady = True
CanContinue = False
If CurrentScreen.Identification = Screen.Identifications.OverworldScreen Then
If VoltorbFlip.VoltorbFlipScreen.TotalCoins > 0 Then
Screen.TextBox.Show("You've won" & " " & VoltorbFlip.VoltorbFlipScreen.TotalCoins & " " & "Coins!")
Core.Player.Coins += VoltorbFlip.VoltorbFlipScreen.TotalCoins
VoltorbFlip.VoltorbFlipScreen.TotalCoins = 0
CanContinue = False
Else
Screen.TextBox.Show("Too bad, you didn't win~any Coins!*Better luck next time!")
End If
IsReady = True
End If
Else
Screen.TextBox.Show("Your Coin Case is already full!")

View File

@ -89,9 +89,9 @@
/build:Fonts/BMP/Unown.png
#begin Fonts/BMP/VoltorbFlipFont.png
/importer:TextureImporter
/importer:LocalizedFontTextureImporter
/processor:LocalizedFontTextureProcessor
/processorParam:DefaultCharacter=?
/processorParam:DefaultCharacter=
/processorParam:FirstCharacter=
/processorParam:PremultiplyAlpha=True
/processorParam:TextureFormat=Color

Binary file not shown.

Before

Width:  |  Height:  |  Size: 448 B

After

Width:  |  Height:  |  Size: 447 B