From 344a0ff99e1adc6b3cd97e0d4ce7496b12d624b9 Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Tue, 8 Nov 2022 13:02:02 +0700 Subject: rework on introstory --- ShiftOS-TheRevival/MainForms/IntroStory.vb | 18 +++++++++++++----- 1 file changed, 13 insertions(+), 5 deletions(-) (limited to 'ShiftOS-TheRevival/MainForms/IntroStory.vb') diff --git a/ShiftOS-TheRevival/MainForms/IntroStory.vb b/ShiftOS-TheRevival/MainForms/IntroStory.vb index f7d30d9..36df1e5 100644 --- a/ShiftOS-TheRevival/MainForms/IntroStory.vb +++ b/ShiftOS-TheRevival/MainForms/IntroStory.vb @@ -8,18 +8,26 @@ Private Sub OpacityPlay_Tick(sender As Object, e As EventArgs) Handles OpacityPlay.Tick Select Case TimerDisplay - Case 1, 5, 9, 13, 17 + Case 1, 9, 17, 25 + BackColor = Color.White + Label1.ForeColor = Color.Black Visible = True TimerDisplay = TimerDisplay + 1 - Case 3, 7, 11, 15, 19 + Case 3, 7, 11, 15, 19, 23, 27 Visible = False TimerDisplay = TimerDisplay + 1 - Case 21 + Case 5, 13, 21 BackColor = Color.Black + Label1.ForeColor = Color.White + Visible = True + TimerDisplay = TimerDisplay + 1 + Case 29 + BackColor = Color.Black + Label1.ForeColor = Color.Black Visible = True Opacity = 0.1 - TimerDisplay = 22 - Case 22 + TimerDisplay = 30 + Case 30 If Opacity = 1 Then Strings.ComputerInfo(3) = "0" Strings.IsFree = False -- cgit v1.2.3