PROGRAM Sympathy_intro_C64; { ------------------------------------- - - - Sympathy BBS TEXTMODE - Intro - - - - Thiz code is not optimized, but - - we have other things to do!! - - If ya like to use it please send - - credits - - - -------------------------------------} USES crt; CONST text : ARRAY [1..3,1..10] OF STRING [80] = ( ( '***************************************************************************** ', '* * ', '* Sympathy presents you a fast production called * ', '* * ', '* Back to the Roots Intro * ', '* ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ * ', '* * ', '* Done in 1995 by Excess of Sympathy * ', '* * ', '***************************************************************************** '), ( '*****************************************************************************', '* *', '* Call thiz *', '* ^^^^^^^^^^^ *', '* *', '* Splatterpunk [Sympathy WHQ] +49 02378-2627 28.8KB *', '* Onine daily: 20:00 - 06:00 cet *', '* For ya Pleasure cool PC - AMIGA - C-64 Board! *', '* *', '*****************************************************************************'), ( '*****************************************************************************', '* *', '* Sympathy Creditz *', '* ^^^^^^^^^^^^^^^^^^^^^^ *', '* Introcode by Excess *', '* Muzak and Player by Surprise!Productions *', '* GFX by Teasy *', '* *', '* *', '*****************************************************************************')); const pic_WIDTH=80; pic_DEPTH=25; pic_LENGTH=4000; pic : array [1..4000] of Char = ( ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, 'Û', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'ß', #8, 'Û', #8, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, 'Û', #8, ' ', #8, '°', #21, 'ß', #1, 'ß', #1, ' ', #17, ' ', #17, ' ', #15, 'Û', #1, 'Û', #1, '°', #21, ' ', #15, ' ', #15, 'Û', #1, 'Û', #1, ' ', #1, '°', #21, 'Û', #1, 'Û', #1, 'ß', #1, '°', #21, 'Û', #1, 'Û', #1, 'ß', #1, '°', #21, '°', #24, '²', #24, ' ', #15, '°', #21, 'Û', #1, 'Û', #1, 'ß', #1, 'ß', #1, 'Û', #1, ' ', #1, '°', #21, 'Û', #1, 'Û', #1, 'ß', #1, 'ß', #1, 'Û', #1, ' ', #1, '°', #21, 'ß', #1, '°', #21, 'Û', #1, 'Û', #1, 'ß', #1, 'Û', #1, ' ', #1, '°', #21, 'Û', #1, 'Û', #1, ' ', #1, 'Û', #1, ' ', #1, 'Û', #1, 'Û', #1, '°', #21, ' ', #15, ' ', #15, '±', #24, '²', #24, ' ', #15, 'Û', #8, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, 'Û', #8, ' ', #8, 'ß', #1, 'ß', #1, 'Û', #1, 'Ü', #1, 'Ü', #1, ' ', #1, 'Û', #1, '°', #21, '±', #21, '°', #21, 'Û', #1, 'Û', #1, 'Û', #1, ' ', #1, '±', #21, '°', #21, 'Û', #1, ' ', #1, '±', #21, '°', #21, 'Û', #1, ' ', #1, '±', #21, '°', #21, '°', #24, ' ', #15, '±', #21, '°', #21, 'Û', #1, 'Ü', #1, 'Ü', #1, 'Û', #1, ' ', #1, '±', #21, '°', #21, 'Û', #1, 'Ü', #1, 'Ü', #1, 'Û', #1, ' ', #1, 'Ü', #8, ' ', #8, '±', #21, '°', #21, 'Û', #1, ' ', #1, 'Ü', #8, ' ', #8, '±', #21, '°', #21, 'Û', #1, 'Ü', #1, 'Û', #1, ' ', #1, 'Û', #1, '°', #21, '±', #21, '°', #21, '°', #24, '°', #24, '±', #24, ' ', #15, 'Û', #8, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, 'Û', #8, ' ', #8, '²', #21, '±', #21, 'Ü', #1, ' ', #17, ' ', #17, ' ', #15, 'Ü', #8, ' ', #8, '²', #21, '±', #21, '°', #21, ' ', #15, 'Ü', #8, ' ', #8, '²', #21, '±', #21, '°', #21, ' ', #15, '²', #21, '±', #21, '°', #21, ' ', #15, '²', #21, '±', #21, '°', #21, ' ', #15, '²', #21, '±', #21, '°', #21, ' ', #15, 'Ü', #8, 'Ü', #8, ' ', #8, '²', #21, '±', #21, '°', #21, ' ', #15, ' ', #15, 'Û', #1, ' ', #1, 'Û', #8, ' ', #8, '²', #21, '±', #21, '°', #21, ' ', #15, 'Û', #8, ' ', #8, '²', #21, '±', #21, '°', #21, ' ', #15, 'Û', #1, ' ', #1, 'Ü', #8, ' ', #8, '²', #21, '±', #21, '°', #21, ' ', #15, 'Ü', #8, 'Ü', #8, 'Û', #8, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Ü', #8, 'Û', #8, 'Û', #8, 'Û', #8, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15); scroll :STRING = ' ^ Call this ^ Sympathy-BBS ^ Splatterpunk Back to the roots, Guys !!'+ ' Code by Excess '; farben :ARRAY [1..468] OF INTEGER =( black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, white,white,white, lightblue,lightblue,lightblue, lightgray,lightgray,lightgray, darkgray,darkgray,darkgray, darkgray,darkgray,darkgray, lightgray,lightgray,lightgray, lightblue,lightblue,lightblue, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black, black,black,black); VAR feld1,feld2,feld3 :ARRAY [1..80,1..50] of INTEGER; t,r,l,i :INTEGER; zp,sp :INTEGER; side :INTEGER; puffer :ARRAY [1..80,1..11] OF CHAR; m :POINTER; screen :ARRAY [1..160*80] of BYTE; sz :INTEGER; wait :INTEGER; sd :INTEGER; sb :INTEGER; {$L qdplay.obj} {$F+} PROCEDURE start ; external; PROCEDURE end_of_all ; external; PROCEDURE get_file(n:word);external; {$F-} PROCEDURE muzak;ASSEMBLER; ASM db 83,65 db 100, 84, 9, 9, 96, 32, 243, 116, 56, 53, 0, 3, 0, 8, 0, 0, 0, 0, 9, 96, 32, 243, 116, 56, 53,0 db 3, 0, 8, 0, 0, 0, 0, 0, 97, 34, 82, 65, 2, 2, 3, 1, 0, 0, 0, 0, 0, 0, 0, 97, 34,82 db 65, 2, 2, 3, 1, 0, 0, 0, 0, 0, 0, 0, 97, 34, 82, 65, 2, 2, 3, 1, 0, 0, 0, 0, 0,0 db 11, 64, 0, 240, 246, 247, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 16, 34, 67, 111, 109, 105, 99, 32, 66, 97, 107, 101, 114, 121, 33, 34, 32, 16, 65, 32, 67, 54, 52, 32, 103,97 db 109, 101, 33, 32, 32, 32, 32, 32, 16, 67, 111, 110, 118, 101, 114, 116, 101, 100, 32, 98, 121, 58, 32, 32, 32,16 db 72, 121, 100, 114, 97, 47, 65, 110, 97, 114, 99, 104, 121, 32, 80, 99, 16, 105, 110, 32, 49, 57, 57, 51, 33,33 db 33, 32, 32, 32, 32, 32, 32, 16, 70, 101, 101, 108, 32, 70, 114, 101, 101, 32, 116, 111, 32, 117, 115, 101, 16,116 db 104, 105, 115, 32, 115, 111, 110, 103, 32, 97, 115, 32, 32, 32, 32, 16, 108, 111, 110, 103, 32, 97, 115, 32, 73,32 db 97, 109, 32, 32, 32, 32, 16, 98, 101, 105, 110, 103, 32, 99, 114, 101, 100, 105, 116, 101, 100, 33, 32, 16, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,32 db 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,32 db 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,32 db 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,32 db 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,32 db 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,32 db 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32,32 db 32, 32, 32, 32, 32, 32, 32, 32, 16, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,16 db 32, 32, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 10, 13, 25, 26, 27, 17, 18, 19, 20, 21, 22,23 db 24, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 28, 0, 25, 0, 125, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,1 db 2, 0, 0, 0, 0, 0, 0, 1, 1, 3, 3, 0, 0, 0, 0, 0, 1, 1, 4, 5, 4, 5, 5, 0, 0,1 db 1, 4, 6, 4, 6, 6, 0, 0, 1, 1, 7, 8, 7, 9, 9, 0, 0, 1, 1, 7, 10, 7, 10, 0, 0,0 db 1, 1, 7, 11, 7, 11, 0, 0, 0, 1, 1, 7, 12, 7, 12, 0, 0, 0, 13, 13, 14, 15, 14, 15, 0,0 db 0, 16, 16, 17, 18, 17, 18, 0, 0, 0, 13, 13, 14, 19, 14, 19, 19, 0, 0, 13, 13, 14, 20, 14, 20,9 db 0, 0, 16, 16, 17, 21, 17, 21, 9, 0, 0, 16, 16, 17, 22, 17, 22, 22, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 17, 17, 0,0 db 0, 0, 0, 0, 9, 9, 14, 23, 14, 23, 23, 0, 0, 9, 17, 17, 24, 24, 24, 9, 0, 0, 25, 25, 14,23 db 14, 23, 23, 0, 0, 26, 26, 17, 27, 17, 27, 27, 0, 0, 25, 25, 14, 28, 14, 28, 9, 0, 0, 26, 26,17 db 29, 17, 29, 9, 0, 0, 9, 30, 31, 32, 9, 9, 9, 0, 0, 13, 13, 14, 14, 25, 25, 9, 0, 0, 16,16 db 17, 17, 33, 33, 9, 0, 0, 9, 14, 14, 9, 34, 34, 9, 0, 0, 48, 65, 48, 50, 32, 45, 45, 45, 48,48 db 48, 48, 48, 32, 45, 45, 45, 48, 48, 65, 48, 50, 32, 250, 81, 154, 86, 182, 10, 8, 5, 0, 100, 123, 0,0 db 1, 62, 5, 0, 0, 0, 161, 123, 250, 123, 113, 123, 242, 124, 78, 24, 194, 31, 157, 11, 153, 22, 2, 114, 225,10 db 185, 4, 242, 10, 185, 4, 110, 5, 0, 176, 215, 128, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 115, 97, 100, 116, 46, 99, 102, 103, 0, 91, 235, 111, 255, 118, 248, 255, 118, 250, 255, 118, 246, 14,232 db 102, 0, 131, 196, 6, 137, 70, 254, 11, 192, 116, 88, 80, 184, 1, 0, 80, 154, 128, 183, 10, 8, 91, 235, 217,43 db 88, 219, 32, 32, 32, 48, 3, 32, 32, 48, 51, 48, 3, 32, 53, 48, 3, 32, 53, 48, 48, 50, 65, 48, 3,32 db 53, 48, 52, 48, 50, 65, 48, 50, 32, 70, 45, 51, 48, 49, 22, 67, 58, 92, 65, 78, 87, 69, 78, 68, 69,82 db 92, 83, 65, 68, 84, 50, 92, 83, 65, 50, 92, 45, 52, 48, 50, 65, 48, 50, 32, 70, 45, 51, 48, 49, 48,48 db 48, 32, 67, 45, 52, 48, 50, 65, 48, 50, 32, 117, 26, 131, 62, 228, 108, 0, 117, 19, 131, 62, 160, 91, 0,117 db 12, 131, 62, 238, 0, 0, 0, 0, 0, 128, 204, 204, 1, 255, 126, 25, 255, 255, 255, 95, 2, 0, 0, 0, 0,0 db 0, 0, 1, 0, 0, 23, 120, 124, 130, 23, 120, 124, 53, 48, 48, 48, 0, 48, 48, 48, 48, 48, 48, 48, 0,240 db 1, 0, 128, 255, 64, 20, 130, 0, 0, 0, 64, 26, 5, 64, 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0,64 db 42, 0, 64, 20, 130, 0, 0, 0, 64, 26, 5, 64, 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42,0 db 70, 20, 130, 0, 0, 0, 70, 26, 5, 70, 42, 0, 90, 26, 0, 94, 42, 0, 70, 26, 0, 70, 42, 0, 60,20 db 130, 0, 0, 0, 60, 26, 4, 60, 42, 0, 80, 26, 0, 84, 42, 0, 60, 26, 0, 60, 42, 0, 64, 20, 130,0 db 0, 0, 64, 26, 5, 64, 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 64, 20, 130, 0, 0,0 db 64, 26, 5, 64, 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 70, 20, 130, 0, 0, 0, 70,26 db 5, 70, 42, 0, 90, 26, 0, 94, 42, 0, 70, 26, 0, 70, 42, 0, 74, 20, 130, 0, 0, 0, 74, 26, 5,74 db 42, 0, 94, 26, 0, 98, 42, 0, 74, 26, 0, 74, 42, 0, 0, 15, 6, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 64,58 db 3, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5,0 db 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 70, 58, 5, 0, 10,5 db 94, 58, 5, 94, 58, 5, 70, 58, 5, 0, 10, 5, 94, 58, 5, 94, 58, 5, 60, 58, 5, 0, 10, 5, 84,58 db 5, 84, 58, 5, 60, 58, 5, 0, 10, 5, 84, 58, 5, 84, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5,88 db 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58,5 db 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 70, 58, 5, 0, 10, 5, 94, 58, 5, 94, 58, 5, 70,58 db 5, 0, 10, 5, 94, 58, 5, 94, 58, 5, 74, 58, 5, 0, 10, 5, 98, 58, 5, 98, 58, 5, 74, 58, 5,0 db 10, 5, 98, 58, 5, 98, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10,5 db 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88,58 db 5, 88, 58, 5, 70, 58, 5, 0, 10, 5, 94, 58, 5, 94, 58, 5, 70, 58, 5, 0, 10, 5, 94, 58, 5,94 db 58, 5, 60, 58, 5, 0, 10, 5, 84, 58, 5, 84, 58, 5, 60, 58, 5, 0, 10, 5, 84, 58, 5, 84, 58,5 db 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64,58 db 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 64, 58, 5, 0, 10, 5, 88, 58, 5, 88, 58, 5, 70, 58, 5,0 db 10, 5, 94, 58, 5, 94, 58, 5, 70, 58, 5, 0, 10, 5, 94, 58, 5, 94, 58, 5, 74, 58, 5, 0, 10,5 db 98, 58, 5, 98, 58, 5, 74, 58, 5, 0, 10, 5, 98, 58, 5, 98, 58, 5, 88, 74, 3, 0, 10, 3, 88,74 db 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 68, 131, 0, 4, 131, 0, 10, 3, 0, 10, 3, 78, 74, 3,0 db 10, 3, 88, 74, 3, 0, 10, 3, 92, 74, 3, 0, 10, 3, 94, 74, 3, 0, 10, 3, 98, 74, 3, 0, 10,3 db 94, 74, 3, 0, 10, 3, 92, 74, 3, 0, 10, 3, 94, 74, 3, 0, 10, 3, 92, 74, 3, 0, 10, 3, 88,74 db 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 84, 74, 3,0 db 10, 3, 88, 68, 131, 0, 4, 131, 0, 10, 3, 0, 10, 3, 78, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10,3 db 88, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 84,74 db 3, 0, 10, 3, 82, 74, 3, 0, 10, 3, 74, 74, 3, 0, 10, 3, 78, 74, 3, 82, 74, 3, 84, 74, 3,86 db 74, 3, 88, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 68, 131, 0, 4,131 db 0, 10, 3, 0, 10, 3, 78, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 92, 74, 3, 0, 10, 3, 94,74 db 3, 0, 10, 3, 98, 74, 3, 0, 10, 3, 94, 74, 3, 0, 10, 3, 92, 74, 3, 0, 10, 3, 94, 74, 3,0 db 10, 3, 92, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10,3 db 88, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 68, 131, 0, 4, 131, 0, 10, 3, 0, 10, 3, 78,74 db 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 102, 74, 3, 0, 10, 3, 98, 74, 3,0 db 10, 3, 94, 74, 3, 0, 10, 3, 88, 74, 3, 0, 10, 3, 84, 74, 3, 0, 10, 3, 78, 74, 3, 0, 10,3 db 74, 74, 3, 78, 74, 3, 74, 74, 3, 70, 74, 3, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64,80 db 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60,0 db 10, 8, 88, 80, 60, 88, 80, 60, 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10,8 db 84, 80, 92, 84, 80, 92, 60, 80, 76, 0, 10, 8, 84, 80, 76, 84, 80, 76, 60, 80, 76, 0, 10, 8, 84,80 db 76, 84, 80, 76, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60,88 db 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80,60 db 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 64,80 db 92, 0, 10, 8, 88, 80, 92, 88, 80, 92, 64, 80, 92, 0, 10, 8, 88, 80, 92, 88, 80, 92, 64, 68, 129,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1,0 db 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 2, 0, 10,2 db 0, 10, 2, 0, 10, 2, 0, 12, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 112, 76, 15, 0, 4, 129, 0, 12, 39, 0, 4, 0, 0, 12, 63, 0, 4, 0, 0, 12, 64, 0, 4,0 db 112, 64, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 2, 6, 0, 2, 6, 112, 64, 0, 0, 0, 0, 116, 64, 0, 0, 0, 0, 114, 65, 6, 0, 1, 3, 0,0 db 0, 114, 65, 6, 0, 1, 3, 0, 0, 0, 114, 65, 6, 0, 1, 3, 114, 65, 6, 0, 1, 3, 0, 0, 0,114 db 65, 6, 0, 1, 3, 0, 0, 0, 118, 64, 0, 116, 64, 0, 112, 64, 0, 0, 0, 0, 108, 64, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 102, 64, 0, 0, 0, 0, 108, 64, 0, 0, 2, 6, 102, 64, 0, 0, 0, 0, 108,64 db 0, 0, 2, 6, 102, 64, 0, 0, 0, 0, 108, 65, 3, 112, 64, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,2 db 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2,0 db 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2,2 db 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0, 2, 2, 0,2 db 2, 0, 10, 1, 0, 2, 2, 0, 10, 1, 0, 2, 2, 0, 10, 1, 0, 2, 2, 0, 10, 2, 0, 2, 2,0 db 10, 2, 0, 2, 2, 0, 10, 2, 0, 2, 2, 0, 10, 2, 0, 2, 2, 0, 10, 2, 64, 20, 130, 0, 0,0 db 64, 26, 5, 64, 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 64, 20, 130, 0, 0, 0, 64,26 db 5, 64, 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 64, 20, 130, 0, 0, 0, 64, 26, 5,64 db 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 64, 20, 130, 0, 0, 0, 64, 26, 4, 64, 42,0 db 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 70, 20, 130, 0, 0, 0, 70, 26, 5, 70, 42, 0, 90,26 db 0, 94, 42, 0, 70, 26, 0, 70, 42, 0, 70, 20, 130, 0, 0, 0, 70, 26, 5, 70, 42, 0, 90, 26, 0,94 db 42, 0, 70, 26, 0, 70, 42, 0, 70, 20, 130, 0, 0, 0, 70, 26, 5, 70, 42, 0, 90, 26, 0, 94, 42,0 db 70, 26, 0, 70, 42, 0, 70, 20, 130, 0, 0, 0, 70, 26, 5, 70, 42, 0, 90, 26, 0, 94, 42, 0, 70,26 db 0, 70, 42, 0, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60,88 db 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80,60 db 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64,80 db 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 60, 80, 92,0 db 10, 8, 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10,8 db 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10, 8, 84,80 db 92, 84, 80, 92, 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 60, 80, 92, 0, 10, 8, 84, 80, 92,84 db 80, 92, 60, 80, 92, 0, 10, 8, 84, 80, 92, 84, 80, 92, 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64,60 db 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64,64 db 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60,0 db 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60, 0, 10,8 db 88, 64, 60, 88, 64, 60, 60, 64, 92, 0, 10, 8, 84, 64, 92, 84, 64, 92, 60, 64, 92, 0, 10, 8, 84,64 db 92, 84, 64, 92, 60, 64, 92, 0, 10, 8, 84, 64, 92, 84, 64, 92, 60, 64, 92, 0, 10, 8, 84, 64, 92,84 db 64, 92, 60, 64, 92, 0, 10, 8, 84, 64, 92, 84, 64, 92, 60, 64, 92, 0, 10, 8, 84, 64, 92, 84, 64,92 db 60, 64, 92, 0, 10, 8, 84, 64, 92, 84, 64, 92, 60, 64, 92, 0, 10, 8, 84, 64, 92, 84, 64, 92, 60,20 db 130, 0, 0, 0, 60, 26, 5, 60, 42, 0, 80, 26, 0, 84, 42, 0, 60, 26, 0, 60, 42, 0, 60, 20, 130,0 db 0, 0, 60, 26, 5, 60, 42, 0, 80, 26, 0, 84, 42, 0, 60, 26, 0, 60, 42, 0, 60, 20, 130, 0, 0,0 db 60, 26, 5, 60, 42, 0, 80, 26, 0, 84, 42, 0, 60, 26, 0, 60, 42, 0, 60, 20, 130, 0, 0, 0, 60,26 db 4, 60, 42, 0, 80, 26, 0, 84, 42, 0, 60, 26, 0, 60, 42, 0, 64, 20, 130, 0, 0, 0, 64, 26, 5,64 db 42, 0, 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 64, 20, 130, 0, 0, 0, 64, 26, 5, 64, 42,0 db 84, 26, 0, 88, 42, 0, 64, 26, 0, 64, 42, 0, 56, 20, 130, 0, 0, 0, 56, 26, 5, 56, 42, 0, 76,26 db 0, 80, 42, 0, 56, 26, 0, 56, 42, 0, 54, 20, 130, 0, 0, 0, 54, 26, 5, 54, 42, 0, 74, 26, 0,78 db 42, 0, 54, 26, 0, 54, 42, 0, 60, 80, 76, 0, 10, 8, 84, 80, 76, 84, 80, 76, 60, 80, 76, 0, 10,8 db 84, 80, 76, 84, 80, 76, 60, 80, 76, 0, 10, 8, 84, 80, 76, 84, 80, 76, 60, 80, 76, 0, 10, 8, 84,80 db 76, 84, 80, 76, 60, 80, 76, 0, 10, 8, 84, 80, 76, 84, 80, 76, 60, 80, 76, 0, 10, 8, 84, 80, 76,84 db 80, 76, 60, 80, 76, 0, 10, 8, 84, 80, 76, 84, 80, 76, 60, 80, 76, 0, 10, 8, 84, 80, 76, 84, 80,76 db 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64,80 db 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 64, 80, 60, 0, 10, 8, 88, 80, 60, 88, 80, 60, 56, 80, 76,0 db 10, 8, 80, 80, 76, 80, 80, 76, 56, 80, 76, 0, 10, 8, 80, 80, 76, 80, 80, 76, 54, 80, 76, 0, 10,8 db 78, 80, 76, 78, 80, 76, 54, 80, 76, 0, 10, 8, 78, 80, 76, 78, 80, 76, 60, 64, 76, 0, 10, 8, 84,64 db 76, 84, 64, 76, 60, 64, 76, 0, 10, 8, 84, 64, 76, 84, 64, 76, 60, 64, 76, 0, 10, 8, 84, 64, 76,84 db 64, 76, 60, 64, 76, 0, 10, 8, 84, 64, 76, 84, 64, 76, 60, 64, 76, 0, 10, 8, 84, 64, 76, 84, 64,76 db 60, 64, 76, 0, 10, 8, 84, 64, 76, 84, 64, 76, 60, 64, 76, 0, 10, 8, 84, 64, 76, 84, 64, 76, 60,64 db 76, 0, 10, 8, 84, 64, 76, 84, 64, 76, 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60,0 db 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60, 0, 10, 8, 88, 64, 60, 88, 64, 60, 64, 64, 60, 0, 10,8 db 88, 64, 60, 88, 64, 60, 56, 64, 76, 0, 10, 8, 80, 64, 76, 80, 64, 76, 56, 64, 76, 0, 10, 8, 80,64 db 76, 80, 64, 76, 54, 64, 76, 0, 10, 8, 78, 64, 76, 78, 64, 76, 54, 64, 76, 0, 10, 8, 78, 64, 76,78 db 64, 76, 64, 97, 3, 0, 1, 3, 0, 1, 3, 0, 1, 3, 0, 1, 3, 0, 1, 3, 0, 1, 2, 0, 1,2 db 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 1, 0,1 db 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 88, 96, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 96, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 1, 78, 96, 0, 0, 0,0 db 84, 96, 0, 0, 0, 0, 88, 96, 0, 0, 0, 0, 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64,64 db 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64, 64, 60,64 db 64, 60, 88, 64, 60, 88, 64, 60, 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64, 64, 60, 64, 64,60 db 88, 64, 60, 88, 64, 60, 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64, 64, 60, 64, 64, 60, 88,64 db 60, 88, 64, 60, 60, 64, 92, 60, 64, 92, 84, 64, 92, 84, 64, 92, 60, 64, 92, 60, 64, 92, 84, 64, 92,84 db 64, 92, 60, 64, 92, 60, 64, 92, 84, 64, 92, 84, 64, 92, 60, 64, 92, 60, 64, 92, 84, 64, 92, 84, 64,92 db 60, 64, 92, 60, 64, 92, 84, 64, 92, 84, 64, 92, 60, 64, 92, 60, 64, 92, 84, 64, 92, 84, 64, 92, 60,64 db 92, 60, 64, 92, 84, 64, 92, 84, 64, 92, 60, 64, 92, 60, 64, 92, 84, 64, 92, 84, 64, 92, 60, 64, 76,60 db 64, 76, 84, 64, 76, 84, 64, 76, 60, 64, 76, 60, 64, 76, 84, 64, 76, 84, 64, 76, 60, 64, 76, 60, 64,76 db 84, 64, 76, 84, 64, 76, 60, 64, 76, 60, 64, 76, 84, 64, 76, 84, 64, 76, 60, 64, 76, 60, 64, 76, 84,64 db 76, 84, 64, 76, 60, 64, 76, 60, 64, 76, 84, 64, 76, 84, 64, 76, 60, 64, 76, 60, 64, 76, 84, 64, 76,84 db 64, 76, 60, 64, 76, 60, 64, 76, 84, 64, 76, 84, 64, 76, 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64,60 db 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64, 64, 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 64,64 db 60, 64, 64, 60, 88, 64, 60, 88, 64, 60, 56, 64, 76, 56, 64, 76, 80, 64, 76, 80, 64, 76, 56, 64, 76,56 db 64, 76, 80, 64, 76, 80, 64, 76, 54, 64, 76, 54, 64, 76, 78, 64, 76, 78, 64, 76, 54, 64, 76, 54, 64,76 db 78, 64, 76, 78, 64, 76, 92, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 48, 0, 0, 0, 94, 100, 0, 0, 4,0 db 98, 100, 0, 0, 4, 0, 94, 100, 0, 0, 4, 0, 92, 100, 0, 0, 4, 0, 94, 100, 0, 0, 4, 0, 88,100 db 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0,0 db 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4,0 db 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 4, 0, 0, 10, 1, 0, 10, 1, 0,10 db 1, 0, 10, 2, 0, 10, 2, 0, 10, 2, 0, 10, 3, 0, 10, 3, 64, 97, 3, 0, 1, 3, 0, 1, 3,0 db 1, 3, 0, 1, 3, 0, 1, 3, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1,2 db 0, 1, 2, 0, 1, 2, 0, 1, 2, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0,1 db 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 88, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 84, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 10, 1, 0, 10, 1, 0, 10, 2, 78, 96, 0, 0, 0, 0, 84, 96, 0, 0, 0, 0, 88, 96, 0, 0, 0,0 db 92, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 2, 94, 96, 0, 0, 0, 0, 98, 96, 0, 0, 0,0 db 94, 96, 0, 0, 0, 0, 92, 96, 0, 0, 0, 0, 94, 96, 0, 0, 0, 0, 88, 96, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0,10 db 1, 0, 10, 2, 0, 10, 2, 0, 10, 2, 88, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 88, 80, 0, 0, 0, 0, 92, 80, 0, 0, 0, 0, 94, 80, 0, 0, 0, 0, 98, 80, 0,0 db 0, 0, 98, 81, 4, 102, 80, 0, 0, 0, 0, 98, 80, 0, 0, 0, 0, 0, 0, 0, 94, 80, 0, 0, 0,0 db 98, 81, 4, 102, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 102, 80, 0, 104, 80, 0, 102, 80, 0, 94, 80, 0, 98, 80, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 10, 1, 0, 10, 1, 0, 10, 2, 98, 80, 0, 102, 80, 0, 98, 80, 0, 0, 0, 0, 94, 80, 0, 0, 0,0 db 92, 80, 0, 0, 0, 0, 84, 80, 0, 0, 0, 0, 88, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 92, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 2, 94, 96, 0, 0, 0, 0, 98,96 db 0, 0, 0, 0, 94, 96, 0, 0, 0, 0, 92, 96, 0, 0, 0, 0, 94, 96, 0, 0, 0, 0, 88, 96, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 1,0 db 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 12, 0, 88, 80, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 88, 80, 0, 0, 0, 0, 92, 80, 0, 0, 0, 0, 94, 80,0 db 0, 0, 0, 98, 80, 0, 0, 0, 0, 98, 81, 4, 102, 80, 0, 0, 0, 0, 98, 80, 0, 0, 0, 0, 0,0 db 0, 94, 80, 0, 0, 0, 0, 98, 81, 4, 102, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 102, 80, 0, 104, 80, 0, 102, 80, 0, 94,80 db 0, 98, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 2, 98, 80, 0, 102, 80, 0, 98, 80, 0, 0,0 db 0, 94, 80, 0, 0, 0, 0, 92, 80, 0, 0, 0, 0, 84, 80, 0, 0, 0, 0, 88, 80, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 88, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 2, 0,10 db 2, 0, 10, 2, 0, 10, 2, 0, 10, 3, 0, 12, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 64, 80, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10, 1,0 db 10, 1, 0, 10, 1, 0, 10, 2, 0, 10, 2, 0, 10, 2, 0, 10, 2, 0, 10, 3, 0, 12, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 96, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 1, 0, 10, 2, 0, 10, 2, 0, 10, 2, 0,10 db 2, 0, 10, 3, 0, 12, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 98, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1, 0, 10, 1, 0, 10,1 db 98, 80, 0, 102, 80, 0, 98, 80, 0, 0, 0, 0, 94, 80, 0, 0, 0, 0, 92, 80, 0, 0, 0, 0, 84,80 db 0, 0, 0, 0, 88, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 1,0 db 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1, 0, 0, 0, 0, 10, 1, 0, 0,0 db 0, 10, 1, 0, 10, 1, 0, 10, 2, 0, 10, 2, 0, 10, 2, 0, 10, 2, 0, 10, 3, 0, 12, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,0 db 0, 0, 0, 0, 0, 0 END; PROCEDURE WaitRetrace; ASSEMBLER; asm mov dx,3dah @wait1: in al,dx test al,08h jnz @wait1 @wait2: in al,dx test al,08h jz @wait2 end; PROCEDURE bild(x:INTEGER); BEGIN ASM mov ax,$b800 mov es,ax mov si,1 {Achtung <-} mov di,x mov cx,160*10 @loop: mov al,BYTE PTR pic[di] cmp al,32 je @nix cmp al,0 je @nix mov BYTE PTR screen[si],al @nix: inc di inc si dec cx jne @loop END; END; FUNCTION zeichen (x,y:INTEGER):BYTE; VAR z :BYTE; BEGIN ASM mov ax,$b800 mov es,ax mov ax,x mov si,ax mov ax,y mov bx,80*2 mul bx add si,ax mov al,es:[si] mov z,al END; zeichen := z; END; PROCEDURE fire; BEGIN FOR t := 2 TO 49 DO FOR r := 2 TO 79 DO BEGIN feld2[r,t] :=(feld1[r-1,t]+feld1[r+1,t]+feld1[r,t-1]+feld1[r,t+1]+ feld1[r-1,t-1]+feld1[r-1,t+1]+feld1[r+1,t+1]+feld1[r+1,t-1]) div 8; END; feld3 := feld1; FOR t := 23 TO 49 DO FOR r := 2 TO 79 DO feld1[r,t-1] := feld2[r,t]; FOR t := 1 TO 25 DO FOR r := 2 TO 79 DO feld1[r,t] := feld2[r,t]; FOR t := 2 TO 49 DO FOR r := 2 TO 79 DO BEGIN CASE feld1[r,t] OF 0 : IF feld3[r,t] >= 1 THEN BEGIN BEGIN { GOTOXY (r,t);TEXTCOLOR (BLACK);WRITE (' ');} screen[r*2+t*160] :=32; screen[r*2+1+t*160] :=BLACK; END; END; 1 : BEGIN {GOTOXY (r,t); TEXTCOLOR (Lightblue); WRITE (CHR(46)); } screen[r*2+t*160] :=46; screen[r*2+1+t*160] :=LIGHTBLUE; END; 2 : BEGIN {GOTOXY (r,t); TEXTCOLOR (lightred); WRITE (CHR(9)); }screen[r*2+t*160] :=9; screen[r*2+1+t*160] :=LIGHTRED; END; 3 : BEGIN {GOTOXY (r,t); TEXTCOLOR (magenta); WRITE (CHR(42)); }screen[r*2+t*160] :=42; screen[r*2+1+t*160] :=magenta; END; 4 : BEGIN {GOTOXY (r,t); TEXTCOLOR (red); WRITE (CHR(15)); }screen[r*2+t*160] :=15; screen[r*2+1+t*160] :=red; END; 5 : BEGIN {GOTOXY (r,t); TEXTCOLOR (yellow); WRITE (CHR(220)); }screen[r*2+t*160] :=220; screen[r*2+1+t*160] :=yellow; END; 6 : BEGIN {GOTOXY (r,t); TEXTCOLOR (white); WRITE (CHR(219)); }screen[r*2+t*160] :=219; screen[r*2+1+t*160] :=white; END; END; END; FOR r := 1 TO 10 DO feld1[RANDOM (78)+2,48] := 70; END; PROCEDURE print; CONST spalte = 13; BEGIN FOR t := 1 TO 15 DO BEGIN IF scroll[t+sz] = '^' THEN BEGIN wait := 20;inc(sz);END ELSE BEGIN screen[0+t*2+48*160] :=ORD(scroll[t+sz]); screen[0+t*2+1+48*160] :=white; END; END; IF wait = 0 THEN inc (sz) ELSE dec (wait); IF sz >= LENGTH(scroll) THEN sz := 1; inc (sp); IF sp = 468-80 THEN BEGIN sp :=0; sd := 1; inc (side); sb :=79; END; IF sd = 1 THEN BEGIN IF side > 3 THEN side := 1; FOR t := 1 TO 10 DO FOR r := 0 TO 79 DO BEGIN screen[4+r*2+(13+t)*160] :=ORD(text[side,t][r+1]); END; dec (sb); IF sb = 0 THEN sd :=0; END; FOR t := 0 TO 5 DO FOR r := 0 TO 79 DO BEGIN screen[1+r*2+(12+t*2)*160] :=farben[r+sp]; END; FOR t := 1 TO 5 DO FOR r := 0 TO 79 DO BEGIN screen[1+r*2+(13+t*2)*160] :=farben[80+sp-r]; END; END; PROCEDURE putscreen; BEGIN ASM mov ax,$b800 mov es,ax mov si,0 mov di,1 mov cx,160*49 @loop: mov al,BYTE PTR screen[di] mov es:[si],al inc di inc si dec cx jne @loop END; END; VAR key :CHAR; p :POINTER; pp1,pp2:WORD; ppp1,ppp2 :BYTE; BEGIN WRITE ('Back to the roots...'); GETMEM (p,60000); FOR t := 1 TO 100 DO WAITRETRACE; pp1 :=seg(muzak); pp2 :=ofs(muzak); ASM les di,p mov si,pp2 mov cx,0 push ds mov ax,pp1 mov ds,ax @loop: mov al,ds:[si] mov es:[di],al inc si inc di inc cx cmp cx,60000 jne @loop pop ds LES di,p mov ax,es mov pp1,ax mov pp2,di mov ppp1,ah mov ppp2,al END; get_file(pp1); start; RANDOMIZE; sz :=0; sp := 1; side :=1; zp := 0; FOR t := 1 TO 50 DO FOR r := 1 TO 80 DO BEGIN feld1[r,t] := 0; feld2[r,t] := 0; END; FOR t := 1 TO 10 DO FOR r := 1 TO 79 DO BEGIN puffer [r,t] := ' '; END; TEXTMODE (c80+font8x8); CLRSCR; GOTOXY (1,49); sd :=1; sb :=79; FOR t := 15 DOWNTO 1 DO BEGIN FOR r := 0 TO 80*11 DO BEGIN screen[r] := 32; screen[(r+1)] := 0; END; bild (160*t); WAITRETRACE; WAITRETRACE; WAITRETRACE; putscreen; END; FOR t := 1 TO 80*50 DO BEGIN screen[t*2] :=32; screen[t*2+1] :=BLACK; END; REPEAT IF RANDOM(8) = 1 THEN feld1[random(70)+9,random(10)+1] := 50; fire; bild(0); print; WAITRETRACE; putscreen; UNTIL keypressed; FOR t := 1 TO 50 DO BEGIN WAITRETRACE; WRITELN; END; TEXTMODE (c80); key := readkey; writeln('See ya later, in another Product of Sympathy...'); writeln('Call now Splatterpunk BBS +49 (0)2378-2627'); end_of_all; freemem (p,60000); END.