mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-04-08 18:35:09 +02:00
insert start script into Kolben GM and create the script files for the reward system
This commit is contained in:
parent
c6e43df31c
commit
a368099b07
BIN
P3D/Content/Data/Scripts/startscript/main.dat
Normal file
BIN
P3D/Content/Data/Scripts/startscript/main.dat
Normal file
Binary file not shown.
BIN
P3D/Content/Data/Scripts/startscript/rewardsdetailed.dat
Normal file
BIN
P3D/Content/Data/Scripts/startscript/rewardsdetailed.dat
Normal file
Binary file not shown.
BIN
P3D/Content/Data/Scripts/startscript/rewardssystem.dat
Normal file
BIN
P3D/Content/Data/Scripts/startscript/rewardssystem.dat
Normal file
Binary file not shown.
@ -28606,6 +28606,15 @@
|
||||
<None Include="Content\Data\Scripts\pewter\Fossil_Kabutops.dat">
|
||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||
</None>
|
||||
<Content Include="Content\Data\Scripts\startscript\main.dat">
|
||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||
</Content>
|
||||
<Content Include="Content\Data\Scripts\startscript\rewardssystem.dat">
|
||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||
</Content>
|
||||
<Content Include="Content\Data\Scripts\startscript\rewardsdetailed.dat">
|
||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||
</Content>
|
||||
<None Include="Content\Data\Scripts\tohjofalls\jjm.dat">
|
||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||
</None>
|
||||
|
@ -571,6 +571,8 @@ Public Class GameMode
|
||||
Dim gameMode As New GameMode("Pokemon 3D", "The normal game mode.", GameController.GAMEVERSION, "Kolben Games", "\Content\Data\maps\", "\Content\Data\Scripts\", "\Content\Data\maps\poke\", "\Content\Pokemon\Data\", "\Content\", "\Content\Localization\", New List(Of GameRule),
|
||||
"newgame\intro0.dat", New Vector3(1.0F, 0.1F, 3.0F), MathHelper.PiOver2, "Your Room", "", New Color(59, 123, 165), "0", "welcome", "1", SkinColors, SkinFiles, SkinNames, SkinGenders)
|
||||
|
||||
gameMode.StartScript = "startscript\main"
|
||||
|
||||
Dim gameRules As New List(Of GameRule)
|
||||
gameRules.Add(New GameRule("MaxLevel", "100"))
|
||||
gameRules.Add(New GameRule("OnlyCaptureFirst", "0"))
|
||||
|
Loading…
x
Reference in New Issue
Block a user