diff options
Diffstat (limited to 'ShiftOS-TheRevival/MainForms/IntroStory.vb')
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/IntroStory.vb | 18 |
1 files changed, 13 insertions, 5 deletions
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 |