heh..

I remember I ported the source code of Windows 98 to Cold Fusion many
years ago.. hmm... maybe I should rewrite it as a web service?

<CFINCLUDE template="win95.cfm">
<CFINCLUDE template="evenmore.cfm">
<CFINCLUDE template="oldstuff.cfm">
<CFINCLUDE template="billrulz.cfm">
<CFINCLUDE template="monopoly.cfm">
<CFSET INSTALL = HARD>
<CFSET  make_prog_look_big = ArrayNew(1600000)>
<CFLOOP condition="NOT CRASHED">
        <CFOUTPUT>
                #display_copyright_message#
                #display_bill_rules_message#
        </CFOUTPUT>
        <CFINCLUDE template="do_nothing.cfm">
        <CFIF first_time_installation>
                <CFMODULE template="make_50_megabyte_swapfile.cfm">
                <CFMODULE template="do_nothing.cfm">
                <CFMODULE template="totally_screw_up_HPFS_file_system.cfm">
                <CFMODULE template="search_and_destroy_the_rest_of_OS.cfm">
                <CFMODULE template="disable_Netscape.cfm">
                <CFMODULE template="disable_RealPlayer.cfm">
                <CFMODULE template="disable_Corel_Products.cfm">
                <CFMODULE template="hang_system.cfm">
        </CFIF>
        <CFOUTPUT>
                #anything#
                #display_copyright_message#
        </CFOUTPUT>
        <CFMODULE template="do_nothing.cfm">
        <CFMODULE template="do_some_stuff.cfm">
        <CFIF still_not_crashed>
                <CFOUTPUT>
                        #display_copyright_message#
                </CFOUTPUT>
                <CFMODULE template="do_nothing.cfm">
                <CFMODULE template="basically_run_windows_3.cfm">
                <CFMODULE template="do_nothing.cfm">
                <CFMODULE template="do_nothing.cfm">
        </CFIF>
        <CFIF detect_cache>
                <CFMODULE template="disable_cache.cfm">
        </CFIF>
        <CFIF fast_cpu>
                <CFMODULE template="set_wait_states.cfm" p="lots">
                <CFMODULE template="set_mouse.cfm" p1="speed" p2="very_slow">
                <CFMODULE template="set_mouse.cfm" p1="action" p2="jumpy">
                <CFMODULE template="set_mouse.cfm" p1="reaction" p2="sometimes">
        </CFIF>
        <!--- <CFSET versionNum = "3.11">--->
        <!--- <CFSET versionNum = "95">--->
        <CFSET versionNum = "98">
        <CFOUTPUT>
                Welcome to Windows #versionNum#"
        </CFOUTPUT>
        <CFIF system_ok>
                <CFMODULE template="crash.cfm" p="to_dos_prompt">
        <CFELSE>
                <CFLOOP condition="something">
                        <CFMODULE template="sleep.cfm" time="5">
                        <CFMODULE template="get_user_input.cfm">
                        <CFMODULE template="sleep.cfm" time="5">
                        <CFMODULE template="act_on_user_input.cfm">
                        <CFMODULE template="sleep.cfm" time="5">
                </CFLOOP>
                <CFMODULE template="create_general_protection_fault.cfm" time="5">
        </CFIF>
</CFLOOP>


Friday, February 13, 2004, 3:39:05 PM, you wrote:

RR> I know I shouldn't do this... but I stumbled upon a  copy of the windows
RR> NT source code and I feel obligated to pass it on (don't tell anyone
RR> where you found it)

RR> /* This is the source code to Microsoft's Windows NT 4.0 */
RR> /* (c) 1997 Microsoft, Corp. */

RR> void boot()
RR> {
RR>   hang_for_10_min();
RR>   get_half_hardware();
RR>   hang_for_5_min();
RR>   start_vms();
RR>   start_win95();
RR> }

RR> void start_network()
RR> {
RR>   start_protocols(0);
RR>   start_connections();
RR>   kill_3_connections();
RR>   create_stupid_exploits_for_unix_people_to_laugh_at();
RR>   reboot_in_3_days();
RR> }

RR> main()
RR> {
RR>   boot();
RR>   ask_for_login();
RR>   ignore_login_let_anyone_in();
RR>   start_network();


RR>   while(1)
RR>   {
RR>     break();
RR>     run_slow();
RR>     leek(ram);
RR>     use_full_resources(CPU);
RR>   }
RR> }

RR> :-o


-----------------------
Ryan Sabir
Newgency Pty Ltd
2a Broughton St
Paddington 2021
Sydney, Australia
Ph (02) 9331 2133
Fax (02) 9331 5199
Mobile: 0411 512 454
http://www.newgency.com/index.cfm?referer=rysig
[Todays Threads] [This Message] [Subscription] [Fast Unsubscribe] [User Settings]

Reply via email to