Finishing touches for 1.04

Author: ChallengeSY

NNCampaign.bas

@@ -1741,6 +1741,7 @@ sub campaign_gameplay
 							Instructions = "Level progress deleted"
 							HighLevel = 1
 							kill(CampaignName+".dat")
+							kill(CampaignName+".flag")
 						elseif DebugCode = "NEXTRACK" then
 							Instructions = "Music player has changed tracks"
 							rotate_music
@@ -2940,6 +2941,11 @@ sub campaign_gameplay
 					if DQ = 0 then
 						TotalXP += int(.Score * .Difficulty * 2)
 						high_score_input(Player)
+						if FileExists(CampaignName+".flag") = 0 then
+							'Intentionally empty file; simply use it to record campaigns which have been truly won
+							open CampaignName+".flag" for output as #21
+							close #21
+						end if
 					end if
 					empty_hand(Player)
 

Nebunoid.bas

@@ -263,7 +263,13 @@ do
 		for Item as byte = 1*(MenuMode-2)*CampaignsPerPage to min((MenuMode-1)*CampaignsPerPage,OfficialCampaigns(12).SetSize)
 			with CommunityCampaigns(Item)
 				if .Namee <> "" then
-					gfxstring(.Namee,40,351+Item*30,4,3,3,rgb(255,255,255))
+					if .SetSize > 0 then
+						Availability = rgb(255,255,255)
+					else
+						Availability = rgb(128,128,128)
+					end if
+					gfxstring(.Namee,40,351+Item*30,4,3,3,Availability)
+					gfxstring("Size "+str(.SetSize),820,351+Item*30,4,3,3,Availability)
 				end if
 			end with
 		next Item
@@ -329,7 +335,7 @@ do
 				ReadID = YID + (MenuMode-2)*CampaignsPerPage
 
 				with CommunityCampaigns(ReadID)
-					if MouseY >= 346+YID*30 AND MouseY <= 375+YID*30 AND .Namee <> "" AND ReadID <= OfficialCampaigns(12).SetSize then
+					if ReadID <= OfficialCampaigns(12).SetSize AND MouseY >= 346+YID*30 AND MouseY <= 375+YID*30 AND .Namee <> "" AND .SetSize > 0 then
 						draw_box(32,346+YID*30,991,375+YID*30)
 						if ButtonCombo > 0 AND HoldClick = 0 then
 							if YID = 12 then

Nebunoid.bi

@@ -379,14 +379,19 @@ sub read_campaigns(StarsOnly as ubyte = 0)
 					open .Namee+".dat" for input as #19
 					input #19, LevelsCleared
 					close #19
+					
+					.SetMastered = -abs(sgn(FileExists(.Namee+".flag")))
+					if .SetMastered = 0 then
+						'Campaign has not yet been cleared; exclude a star from this calculation
+						LevelsCleared -= 1
+					end if
 				else
 					LevelsCleared = 0
 				end if
 
 				if OCID <= CampaignsPerPage then
-					dim as integer NextLevel = LevelsCleared + 1
-					.SetMastered = (FileExists(MasterDir+"/campaigns/"+.Folder+"/L"+str(NextLevel)+".txt") = 0)
-					.SetSize = max(.SetSize,LevelsCleared)
+					'In case a player died on a secret level, register it as having been seen
+					.SetSize = max(.SetSize,LevelsCleared + 1 + .SetMastered)
 					TotalStars += LevelsCleared
 				end if
 			end if
@@ -403,6 +408,13 @@ sub read_campaigns(StarsOnly as ubyte = 0)
 				with CommunityCampaigns(CommunityFoldersFound)
 					.Namee = CommunityFolder
 					.Folder = "community/"+CommunityFolder
+					
+					for LID as short = 1 to 999
+						if FileExists(MasterDir+"/campaigns/"+.Folder+"/L"+str(LID)+".txt") = 0 then
+							.SetSize = LID - 1
+							exit for
+						end if
+					next LID
 				end with
 			end if
 			CommunityFolder = Dir()

campaigns/official/geometry/L14.txt

@@ -14,11 +14,11 @@ Brush 1 Color         := &h804000FF
 Brush 1 Score Value   := 10*
 Brush 1 Hit Degrade   := 0
 Brush 1 Increase Speed:= FALSE
-Brush 2 Color         := &h80C000FF
+Brush 2 Color         := &h808000FF
 Brush 2 Score Value   := 2
 Brush 2 Hit Degrade   := 1
 Brush 2 Increase Speed:= FALSE
-Brush 3 Color         := &h808000FF
+Brush 3 Color         := &h80C000FF
 Brush 3 Score Value   := 2
 Brush 3 Hit Degrade   := 2
 Brush 3 Increase Speed:= FALSE

campaigns/official/intro/L10.txt

@@ -5,7 +5,7 @@ LEVEL DATA FILE - INTRODUCTION LEVEL 10
 ================================================================================
 
 Level Name            := Prismatic Beam
-Level Description     := This is the final level of the campaign. Good luck!
+Level Description     := 
 Level Password        := HDUFRLTV
 Level game number     := 1
 Level time limit      := 0

codes.md

@@ -1,6 +1,6 @@
 ## Nebunoid Cheats
 
-Nebunoid comes with a collection of cheat codes, accessed via F11 while the game is running. Cheat codes which alter gameplay require acknowledgement that they will disqualify high scores and void experience earnings before they can be used.
+Nebunoid comes with a collection of cheat codes, accessed via F11 while the game is running. Cheat codes which alter gameplay require acknowledgement that they will disqualify high scores and void star earnings before they can be used.
 
 * NexTrack: Skips to the next song in the playlist.
 * Scratch: Stops the current song. Effective until turns change or overridden with the code above.