Necrosoft Office
|
Опис Офісу[псув.]
Перша версія Некрософт Офісу з’явилася у часи NS-DOShки і відтоді змінилася настільки, що тепер вона написана на удоскоглючній мові NECROLANG, глючить при написанні першого ж символу, при роздрукуванні фрази «Necrosoft — козли» форматує всі диски, знищує БІОС, материнку, пам’ять, проц, блок живлення, корпус, а потім користувача разом з кімнатою — все це зроблено в новішій версії Некрософт Офіс 666!
Цілі створення[псув.]
- Заробити побільше грошей (програма коштуватиме 20000 некротугриків).
- Роздрукувати побільше пекельних текстів (тільки пекельні тексти друкуются всього лиш з 10 000 глюками).
Виточник[псув.]
Написаний на пекельно креативній мові НЕКРОЛАНГ.
//Necrosoft Office 666 //TOP SECRET CODE //PRICE: 2000 NecroTougricks necro-soft program(Necrosoft Office); include uses: errors,prints,pekelni-texty,necrosft-*errors,format,crashes; go procedure MainWindow.Show(Mistake:TError) go Mistake := errormessages(while(60000900)); Show(TTextEnter,TBatonPrint); Mistake := Always(errormessages); stop; procedure TTextEnter.EditText(Mistake: TError); var error: TInteger; go error := Random(19000000000); if error=0 then TTextEnter.Write(tkeyboard.klavishi) else Mistake := format C:(now,fastest); stop; procedure TBatonPrint.Click(Mistake: TError) go if TTextEnter.Text=Necrosoft - kozly then Mistake := (TFormatAllDisk,TCrashMotherboard,TCrashMemory,TCrashCPU,TCrashSysBlock,TFire); if TTextEnter=justtext then begin if Random(5210000)<>0 then Mistake := Format C: else Print(someletters); if TTextEnter=pekelnyj-text then Mistake := one of 10000; Print(pekelnyj-text) end; stop; stop.
|
![]() |
---|
Версія № 3735 Зміст: |