shiftos-archive/ShiftOS
1
0
Fork 0
mirror of https://github.com/TheUltimateHacker/ShiftOS.git synced 2025-01-22 09:01:58 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Made Changes to ThePlague virus, more changes to come shortly.

Browse source
This commit is contained in:
NarodGaming 2015-04-30 08:02:36 +01:00
parent c3a4af14d0
commit e1c5c6ba9e
2 changed files with 39 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
ShiftOS/ShiftOSDesktop.vb
View file

@ -21,6 +21,8 @@
Public password As String Public password As String
'Corruptions 'Corruptions
Public NumberOn As Integer = 1
Public CrashGameReady As Boolean = False
Public FileSkimmerCorrupted As Boolean = False Public FileSkimmerCorrupted As Boolean = False
Public ArtpadCorrupted As Boolean = False Public ArtpadCorrupted As Boolean = False
Public AudioPlayerCorrupted As Boolean = False Public AudioPlayerCorrupted As Boolean = False
@ -1062,6 +1064,8 @@
SortOutBooleans(VideoPlayerCorrupted, 610, False) SortOutBooleans(VideoPlayerCorrupted, 610, False)
SortOutBooleans(VirusScannerCorrupted, 612, False) SortOutBooleans(VirusScannerCorrupted, 612, False)
SortOutBooleans(WebBrowserCorrupted, 613, False) SortOutBooleans(WebBrowserCorrupted, 613, False)
SortOutBooleans(CrashGameReady, 614, False)
savelines(615) = NumberOn
If boughtdesktopicons = True Then savelines(614) = 11 Else savelines(614) = 10 If boughtdesktopicons = True Then savelines(614) = 11 Else savelines(614) = 10
If boughtadvapplauncher = True Then savelines(615) = 11 Else savelines(615) = 10 If boughtadvapplauncher = True Then savelines(615) = 11 Else savelines(615) = 10
savelines(616) = password savelines(616) = password
@ -1580,6 +1584,8 @@
SortOutBooleans(VideoPlayerCorrupted, 610, True) SortOutBooleans(VideoPlayerCorrupted, 610, True)
SortOutBooleans(VirusScannerCorrupted, 612, True) SortOutBooleans(VirusScannerCorrupted, 612, True)
SortOutBooleans(WebBrowserCorrupted, 613, True) SortOutBooleans(WebBrowserCorrupted, 613, True)
SortOutBooleans(CrashGameReady, 614, True)
NumberOn = loadlines(615)
Try Try
If loadlines(614) = 11 Then boughtdesktopicons = True Else boughtdesktopicons = False If loadlines(614) = 11 Then boughtdesktopicons = True Else boughtdesktopicons = False
Catch Catch

35
ShiftOS/Viruses.vb
View file

