Program unik PASCAL

Iseng-iseng bikin program konyol.. tampilannya kayak gini niih :

Ini source code nya menggunakan aplikasi Dev-PASCAL. Aplikasinya lumayan buat isengin temen atau buat usir nyamuk. :D

program Untitled;
begin
writeln();
writeln();
writeln();
writeln();
writeln();
writeln();
writeln();
writeln();
writeln('                       8888  8888888');
writeln('                  888888888888888888888888');
writeln('               8888:::8888888888888888888888888');
writeln('             8888::::::8888888888888888888888888888');
writeln('            88::::::::888:::8888888888888888888888888');
writeln('          88888888::::8:::::::::::88888888888888888888');
writeln('        888 8::888888::::::::::::::::::88888888888   888');
writeln('           88::::88888888::::m::::::::::88888888888    8');
writeln('         888888888888888888:M:::::::::::8888888888888');
writeln('        88888888888888888888::::::::::::M88888888888888');
writeln('        8888888888888888888888:::::::::M8888888888888888');
writeln('         8888888888888888888888:::::::M888888888888888888');
writeln('        8888888888888888::88888::::::M88888888888888888888');
writeln('      88888888888888888:::88888:::::M888888888888888   8888');
writeln('     88888888888888888:::88888::::M::;o*M*o;888888888    88');
writeln('    88888888888888888:::8888:::::M:::::::::::88888888    8');
writeln('   88888888888888888::::88::::::M:;:::::::::::888888888');  
writeln('  8888888888888888888:::8::::::M::aAa::::::::M8888888888       8');
writeln('  88   8888888888::88::::8::::M:::::::::::::888888888888888 8888');
writeln(' 88  88888888888:::8:::::::::M::::::::::;::88:88888888888888888');
writeln(' 8  8888888888888:::::::::::M::"@@@@@@@"::::8w8888888888888888');
writeln('  88888888888:888::::::::::M:::::"@a@":::::M8i888888888888888');
writeln(' 8888888888::::88:::::::::M88:::::::::::::M88z88888888888888888');
writeln('8888888888:::::8:::::::::M88888:::::::::MM888!888888888888888888');
writeln('888888888:::::8:::::::::M8888888MAmmmAMVMM888*88888888   88888888');
writeln('888888 M:::::::::::::::M888888888:::::::MM88888888888888   8888888');
writeln('8888   M::::::::::::::M88888888888::::::MM888888888888888    88888');
writeln(' 888   M:::::::::::::M8888888888888M:::::mM888888888888888    8888');
writeln('  888  M::::::::::::M8888:888888888888::::m::Mm88888 888888   8888');
writeln('   88  M::::::::::::8888:88888888888888888::::::Mm8   88888   888');
writeln('   88  M::::::::::8888M::88888::888888888888:::::::Mm88888    88');
writeln('   8   MM::::::::8888M:::8888:::::888888888888::::::::Mm8     4 ');
writeln('       8M:::::::8888M:::::888:::::::88:::8888888::::::::Mm    2          ');
writeln('      88MM:::::8888M:::::::88::::::::8:::::888888:::M:::::M              ');
writeln('     8888M:::::888MM::::::::8:::::::::::M::::8888::::M::::M             ');
writeln('    88888M:::::88:M::::::::::8:::::::::::M:::8888::::::M::M             ');
writeln('   88 888MM:::888:M:::::::::::::::::::::::M:8888:::::::::M:         ');
writeln('   8 88888M:::88::M:::::::::::::::::::::::MM:88::::::::::::M        ');
writeln('     88888M:::88::M::::::::::*88*::::::::::M:88::::::::::::::M    ');
writeln('    888888M:::88::M:::::::::88@@88:::::::::M::88::::::::::::::M    ');
writeln('    888888MM::88::MM::::::::88@@88:::::::::M:::8::::::::::::::*8   ');
writeln('    88888  M:::8::MM:::::::::*88*::::::::::M:::::::::::::::::88@@  ');
writeln('    8888   MM::::::MM:::::::::::::::::::::MM:::::::::::::::::88@@  ');
writeln('     888    M:::::::MM:::::::::::::::::::MM::M::::::::::::::::*8   ');
writeln('     888    MM:::::::MMM::::::::::::::::MM:::MM:::::::::::::::M    ');
writeln('      88     M::::::::MMMM:::::::::::MMMM:::::MM::::::::::::MM    ');
writeln('       88    MM:::::::::MMMMMMMMMMMMMMM::::::::MMM::::::::MMM     ');
writeln('        88    MM::::::::::::MMMMMMM::::::::::::::MMMMMMMMMM      ');
writeln('         88   8MM::::::::::::::::::::::::::::::::::MMMMMM       ');
writeln('          8   88MM::::::::::::::::::::::M:::M::::::::MM        ');
writeln('              888MM::::::::::::::::::MM::::::MM::::::MM ');
writeln('             88888MM:::::::::::::::MMM:::::::mM:::::MM  ');
writeln('             888888MM:::::::::::::MMM:::::::::MMM:::M    ');
writeln('            88888888MM:::::::::::MMM:::::::::::MM:::M    ');
writeln('           88 8888888M:::::::::MMM::::::::::::::M:::M   ');
writeln('           8  888888 M:::::::MM:::::::::::::::::M:::M:  ');
writeln('              888888 M::::::M:::::::::::::::::::M:::MM  ');
writeln('             888888  M:::::M::::::::::::::::::::::::M:M ');
writeln('             888888  M:::::M:::::::::@::::::::::::::M::M');
writeln('             88888   M::::::::::::::@@:::::::::::::::M::M ');
writeln('            88888   M::::::::::::::@@@::::::::::::::::M::M    ');
writeln('           88888   M:::::::::::::::@@::::::::::::::::::M::M    ');
writeln('          88888   M:::::m::::::::::@::::::::::Mm:::::::M:::M    ');
writeln('          8888   M:::::M:::::::::::::::::::::::MM:::::::M:::M   ');
writeln('         8888   M:::::M:::::::::::::::::::::::MMM::::::::M:::M   ');
writeln('        888    M:::::Mm::::::::::::::::::::::MMM:::::::::M::::M   ');
writeln('      8888    MM::::Mm:::::::::::::::::::::MMMM:::::::::m::m:::M  ');
writeln('     888      M:::::M::::::::::::::::::::MMM::::::::::::M::mm:::M  ');
writeln('  8888       MM:::::::::::::::::::::::::MM:::::::::::::mM::MM:::M: ');
writeln('             M:::::::::::::::::::::::::M:::::::::::::::mM::MM:::Mm  ');
writeln('            MM::::::m:::::::::::::::::::::::::::::::::::M::MM:::MM   ');
writeln('            M::::::::M:::::::::::::::::::::::::::::::::::M::M:::MM  ');    
writeln('           MM:::::::::M:::::::::::::M:::::::::::::::::::::M:M:::MM   ');
writeln('           M:::::::::::M88:::::::::M:::::::::::::::::::::::MM::MMM   ');
writeln('           M::::::::::::8888888888M::::::::::::::::::::::::MM::MM   ');
writeln('           M:::::::::::::88888888M:::::::::::::::::::::::::M::MM  ');
writeln('           M::::::::::::::888888M:::::::::::::::::::::::::M::MM  ');
writeln('           M:::::::::::::::88888M:::::::::::::::::::::::::M:MM   ');
writeln('           M:::::::::::::::::88M::::::::::::::::::::::::::MMM    ');
writeln('           M:::::::::::::::::::M::::::::::::::::::::::::::MMM    ');
writeln('           MM:::::::::::::::::M::::::::::::::::::::::::::MMM      ');
writeln('            M:::::::::::::::::M::::::::::::::::::::::::::MMM     ');
writeln('            MM:::::::::::::::M::::::::::::::::::::::::::MMM      ');
writeln('             M:::::::::::::::M:::::::::::::::::::::::::MMM       ');
writeln('             MM:::::::::::::M:::::::::::::::::::::::::MMM        ');
writeln('              M:::::::::::::M::::::::::::::::::::::::MMM         ');
writeln('              MM:::::::::::M::::::::::::::::::::::::MMM          ');
writeln('               M:::::::::::M:::::::::::::::::::::::MMM          ');
writeln('               MM:::::::::M:::::::::::::::::::::::MMM           ');
writeln('                M:::::::::M::::::::::::::::::::::MMM           ');
writeln('                MM:::::::M::::::::::::::::::::::MMM            ');
writeln('                 MM::::::M:::::::::::::::::::::MMM            ');
writeln('                 MM:::::M:::::::::::::::::::::MMM            ');
writeln('                  MM::::M::::::::::::::::::::MMM            ');
writeln('                  MM:::M::::::::::::::::::::MMM            ');
writeln('                   MM::M:::::::::::::::::::MMM             ');
writeln('                   MM:M:::::::::::::::::::MMM             ');
writeln('                    MMM::::::::::::::::::MMM        ');
writeln('                    MM::::::::::::::::::MMM        ');
writeln('                     M:::::::::::::::::MMM         ');
writeln('                    MM::::::::::::::::MMM         ');
writeln('                    MM:::::::::::::::MMM          ');
writeln('                    MM::::M:::::::::MMM:         ');
writeln('                    mMM::::MM:::::::MMMM        ');
writeln('                     MMM:::::::::::MMM:M        ');
writeln('                     mMM:::M:::::::M:M:M         ');
writeln('                      MM::MMMM:::::::M:M        ');
writeln('                      MM::MMM::::::::M:M        ');
writeln('                      mMM::MM::::::::M:M        ');
writeln('                       MM::MM:::::::::M:M        ');
writeln('                       MM::MM::::::::::M:m       ');
writeln('                       MM:::M:::::::::::MM          ');
writeln('                       MMM:::::::::::::::M:         ');
writeln('                       MMM:::::::::::::::M:          ');
writeln('                       MMM::::::::::::::::M         ');
writeln('                       MMM::::::::::::::::M         ');
writeln('                       MMM::::::::::::::::Mm        ');
writeln('                        MM::::::::::::::::MM        ');
writeln('                        MMM:::::::::::::::MM        ');
writeln('                        MMM:::::::::::::::MM        ');
writeln('                        MMM:::::::::::::::MM       ');
writeln('                        MMM:::::::::::::::MM       ');
writeln('                         MM::::::::::::::MMM        ');
writeln('                         MMM:::::::::::::MM        ');
writeln('                         MMM:::::::::::::MM        ');
writeln('                         MMM::::::::::::MM         ');
writeln('                          MM::::::::::::MM         ');
writeln('                          MM::::::::::::MM         ');
writeln('                          MM:::::::::::MM          ');
writeln('                          MMM::::::::::MM          ');
writeln('                          MMM::::::::::MM         ');
writeln('                           MM:::::::::MM                ');
writeln('                           MMM::::::::MM               ');
writeln('                           MMM::::::::MM               ');
writeln('                            MM::::::::MM               ');
writeln('                            MMM::::::MM                ');
writeln('                             MM::::::MM                ');
writeln('                             MM::::::MM                ');
writeln('                              MM:::::MM               ');
writeln('                              MM:::::MM:              ');
writeln('                              MM:::::M:M              ');
writeln('                              MM:::::M:M              ');
writeln('                              :M::::::M:              ');
writeln('                             M:M:::::::M              ');
writeln('                            M:::M::::::M              ');
writeln('                           M::::M::::::M              ');
writeln('                          M:::::M:::::::M       ');
writeln('                         M::::::MM:::::::M      ');
writeln('                         M:::::::M::::::::M      ');
writeln('                         M;:;::::M:::::::::M      ');
writeln('                         M:m:;:::M::::::::::M      ');
writeln('                         MM:m:m::M::::::::;:M      ');
writeln('                          MM:m::MM:::::::;:;M       ');
writeln('                           MM::MMM::::::;:m:M       ');
writeln('                            MMMM MM::::m:m:MM       ');
writeln('                                  MM::::m:MM        ');
writeln('                                   MM::::MM         ');
writeln('                                    MM::MM         ');
readln;
end.