MORDA.PAS

program animacija;
uses crt;
begin
   textcolor (7);
   repeat
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\            //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \--------/      /');
      writeln('              \                  /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\            //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \             db               /');
      writeln('         |      \\            //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\    db      //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \               db             /');
      writeln('         |      \\            //      |');
      writeln('          \      \\===db=====//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\      db    //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  db==  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\            //      |');
      writeln('          \      \\=====db===//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\            //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  ==db  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\            //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
      delay(10000);
      clrscr;
      writeln('               /|||||||||||||||\');
      writeln('         /||||||||||||||||||||||||||||\');
      writeln('     /||||||||||||||||||||||||||||||||||||\');
      writeln('     |     \|||||||||||||||||||||||/      |');
      writeln('     |          \||||||||||||||/          |');
      writeln(' /-\ |              \||||||/              | /-\');
      writeln(' \  \|                                    |/  /');
      writeln(' | / |     /===\    \      /    /===\     | \ |');
      writeln('  \ O|    |  O  |    \    /    |  O  |    |O /');
      writeln('   | |     \---/      |  |      \---/     | |');
      writeln('    U \               |  |               / U');
      writeln('       |             /    \             |');
      writeln('       |            (      )            |');
      writeln('       |             \____/             |');
      writeln('        \                              /');
      writeln('         |      \\            //      |');
      writeln('          \      \\==========//      /');
      writeln('            \      \  ====  /      /');
      writeln('              \     \------/     /');
      writeln('                \              /');
      writeln('                   ---------');
   until keypressed;
   clrscr;
end.