@ -382,76 +382,107 @@
Public Sub theplaguedestroy(ByVal sender As Object, ByVal e As EventArgs) Handles theplaguetimer.Tick Public Sub theplaguedestroy(ByVal sender As Object, ByVal e As EventArgs) Handles theplaguetimer.Tick
Randomize() Randomize()
Dim Chance As Integer = CInt(Math.Ceiling(Rnd() * 100)) Dim Chance As Integer = CInt(Math.Ceiling(Rnd() * 100))
If Chance = ChanceOfDestroyThePlague Or Chance < ChanceOfDestroyThePlague Then If Chance = ChanceOfDestroyThePlague Or Chance > ChanceOfDestroyThePlague Then
GetRandomApplication() GetRandomApplication()
End If End If
End Sub End Sub
Public Sub GetRandomApplication() Public Sub GetRandomApplication()
Dim chooser As Integer = CInt(Math.Ceiling(Rnd() * 32)) Dim Chooser As Integer = ShiftOSDesktop.NumberOn
Select Case chooser Select Case chooser
Case 1 Case 1
InfectApplication(ArtPad, ShiftOSDesktop.ArtpadCorrupted) InfectApplication(ArtPad, ShiftOSDesktop.ArtpadCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 2 Case 2
InfectApplication(File_Skimmer, ShiftOSDesktop.FileSkimmerCorrupted) InfectApplication(File_Skimmer, ShiftOSDesktop.FileSkimmerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 3 Case 3
InfectApplication(Audio_Player, ShiftOSDesktop.AudioPlayerCorrupted) InfectApplication(Audio_Player, ShiftOSDesktop.AudioPlayerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 4 Case 4
InfectApplication(Bitnote_Digger, ShiftOSDesktop.BitNoteDiggerCorrupted) InfectApplication(Bitnote_Digger, ShiftOSDesktop.BitNoteDiggerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 5 Case 5
InfectApplication(Bitnote_Wallet, ShiftOSDesktop.BitNoteWalletCorrupted) InfectApplication(Bitnote_Wallet, ShiftOSDesktop.BitNoteWalletCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 6 Case 6
InfectApplication(Calculator, ShiftOSDesktop.CalculatorCorrupted) InfectApplication(Calculator, ShiftOSDesktop.CalculatorCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 7 Case 7
InfectApplication(Clock, ShiftOSDesktop.ClockCorrupted) InfectApplication(Clock, ShiftOSDesktop.ClockCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 8 Case 8
InfectApplication(coherencemodeform, ShiftOSDesktop.CoherenceModeCorrupted) InfectApplication(coherencemodeform, ShiftOSDesktop.CoherenceModeCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 9 Case 9
InfectApplication(Colour_Picker, ShiftOSDesktop.ColourPickerCorrupted) InfectApplication(Colour_Picker, ShiftOSDesktop.ColourPickerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 10 Case 10
InfectApplication(Dodge, ShiftOSDesktop.DodgeCorrupted) InfectApplication(Dodge, ShiftOSDesktop.DodgeCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 11 Case 11
InfectApplication(Downloadmanager, ShiftOSDesktop.DownloadManagerCorrupted) InfectApplication(Downloadmanager, ShiftOSDesktop.DownloadManagerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 12 Case 12
InfectApplication(FloodGate_Manager, ShiftOSDesktop.FloodGateManagerCorrupted) InfectApplication(FloodGate_Manager, ShiftOSDesktop.FloodGateManagerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 13 Case 13
InfectApplication(Graphic_Picker, ShiftOSDesktop.GraphicPickerCorrupted) InfectApplication(Graphic_Picker, ShiftOSDesktop.GraphicPickerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 14 Case 14
InfectApplication(Icon_Manager, ShiftOSDesktop.IconManagerCorrupted) InfectApplication(Icon_Manager, ShiftOSDesktop.IconManagerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 15 Case 15
InfectApplication(Installer, ShiftOSDesktop.InstallerCorrupted) InfectApplication(Installer, ShiftOSDesktop.InstallerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 16 Case 16
InfectApplication(Knowledge_Input, ShiftOSDesktop.KnowledgeInputCorrupted) InfectApplication(Knowledge_Input, ShiftOSDesktop.KnowledgeInputCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 17 Case 17
InfectApplication(Labyrinth, ShiftOSDesktop.LabyrinthCorrupted) InfectApplication(Labyrinth, ShiftOSDesktop.LabyrinthCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 18 Case 18
InfectApplication(Name_Changer, ShiftOSDesktop.NameChangerCorrupted) InfectApplication(Name_Changer, ShiftOSDesktop.NameChangerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 19 Case 19
InfectApplication(OrcWrite, ShiftOSDesktop.OrcWriteCorrupted) InfectApplication(OrcWrite, ShiftOSDesktop.OrcWriteCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 20 Case 20
InfectApplication(Pong, ShiftOSDesktop.PongCorrupted) InfectApplication(Pong, ShiftOSDesktop.PongCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 21 Case 21
InfectApplication(Shifter, ShiftOSDesktop.ShifterCorrupted) InfectApplication(Shifter, ShiftOSDesktop.ShifterCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 22 Case 22
InfectApplication(Shiftnet, ShiftOSDesktop.ShiftNetCorrupted) InfectApplication(Shiftnet, ShiftOSDesktop.ShiftNetCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 23 Case 23
InfectApplication(Shiftorium, ShiftOSDesktop.ShiftoriumCorrupted) InfectApplication(Shiftorium, ShiftOSDesktop.ShiftoriumCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 24 Case 24
InfectApplication(Skin_Loader, ShiftOSDesktop.SkinLoaderCorrupted) InfectApplication(Skin_Loader, ShiftOSDesktop.SkinLoaderCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 25 Case 25
InfectApplication(Skinshifter, ShiftOSDesktop.SkinShifterCorrupted) InfectApplication(Skinshifter, ShiftOSDesktop.SkinShifterCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 26 Case 26
InfectApplication(systeminfo, ShiftOSDesktop.SystemInfoCorrupted) InfectApplication(systeminfo, ShiftOSDesktop.SystemInfoCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 27 Case 27
InfectApplication(Terminal, ShiftOSDesktop.TerminalCorrupted) InfectApplication(Terminal, ShiftOSDesktop.TerminalCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 28 Case 28
InfectApplication(TextPad, ShiftOSDesktop.TextpadCorrupted) InfectApplication(TextPad, ShiftOSDesktop.TextpadCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 29 Case 29
InfectApplication(Video_Player, ShiftOSDesktop.VideoPlayerCorrupted) InfectApplication(Video_Player, ShiftOSDesktop.VideoPlayerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 30 Case 30
InfectApplication(VirusScanner, ShiftOSDesktop.VirusScannerCorrupted) InfectApplication(VirusScanner, ShiftOSDesktop.VirusScannerCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 31 Case 31
InfectApplication(Web_Browser, ShiftOSDesktop.WebBrowserCorrupted) InfectApplication(Web_Browser, ShiftOSDesktop.WebBrowserCorrupted)
ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1
Case 32 Case 32
crash.ThePlagueBSOD() crash.ThePlagueBSOD()
End Select End Select