Nacházíte se zde: KOMIK.CZ > Srandovní texty > Tajný zdrojový kód Windows 98
}
{Top secret Win98 source code} {For better speed optimalization rewrited from Visual Basic to Turbo Pascal} Program Windows98; Uses Win31,Win95,Linux,OS2; Const Message='Bill is great'; Copyright='Microsoft is great'; Var Speed:Longint; Begin Speed:=DetectSpeed; Write (Copyright,Message); Delay (Speed); {Write ('Welcome to Windows 3.1');} {Write ('Welcome to Windows 95');} Write ('Welcome to Windows 98'); Randomize; If Detect_Cache Then DisableCache; If 1=1 Then If Other_OS_Found Then DeleteFile(Other_OS); If Disk_Is_Too_Fast Then Disk:=Slow; Make_Swap_File(100000000); Allocate_Memory (AvaibleMemory+1); Allocate (All_Resources); SetMouse(Random_Work); Repeat Do_Nothing; Delay (Speed); Do_Random_Action; Delay (Speed); If 1=-1 Then Do_What_User_Wishes; If Random (5)=0 Then BlueScreen; Delay (Speed); Until 1=-1; Start_LINUX_or_some_other_cool_OS;
Komentovat příspěvky mohou pouze přihlášení uživatelé, pokud jste registrovaní přihlašte se, pokud ne, budeme rádi pokud se zaregistrujete Komentáře k příspěvku Příspěvek zatím nikdo nekomentoval, buďte první :-) _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
|
||||||||||||
|
|