Re: Confidential- Windows98 Source Code

WOW Al, how'd you get THAT out of Microsoft <BG> - LOVE IT !!!

Chuck

Al Barsa, Jr. wrote:

> Confidential- Windows98 Source Code
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>
> /*
>   TOP SECRET Microsoft   Code
>   Project: Chicago(tm)
>   Projected release-date: Summer 1998
> */
>
> #include "win31.h"
> #include "win95.h"
> #include "evenmore.h"
> #include "oldstuff.h"
> #include "billrulz.h"
> #define INSTALL = HARD
>
> char make_prog_look_big[1600000];
>
> void main()
> {
>     while (!CRASHED)
>     {
>         display_copyright_message();
>         display_bill_rules_message();
>         do_nothing_loop();
>         if (first_time_installation)
>         {
>             make_50_megabyte_swapfile();
>             do_nothing_loop();
>             totally_screw_up_HPFS_file_system();
>             search_and_destroy_the_rest_of_OS/2();
>             hang_system();
>         }
>         write_something(anything);
>         display_copyright_message();
>         do_nothing_loop();
>         do_some_stuff();
>         if (still_not_crashed)
>         {
>             display_copyright_message();
>             do_nothing_loop();
>             basically_run_windows_3.1();
>             do_nothing_loop();
>             do_nothing_loop();
>         }
>     }
>
>     if (detect_cache())
>         disable_cache();
>
>     if (fast_cpu())
>     {
>         set_wait_states(lots);
>         set_mouse(speed, very_slow);
>         set_mouse(action, jumpy);
>         set_mouse(reaction, sometimes);
>     }
>
>     /* printf("Welcome to Windows 3.11"); */
>     /* printf("Welcome to Windows 95"); */
>     printf("Welcome to Windows 98");
>     if (system_ok())
>         crash(to_dos_prompt);
>     else
>         system_memory = open("a:\swp0001.swp", O_CREATE);
>
>     while (something)
>     {
>         sleep(5);
>         get_user_input();
>         sleep(5);
>         act_on_user_input();
>         sleep(5);
>     }
>     create_general_protection_fault();
> }
>
> Al Barsa, Jr.
> Barsa Consulting, LLC
> 400 > 390
>
> Phone:  914-251-9400
> Fax:    914-251-9406
>
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---



+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---