| "Autor" |
Verbesserung zu WINDOWS 95 |
|
|
|
geschrieben am: 16.04.2000 um 15:56 Uhr
|
|
Willkommen zu Neo`s Bastelstunde
Heute: Wir basteln uns ein Windows 95
Windows 95 ist ein Betriebssystem das relativ stark verbreitet ist. Leider ist es nicht ganz billig. Doch woher nehmen wenn nicht stehlen ?
Ganz einfach: man baut es sich eben selbst.
Dazu braucht man nur das unten aufgeführte Pascal Programm abtippen und starten. Erfahrene Programmierer können das Programm auch in Basic übersetzen und dann mit einem (möglichst schlechten) Interpreter ausführen. Das selbst gebaute Windows 95 ist zwar nicht 100% zum Original kompatibel dafür aber wesentlich stabiler.
program Windows95
uses crt,printer,mouse,graph,math,4711,memory,crash,do_nothing,joystick,crt,crt,graph;Var make_prog_look_big:Array[0..1000,0..1600] of Char;
swp:file;
i:Integer;
begin
if detect_cache=True Then disable_cache;
if fast_cpu=True Then
begin
set_wait_states(lots);
set_mouse(speed,very_slow);
set_mouse(action,jumpy);
set_mouse(reaction,sometimes);
end;
show_start_screen;
if system_ok=True Then Crash_to_DOS_prompt else
begin
Assign(swp,'C:win386.swp');
rewrite(swp);
blockwrite(swp,make_prog_look_big,1600000);
{ close(swp) }
end;
show_desktop;
repeat
delay(15);
get_user_input;
delay(20);
if random(100)>10 Then act_on_user_input;
delay(25);
if random(100)<20 Then crash(complete_system);
delay(random(100));
until big_red_switch_time=True;
end.
|
|
|
|
|
|
|
Top
|
