From 537ba4982ec7c8b3a1a3609fe13bc6f0624fee73 Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Wed, 23 Nov 2022 21:30:54 +0700 Subject: Integrating Chapter 2 into the game and minor changes to check the story --- .../Functions/InGame/LoreManager/IntroStoryTell.vb | 25 ++++++++++++++++++++++ 1 file changed, 25 insertions(+) (limited to 'ShiftOS-TheRevival/Functions/InGame/LoreManager') diff --git a/ShiftOS-TheRevival/Functions/InGame/LoreManager/IntroStoryTell.vb b/ShiftOS-TheRevival/Functions/InGame/LoreManager/IntroStoryTell.vb index 53eacad..ff69a3e 100644 --- a/ShiftOS-TheRevival/Functions/InGame/LoreManager/IntroStoryTell.vb +++ b/ShiftOS-TheRevival/Functions/InGame/LoreManager/IntroStoryTell.vb @@ -1,4 +1,18 @@ Module IntroStoryTell + Public NextChapter As Boolean + + Public Sub CheckNextChapterEligibility() + Select Case Strings.ComputerInfo(3) + Case 0 + If Strings.ComputerInfo(4) = 35 Then + Strings.ComputerInfo(3) = 1 + NextChapter = True + Else + NextChapter = False + End If + End Select + End Sub + Public Sub StoryLineIntro(Timestamp As Integer) Select Case Strings.ComputerInfo(3) Case 0 @@ -65,6 +79,17 @@ NewLine(" : Once you able to afford it and installing it, there's a guide to use the window manager") Case 600 NewLine(" : Alright, I gotta go now and see you in the next progress.") + Case 630 + NewLine(" Disconnected") + Case 675 + Console.StoryOnlyTimer.Stop() + Console.TextBox1.Text = Nothing + Console.TextBox1.ReadOnly = False + Strings.AvailableFeature(35) = 0 + Terminal_CheckFeature() + Terminal_PrintPrompt() + Terminal_AssignPrompt() + TextRebind() End Select End Select End Sub -- cgit v1.2.3