ZX*TERM*80

Gallery

Source Code

   0 REM \BF\BD\B9\AA\B7\B2\96\A4\9C\00\2B\33\76\76\3C\40\A0\00\18\18\00\00\06\02\08\10\20\58\68\A0\08\18\08\20\08\68\FE\C6\BA\BE\BE\BA\C6\FE\C6\00\00\00\40\4F\37\7F\FC\02\1F\00\84\00\D9\FF\EA\6F\0E\10\0D\20\FD\18\4D\00\00\00\00\D0\00\00\00\00\CD\2B\0F\FD\36\07\01\11\88\40\2A\76\40\A7\ED\52\38\12\DB\BF\CB\47\20\FA\00\00\1A\CD\ED\7D\13\CD\46\0F\38\E6\3E\0D\CD\ED\7D\C3\0A\7E\11\88\40\2A\76\40\A7\ED\52\D8\1A\26\37\6F\7E\12\13\18\F0\00\DB\77\C9\00\D3\77\C9\00\DB\73\C9\00\D3\73\C9\00\CD\80\70\E6\02\C8\18\F0\CD\2B\0F\FD\21\00\70\2A\00\70\E5\36\ED\23\36\4F\3A\02\70\E6\80\01\25\21\23\77\10\FC\36\C3\11\FB\70\23\73\23\72\E1\E5\CB\FC\E5\22\07\71\79\ED\5B\2C\70\ED\B0\D1\E1\4F\ED\B0\CD\86\76\DD\21\E6\70\FD\36\90\C9\CD\86\76\FD\36\90\CD\C3\86\76\F3\3E\08\47\00\10\FD\C6\EE\3C\20\FD\06\B0\11\20\00\63\6A\18\07\00\00\05\CA\09\71\19\7C\ED\47\7D\C3\3C\C0\ED\52\23\ED\42\2A\0C\40\11\F7\82\19\3E\1E\ED\47\3E\F5\01\07\02\CD\B5\02\CD\92\02\CD\2E\71\DD\21\E6\70\C3\A4\02\F5\C5\D5\E5\2A\34\40\2B\3E\7F\A4\B5\7C\20\03\17\18\02\BF\46\67\22\34\40\DB\FE\CD\90\70\28\1F\4F\21\40\70\3A\04\70\3C\E6\3F\32\04\70\85\6F\71\CD\73\71\2A\0C\40\CB\FC\06\3A\10\FE\CD\92\02\06\14\10\FE\23\18\ED\FD\CB\02\46\28\19\2A\0C\40\11\02\00\A7\ED\52\EB\2A\76\40\E5\ED\52\E1\30\0B\71\23\22\76\40\C9\06\0A\10\FE\C9\FD\CB\02\D6\D0\4F\CD\73\71\79\C3\8C\70\21\1F\70\06\06\7E\CD\30\70\23\10\F9\C9\C3\84\70\3E\15\18\F9\CB\3C\CB\1D\CB\3C\CB\1D\CB\3C\CB\1D\CB\EC\C9\CB\23\CB\12\CB\23\CB\12\CB\23\CB\12\C9\21\00\20\11\01\20\01\FF\15\36\00\ED\B0\2E\08\FD\66\0A\22\10\70\FD\66\0C\22\12\70\FD\66\0E\22\14\70\C9\3A\09\70\A7\C9\21\09\70\7E\A7\20\01\3C\87\85\6F\7E\11\05\00\19\C9\CD\F6\71\20\01\3C\21\08\70\87\85\6F\4E\23\46\0D\0D\3E\0B\80\91\47\C9\CD\FB\71\E5\37\ED\52\7E\E1\36\08\23\77\C9\C5\23\01\1D\00\36\00\54\5D\13\ED\B0\C1\23\36\08\23\10\ED\C9\CD\0C\72\61\2E\00\CD\B8\71\CD\31\72\18\D0\CD\0C\72\61\CD\B8\71\24\2E\00\54\5D\4D\24\CB\38\CB\38\CB\38\05\ED\B0\62\06\08\CD\31\72\CD\FB\71\0E\08\71\23\47\77\C9\CD\D4\71\CD\F6\71\21\08\10\20\03\21\08\A0\22\0A\70\20\40\01\05\AB\1E\00\61\6B\CD\B8\71\EB\60\CD\B8\71\ED\52\EB\36\1F\E5\19\36\1F\E1\E5\06\1E\3E\FF\23\E5\77\19\77\E1\10\F8\CD\C7\71\14\E1\01\1F\00\09\36\F8\ED\42\CB\E6\09\CB\DE\23\15\20\F7\2B\36\F8\C9\ED\4B\0E\70\CD\DF\72\ED\4B\0C\70\CD\DF\72\ED\4B\0A\70\79\D6\03\4F\78\C6\0B\47\18\A7\CD\BB\02\2C\C8\18\F9\CD\BB\02\2C\C0\18\F9\CD\E9\72\18\F4\CD\BB\02\3E\FF\BD\20\08\AF\E6\7F\A7\32\27\70\C9\ED\4B\25\70\22\25\70\A7\ED\42\20\EC\3A\27\70\3C\FE\02\20\E5\CD\05\73\16\00\CB\28\9F\F6\26\2E\05\95\85\37\CB\19\38\FA\0C\C0\48\2D\2E\01\20\F2\21\FF\3D\FD\CB\02\76\28\03\21\4D\3E\5F\19\7E\37\C9\21\00\38\FD\CB\03\4E\28\03\21\00\3C\57\0F\7A\F5\5F\55\CB\BB\28\02\CB\3B\CD\C7\71\19\F1\F5\20\1F\07\C5\38\03\E5\18\4B\11\16\70\D5\FE\15\0E\FC\38\02\0E\FE\06\08\7E\2F\A1\12\23\13\10\F8\18\33\11\16\70\C5\D5\CB\7F\06\08\7E\28\01\2F\12\23\13\10\F7\D1\D5\01\F0\08\FD\CB\03\46\28\02\0E\E0\38\08\1A\A1\12\13\10\FA\18\0A\1A\07\07\07\07\A1\12\13\10\F6\D1\E1\7D\CD\B8\71\2F\E6\07\3C\32\08\70\06\08\C5\1A\4F\3A\08\70\FE\05\38\11\2F\C6\09\A7\47\79\0E\00\28\0E\1F\CB\19\10\FB\18\07\47\AF\CB\11\17\10\FB\B6\77\23\7D\3C\E6\1F\28\01\71\0E\1F\09\13\C1\10\CD\F1\C9\CD\68\76\CD\23\0F\CD\0C\72\61\2E\00\CD\B8\71\58\AF\D3\FB\CD\46\0F\30\24\DB\FB\17\30\FB\16\20\06\08\4E\DB\FB\1F\30\FB\79\E6\80\D3\FB\CB\11\10\F2\23\15\20\EB\DB\FB\1F\30\FB\1D\20\D4\3E\04\D3\FB\C3\98\70\00\CD\F6\71\C8\ED\53\10\70\18\04\CD\F6\71\C8\F5\FD\36\09\01\FD\7E\03\F5\FD\36\03\00\C5\D5\E5\7E\FE\40\28\07\CD\BE\76\E1\23\18\F3\E1\23\D1\C1\F1\32\03\70\F1\32\09\70\C9\E5\3E\40\CD\BE\76\E1\7E\E5\CD\BE\76\E1\23\FE\40\C8\18\F4\11\F8\02\E5\2A\0C\40\19\EB\E1\7E\23\FE\40\C8\12\13\18\F7\FD\36\09\01\E5\D5\CD\45\72\D1\E1\16\0C\CD\46\74\21\AF\3E\18\D8\F5\E6\0F\C6\1C\47\F1\E6\F0\1F\1F\1F\1F\C6\1C\C9\F5\CD\B8\74\D7\78\D7\F1\C9\2A\0C\40\ED\5B\76\40\37\ED\52\E5\AF\CD\BE\76\E1\E5\7C\CD\D7\7D\E1\7D\C3\D7\7D\26\36\6F\7E\C9\26\37\18\F9\CD\90\70\C8\F5\2A\0E\40\3E\76\BE\CC\F8\7A\F1\CD\C8\74\37\C9\CD\1C\7B\CD\86\76\ED\7B\2E\70\3B\3B\CD\A5\75\CD\98\70\F1\32\09\70\CD\7A\72\21\13\3F\11\08\08\CD\46\74\21\E6\3E\CD\90\74\21\0F\3F\FD\CB\02\46\28\03\21\0B\3F\CD\9A\74\CD\B6\75\CD\FC\72\30\F8\FE\41\CA\30\76\FE\42\CA\5F\78\FE\5D\CA\45\78\FE\5E\CA\1D\78\FE\5F\CA\FD\77\FE\60\CA\7F\7B\FE\61\CA\D6\79\FE\62\CA\FA\75\FE\63\CA\F0\76\FE\64\CA\5C\79\FE\65\CA\A7\7A\CD\88\75\FE\0D\CC\0A\7E\18\B7\FD\CB\02\4E\20\0E\F5\21\09\70\7E\A7\28\02\36\02\F1\CD\BB\76\CD\EA\7D\CD\8C\70\C3\D8\70\21\A6\3F\CD\90\74\C3\F7\72\CD\68\76\CD\B4\71\CF\19\21\02\70\CB\56\28\13\7E\E6\FA\77\21\64\3F\CD\7D\74\21\0F\3F\11\15\03\C3\93\74\3A\05\70\FD\BE\04\C8\21\40\70\3C\E6\3F\32\05\70\85\6F\4E\CD\F6\71\28\04\FD\36\09\03\79\CD\E4\7D\CD\BB\76\FE\40\CA\0A\7E\C9\00\CD\F6\71\F5\21\2E\7E\1E\2C\CD\A3\74\CD\E9\72\CD\FC\72\FE\42\20\0A\CD\45\72\F1\32\09\70\C3\21\75\FE\68\28\0C\FE\6D\20\E7\CD\B4\71\CD\E9\72\18\E6\CD\A4\71\18\F6\00\FD\CB\02\F6\21\07\3F\CD\90\74\CD\E9\72\CD\FC\72\30\FB\FE\41\28\03\CD\88\75\FD\CB\02\B6\C3\2A\75\FD\36\09\02\CD\45\72\FD\36\03\00\FD\36\12\4A\21\7C\7F\CD\84\74\C3\7D\74\FD\21\00\40\CD\AD\14\CD\86\76\DD\21\81\02\3E\1E\ED\47\ED\5B\07\71\2A\2C\70\01\25\00\ED\B0\21\34\40\F5\46\7E\B8\28\FC\F1\C9\2A\10\40\2B\2B\06\20\77\2B\10\FC\C9\3A\3B\70\CB\67\CB\A7\20\0F\F1\F5\20\06\CD\53\72\2B\18\05\3E\08\4F\80\47\71\23\70\2B\F1\C9\FE\43\C8\4F\CD\FB\71\23\46\B8\79\F5\30\03\CD\53\72\2B\4E\F1\F5\FE\40\28\C9\FD\CB\3B\A6\E5\C5\CD\4C\73\C1\E1\3E\06\FD\96\03\81\4F\FE\F8\38\CB\FD\CB\3B\E6\18\C0\CD\F6\71\F5\FD\36\09\01\CD\45\72\21\C7\3F\11\0E\07\CD\46\74\21\4C\7E\11\62\10\CD\46\74\CD\E9\72\CD\FC\72\30\FB\FE\42\28\23\FE\75\28\4C\FE\72\28\50\FE\77\28\57\FE\20\28\70\FE\22\28\72\FE\24\28\74\FE\66\28\76\FE\68\20\D7\CD\3F\77\C3\10\76\E1\F1\F5\E5\C8\1E\56\21\EE\3F\CD\A3\74\CD\E9\72\CD\FC\72\30\FB\FE\1E\28\0B\FE\1F\28\07\FE\42\20\EF\E1\18\8D\D6\1C\32\09\70\C9\CD\3F\77\CD\02\74\18\CB\F1\28\04\AF\C3\1B\75\3E\01\18\F9\3A\02\70\C6\80\32\02\70\2A\00\70\23\23\06\20\7E\C6\80\77\CB\FC\77\CB\BC\23\10\F4\18\A3\FD\36\03\00\18\9D\FD\36\03\02\18\97\FD\36\03\03\18\91\FD\36\09\01\CD\7A\72\21\D0\3E\1E\44\CD\AE\74\2A\0C\70\CD\B8\71\54\5D\13\01\00\03\36\00\ED\B0\CD\CD\72\CD\FC\72\30\FB\FE\42\CA\1A\75\FE\22\20\13\3A\0D\70\FE\88\28\D8\C6\08\32\0D\70\C6\10\32\0E\70\18\CC\FE\23\20\DB\3A\0D\70\FE\28\28\C1\D6\08\18\E7\21\09\3F\CD\90\74\CD\F7\72\CD\FC\72\30\FB\CB\B7\FE\26\38\09\CB\FF\CD\88\75\4F\CD\E3\75\C3\2A\75\FD\CB\02\4E\20\09\21\0F\3F\FD\CB\02\CE\18\07\21\0C\3F\FD\CB\02\8E\E5\21\6F\3F\FD\CB\09\86\CD\7D\74\E1\CD\84\74\C3\3F\75\FD\CB\02\46\20\0B\CD\93\78\20\53\FD\CB\02\C6\18\C4\FD\CB\02\86\18\BE\00\00\00\CD\68\76\CD\2A\0A\CD\2B\0F\11\7A\02\21\7D\3F\CD\93\74\CD\B3\74\CD\E9\72\CD\4E\79\30\FB\FE\33\28\0D\FE\3E\28\57\FE\0C\20\EF\CD\98\70\18\8D\CD\2A\0A\C3\AE\75\21\81\40\11\9C\3E\06\07\1A\BE\C0\23\13\10\F9\C9\CD\F6\71\F5\1E\30\21\E3\7F\CD\A3\74\CD\A5\75\C3\10\76\36\76\23\22\0C\40\0E\18\AF\06\20\36\76\23\77\10\FC\23\0D\20\F3\36\76\23\22\10\40\CD\9A\14\CD\AD\14\C3\2B\0F\00\00\CD\93\78\20\AD\CD\2A\0A\CD\B3\74\11\01\00\21\8F\3F\CD\93\74\21\3B\40\06\10\C5\13\23\D5\E5\CD\E9\72\CD\4E\79\30\FB\E1\D1\FE\0C\28\0D\FE\76\28\0D\CB\B7\77\12\C1\10\E2\18\CC\C1\C3\62\78\C1\2B\CB\FE\CD\23\0F\2A\76\40\E5\11\80\40\AF\ED\52\EB\72\2B\73\E1\CD\B5\78\11\01\00\21\9A\3F\CD\93\74\CD\A5\75\CD\23\0F\11\3C\40\C3\FB\02\CF\1B\CD\68\76\C3\23\0F\CD\BB\02\3E\FF\BD\C8\44\4D\CD\BD\07\7E\C9\CD\A5\75\CD\FC\72\30\FB\FE\42\CA\2A\75\CD\48\79\2A\04\40\11\B8\03\AF\ED\52\54\5D\01\E6\7C\ED\42\38\02\50\59\D5\62\6B\11\80\40\ED\52\E5\21\7D\40\77\23\77\23\D1\73\23\72\23\EB\01\07\00\21\9C\3E\ED\B0\C1\EB\22\76\40\AF\77\23\E5\ED\42\E1\38\F7\CD\B5\78\C3\88\78\21\45\7F\1E\3E\CD\A3\74\CD\FC\72\30\FB\21\02\70\FE\42\C8\FE\75\28\08\FE\7B\20\ED\CB\E6\37\C9\CB\A6\37\C9\00\CD\F6\71\F5\AF\32\09\70\CD\7A\72\CD\B2\79\30\2D\FE\7B\20\05\2A\10\40\18\0F\CD\9F\7A\28\0A\E5\2A\0C\40\2B\2B\22\76\40\E1\22\74\40\21\55\7E\1E\38\CD\A3\74\CD\E9\72\CD\FC\72\30\FB\FE\42\CA\1A\75\FE\66\28\0A\FE\78\20\EE\FD\CB\02\AE\18\04\FD\CB\02\EE\CD\D4\71\3A\11\70\FE\A0\28\02\30\49\F5\2A\74\40\7E\23\22\74\40\FD\CB\02\6E\C4\EB\74\C1\FE\40\20\04\CB\71\20\30\CD\BB\76\ED\5B\74\40\2A\76\40\FD\CB\02\66\28\03\2A\14\40\A7\ED\52\30\C6\2A\74\40\2B\22\74\40\3E\14\CD\91\76\21\6D\7E\11\02\03\CD\93\74\CD\F7\72\21\7B\7E\CD\90\74\CD\FC\72\30\FB\FE\42\CA\1A\75\FE\68\CC\02\74\FE\73\28\92\FE\78\20\E9\CD\53\72\18\8C\CD\93\78\C8\21\7D\40\C9\CD\F6\71\F5\CD\93\78\C2\A7\78\AF\2A\76\40\11\88\40\ED\52\E5\1E\14\21\9C\7E\CD\A3\74\E1\CD\DB\74\21\A9\7E\CD\50\74\CD\D1\74\CD\A5\75\C3\10\76\CD\F4\74\D8\CD\4E\79\30\F7\FE\0C\20\F3\21\D4\7F\C3\08\75\CD\F8\74\F5\CD\80\70\CB\47\28\F9\F1\C3\8C\70\E5\F5\2A\0C\40\11\09\01\19\E5\11\21\00\19\D1\01\6B\01\ED\B0\AF\06\20\12\13\10\FC\06\13\CD\F5\08\F1\E1\37\C9\CD\F8\7A\11\74\02\CD\93\74\18\D1\CD\68\76\CD\2A\0A\CD\F8\7A\21\5B\7F\C3\90\74\2A\76\40\01\81\00\7A\ED\B9\EA\44\7B\37\C9\7B\BE\20\F4\C9\2A\3E\40\22\76\40\C9\FD\36\3C\01\FD\36\3D\00\FD\36\44\00\22\3E\40\22\40\40\C9\E5\3E\04\CD\E9\7A\CD\D6\7A\FE\06\20\F4\E1\C9\21\88\40\3A\02\70\CB\67\C8\2A\10\40\C9\CD\F6\71\F5\FD\36\09\01\CD\7A\72\21\1C\7F\1E\08\CD\A3\74\CD\50\76\21\84\00\22\2A\70\21\52\02\22\74\40\CD\FC\72\30\FB\FE\42\CA\1A\75\FE\69\CA\B1\7C\FE\7A\28\52\FE\79\20\E9\21\A6\3F\1E\20\CD\A3\74\CD\FC\72\30\FB\FE\42\28\BE\CD\68\76\CD\2A\0A\11\76\76\CD\36\7B\38\29\CD\23\0F\11\88\40\ED\52\44\4D\EB\11\7D\40\ED\B0\EB\CD\B5\78\C3\17\75\3A\02\70\CB\67\C8\11\80\7F\CD\36\7B\D2\9D\14\CD\D0\78\21\0C\7F\C3\08\75\CD\B2\79\30\BC\CD\27\7B\CD\9F\7A\CD\75\7B\CD\50\7B\CD\D6\7A\FE\15\20\F9\3A\3D\40\FE\09\38\08\21\B6\7E\CD\63\7B\18\D6\3E\01\CD\E9\7A\3A\3C\40\F5\CD\E9\7A\F1\2F\CD\E9\7A\06\80\C5\2A\3E\40\7E\23\22\3E\40\CD\E9\7A\C1\10\F1\2A\3E\40\ED\5B\0C\40\3A\02\70\CB\67\28\04\ED\5B\14\40\13\A7\ED\52\38\04\FD\36\44\FF\2A\40\40\06\80\AF\86\23\10\FC\CD\E9\7A\CD\D6\7A\FE\15\28\20\FE\18\28\A2\FE\06\20\18\2A\3E\40\22\40\40\FD\34\3C\FD\36\3D\00\3A\44\40\A7\28\93\21\C6\7E\18\89\FD\34\3D\2A\40\40\22\3E\40\21\FE\7E\CD\1C\7B\C3\1E\7C\CD\B2\79\D2\87\7B\FE\75\20\06\CD\93\78\C2\A7\78\C4\9A\14\CD\27\7B\CD\72\7B\CD\50\7B\18\2E\01\00\70\0B\C5\CD\F4\74\C1\38\F5\78\B1\20\F4\21\FE\7E\CD\1C\7B\3A\44\40\FE\0A\38\0E\3E\18\CD\E9\7A\CD\49\7B\21\D8\7E\C3\08\75\3C\32\44\40\CD\CD\7D\3E\15\CD\E9\7A\CD\D6\7A\FE\04\28\39\FE\01\20\BF\CD\D6\7A\21\3C\40\BE\28\3C\23\BE\20\B2\CD\D6\7A\21\3D\40\2F\BE\20\A8\2A\3C\40\FE\01\28\0F\21\3C\40\35\23\35\2A\40\40\11\80\00\A7\ED\52\CC\72\7B\CD\5C\7B\18\1A\3E\06\CD\E9\7A\CD\49\7B\CD\EE\7B\21\EA\7E\18\A1\CD\D6\7A\21\3C\40\2F\BE\20\C6\06\80\C5\CD\D6\7A\2A\3E\40\77\23\22\3E\40\C1\10\F1\06\80\AF\2A\40\40\86\23\10\FC\32\1E\70\CD\D6\7A\21\1E\70\BE\20\3E\2A\3E\40\E5\2A\04\40\11\19\04\3A\02\70\CB\67\28\03\11\00\01\A7\ED\52\D1\A7\ED\52\30\09\21\64\3F\CD\1C\7B\C3\EB\7C\2A\3E\40\22\40\40\21\3C\40\34\23\34\FD\36\44\00\3E\06\CD\E9\7A\C3\05\7D\2A\40\40\22\3E\40\C3\CF\7C\16\06\10\FE\1B\7A\B3\20\F9\C9\CD\B8\74\C5\CD\BE\76\F1\C3\BE\76\00\00\CD\ED\7D\C3\EB\74\CD\F0\74\FD\CB\07\46\C8\C9\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\3E\0A\18\DF\ED\73\2E\70\CD\98\70\CD\B4\71\CD\7A\72\CD\50\76\21\A3\3E\CD\50\74\CD\A5\75\CD\A4\71\C3\1E\75\00\32\74\69\6A\72\00\28\74\73\79\77\74\71\0E\00\AD\66\73\6C\7A\75\00\A8\66\77\77\6E\6A\77\40\A0\1C\18\A2\1C\18\A4\1C\40\B8\6E\73\68\71\66\6E\77\00\74\77\00\A6\38\28\2E\2E\00\72\74\69\6A\0F\40\80\AA\B3\A9\80\B4\AB\80\AB\AE\B1\AA\80\40\A8\34\35\3E\00\B8\28\37\34\31\31\00\B3\2A\3D\39\16\35\26\2C\2A\00\00\B8\AD\98\B8\B5\14\2A\38\28\40\32\6A\72\74\77\7E\00\3A\78\6A\69\14\40\00\27\7E\79\6A\78\00\2B\77\6A\6A\14\40\BA\B5\B1\B4\A6\A9\80\A6\A7\B4\B7\B9\AA\A9\9B\40\BA\B5\B1\B4\A6\A9\80\A8\B4\B2\B5\B1\AA\B9\AA\A9\9B\40\A9\B4\BC\B3\B1\B4\A6\A9\80\A6\A7\B4\B7\B9\AA\A9\9B\40\A9\B4\BC\B3\B1\B4\A6\A9\80\A8\B4\B2\B5\B1\AA\B9\AA\A9\9B\40\B7\AA\B5\AA\A6\B9\80\A7\B1\B4\A8\B0\8E\40\B9\B7\A6\B3\B8\AB\AA\B7\80\AA\B7\B7\B4\B7\9B\40\00\00\BA\75\71\74\66\69\00\00\A9\74\7C\73\71\74\66\69\00\00\B9\77\66\73\78\6B\6A\77\00\00\38\2D\18\38\35\14\2A\38\28\00\40\B5\77\74\6C\77\66\72\00\74\77\00\BB\66\77\6E\66\67\71\6A\78\0F\40\80\80\80\80\BA\B5\98\A9\B4\BC\B3\80\B1\B4\A6\A9\80\AE\B3\80\B5\B7\B4\AC\B7\AA\B8\B8\80\80\80\80\40\BF\BD\96\B9\AA\B7\B2\97\A4\9C\80\80\BB\80\9E\9B\9E\40\32\2A\39\26\32\2A\29\2E\26\00\35\37\34\29\1B\00\18\00\38\2E\31\2E\28\34\33\00\32\39\33\1B\00\28\34\32\35\3A\39\2A\37\38\2D\66\77\7B\6A\7E\00\39\66\7E\71\74\77\00\00\00\00\00\2B\1B\00\33\66\68\6D\67\66\7A\77\40\AA\B8\A8\A6\B5\AA\80\AE\B3\BB\B4\B0\AA\A9\40\29\66\79\66\00\27\7A\6B\6B\6A\77\00\73\74\79\00\2E\73\6E\79\6E\66\71\6E\7F\6A\69\40\00\31\5B\40\21\00\70\22\04\40\2B\36\3E\2B\F9\2B\2B\22\02\40\21\90\40\11\00\70\01\00\10\ED\B0\2A\10\40\11\06\00\19\11\00\36\01\00\0A\ED\B0\C3\76\06
   1 REM %Z%X%-%T%E%R%M%*%8%0 (C)1987              BY FRED NACHBAUR        
   2 REM \BA\B5\B1\B4\A6\A9\80\9F\A2\9C\9C\96\9F\AB\AB\AB\80\B9\B4\80\A6\8D\00\00\00\00\00\00\00\00\00\F9\D4\1E\1C\23\24\23\76\00\00\00\00\EA\00\00\00\2A\10\40\7E\FE\C6\C2\31\12\11\06\00\19\EB\21\00\36\01\00\0A\ED\B0\C9\00\00\00\00\00\00\00\00
  10 REM %P%R%I%N%T%E%R% %D%R%I%V%E%R%S         
  11 REM \B9\A6\B8\B2\00\00\00\00\00\00\F5\F5\76\AF\D3\FB\3D\D3\7B\D3\FB\F1\D3\7B\3E\F7\D3\FB\3E\FF\D3\FB\F1\C9
  12 REM \A6\AA\B7\A8\00\00\00\00\00\00\F5\F5\76\DB\7F\00\00\F1\D3\7F\00\00\DB\7F\F1\C9\00\00\00\00\00\00\00\00
  13 REM %O%L%I%G      M COPY COPY TAN                     
  14 REM %M%T%C%P       PRINT <=J LET TAN                    
  15 REM %M%T%-%S      M$JTAN                     
  16 REM \AA\B3\B7\BF\00\00\00\00\00\00\F5\76\D3\05\00\00\DB\01\3E\2B\D3\01\3E\A8\D3\01\F1\C9\00\00\00\00\00\00
  17 REM \AA\B5\B8\BB\00\00\00\00\00\00\F5\76\D3\8B\AF\D3\BB\3C\D3\BB\00\00\DB\9B\F1\C9\00\00\00\00\00\00\00\00
  18 REM \A7\A7\A8\B0\00\00\00\00\00\00\76\D3\1F\C9\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00
  20 GOSUB USR .\76\76LN F?E(RND)\43 %J GOSUB \52 FOR \' CHR$ \ '5%W\55\76>"F.\78%L4 LET \' C7TAN RND\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##RND\''\''\:'\ '\. \ .\'   \ '\''\:'\''\ :\''\' \:'\''\. \ :\. \ .\:  \ .  \ .\''\. \.'\'.RND \.'  \.'\'. \ .\..  \:  \ :\'' \:.\..\' \ :\ '\' \: \ '\.:\.' \ .\''\. \: \ :RND\.:\..\..\ :  \:     \:  \ :\..\. \:  \: \ :  \: \ '\ :\ ' \ '\..\' \'.\.'RND\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##RND\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..\..RND\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~\~~RNDCOPYRIGHT 1987 BY: FRED NACHBAURRND\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,\,,RND\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''\''RND%P%R%E%S%S% %"%S%"% %T%O% %M%A%K%E% %A% %B%A%C%K%-%U%P% %C%O%P%YRND%O%F% %O%R%I%G%I%N%A%L% %T%A%P%E%.% % %(%L%E%G%I%T%I%M%A%T%E% % RND% % % %U%S%E%R%S% %*%*%*%*%O%N%L%Y%*%*%*%*%,% %P%L%E%A%S%E%)% % RND                                RNDUP/DOWNLOADING PORTIONS OF PROG-RNDRAM FROM "MINI-XMOD",  BY HARVEYRNDTAYLOR. "WRX-16" HI-RES ROUTINESRNDBY WILF RIGTER. ALL RIGHTS RSVD.RND                                RND%D%I%S%T%.% %B%Y%:% %S%I%L%I%C%O%N% %M%T%N%.% %C%O%M%P%U%T%E%R%SRND% % % % % % % % % % %C%-%1%2%,%M%T%N%.% %S%T%N%.% %G%R%O%U%P% % RND%V% %2%.%3% % % % % %N%E%L%S%O%N%,% %B%C% %C%A%N%A%D%A% % % % % RND  
  21 REM \40\B7\AA\B1\B4\A8\A6\B9\AA\40\76\76\21\0C\56\4E\23\46\23\03\78\B1\C8\E5\0B\60\69\11\70\2F\AF\ED\52\7E\A7\28\1E\FE\FD\28\0A\FE\DD\28\06\FE\ED\28\02\18\01\23\23\44\4D\5E\23\56\2A\32\40\19\7D\02\03\7C\02\E1\18\C9\00\5B\70\66\70\69\70\90\70\9B\70\9F\70\A8\70\B6\70\C2\70\C6\70\D1\70\D4\70\DC\70\E3\70\FE\70\06\71\24\71\27\71\48\71\4E\71\51\71\57\71\5D\71\9D\71\A1\71\A4\71\AA\71\B1\71\E6\71\EC\71\F2\71\F6\71\FB\71\0C\72\12\72\23\72\45\72\4B\72\4E\72\53\72\57\72\6D\72\70\72\7A\72\7D\72\88\72\94\72\99\72\B3\72\CD\72\D1\72\D4\72\D8\72\DB\72\F7\72\08\73\0C\73\10\73\18\73\20\73\64\73\73\73\8B\73\C1\73\C8\73\D0\73\02\74\08\74\0E\74\42\74\46\74\4A\74\50\74\69\74\75\74\79\74\80\74\86\74\A9\74\B0\74\C9\74\DD\74\E3\74\E8\74\F4\74\FF\74\03\75\08\75\0B\75\0E\75\14\75\17\75\1B\75\1E\75\27\75\2D\75\3C\75\3F\75\42\75\49\75\4E\75\53\75\58\75\5D\75\62\75\67\75\6C\75\71\75\76\75\7B\75\7E\75\83\75\8F\75\99\75\9C\75\9F\75\A2\75\A8\75\AB\75\AE\75\B1\75\B6\75\C4\75\CD\75\D0\75\D7\75\DD\75\E3\75\ED\75\F0\75\F5\75\FA\75\FE\75\03\76\06\76\09\76\10\76\14\76\17\76\22\76\25\76\2A\76\37\76\3A\76\3D\76\46\76\4D\76\54\76\5F\76\62\76\65\76\6F\76\7A\76\7E\76\9D\76\AA\76\BF\76\C9\76\DA\76\F0\76\F8\76\01\77\04\77\0A\77\0D\77\10\77\39\77\3C\77\49\77\4C\77\4F\77\65\77\69\77\6C\77\75\77\7C\77\81\77\84\77\AF\77\B7\77\BA\77\BD\77\CA\77\CD\77\D4\77\DB\77\E4\77\E9\77\F2\77\00\78\03\78\06\78\13\78\17\78\1A\78\3B\78\3F\78\42\78\4B\78\5F\78\6E\78\71\78\74\78\77\78\88\78\90\78\A3\78\A9\78\AC\78\AF\78\B2\78\DB\78\E3\78\EC\78\F9\78\FC\78\15\79\2E\79\37\79\3A\79\48\79\5C\79\5F\79\66\79\69\79\AC\79\AF\79\B2\79\B7\79\BA\79\BF\79\D6\79\DB\79\DE\79\E1\79\EF\79\01\7A\06\7A\09\7A\0C\7A\13\7A\28\7A\2B\7A\41\7A\4D\7A\6E\7A\71\7A\77\7A\7A\7A\7D\7A\80\7A\83\7A\8A\7A\8F\7A\9A\7A\9F\7A\A7\7A\AB\7A\AE\7A\BD\7A\C0\7A\C4\7A\C7\7A\CA\7A\CD\7A\D0\7A\D3\7A\D6\7A\DA\7A\E3\7A\E6\7A\E9\7A\ED\7A\F5\7A\1C\7B\22\7B\27\7B\2D\7B\30\7B\33\7B\3F\7B\66\7B\69\7B\75\7B\7F\7B\87\7B\8A\7B\8F\7B\92\7B\98\7B\A1\7B\A8\7B\AD\7B\BD\7B\C0\7B\C9\7B\D2\7B\E8\7B\EB\7B\EE\7B\F7\7B\FD\7B\00\7C\03\7C\06\7C\0B\7C\0E\7C\11\7C\14\7C\17\7C\25\7C\28\7C\2F\7C\36\7C\3B\7C\49\7C\56\7C\75\7C\78\7C\9A\7C\A8\7C\AB\7C\AE\7C\B1\7C\B4\7C\BB\7C\BE\7C\C4\7C\C7\7C\CA\7C\D4\7C\DE\7C\E1\7C\ED\7C\F0\7C\F3\7C\F6\7C\FD\7C\02\7D\05\7D\10\7D\1D\7D\3D\7D\40\7D\47\7D\4A\7D\4D\7D\50\7D\55\7D\62\7D\7A\7D\7D\7D\80\7D\90\7D\A6\7D\A9\7D\BE\7D\C1\7D\CA\7D\D7\7D\DB\7D\DF\7D\E4\7D\E7\7D\EA\7D\0E\7E\12\7E\15\7E\18\7E\1B\7E\21\7E\24\7E\27\7E\2A\7E\03\80\16\80\FF\FF\00
  29 REM %Z%X%T%*%8%0
  30 IF Z$<>"S" THEN GOTO VAL "100"
  40 CLS 
  50 SAVE "ZXT8%0"
  60 GOTO VAL "20"
 100 LET Z=VAL "32270"
 105 LET K=VAL "9000"
 107 LET L=VAL "2000"
 110 CLS 
 120 PRINT "%WESTRIDGE/%BYTE-BACK"
 125 GOSUB K
 130 IF Z$<>"B" AND Z$<>"W" THEN GOTO VAL "110"
 132 FAST 
 135 LET D$=("%H\66\73\6C\7A\75 %C\66\77\77\6E\6A\77" AND Z$="W")+("%A\73\78\7C\6A\77 %O\77\6E\6C\6E\73." AND Z$="B")
 137 LET A=VAL "20172"
 138 GOSUB L
 140 LET D$=("<=\77TAN  PEEK \77TAN  <=\73TAN  PEEK \73TAN  " AND Z$="W")+("U COPY ZTAN M COPY ZTAN U RETURN ZTAN M RETURN ZTAN " AND Z$="B")
 142 LET A=VAL "16655"
 145 GOSUB L
 150 LET D$=(" RETURN \68C£ RETURN \6D4 SCROLL LN %O\71LN DIM \72/ NEW LN %8\71/ PLOT  " AND Z$="W")+(" CLEAR FAST LPRINT )8 ; RETURN \664\. QR/\ 'Q*LN %8\71/ STEP " AND Z$="B")
 152 LET A=VAL "18089"
 155 GOSUB L
 160 POKE VAL "16964",(VAL "62" AND Z$="W")+(VAL "201" AND Z$="B")
 170 POKE VAL "16564",(VAL "55" AND Z$="W")+(VAL "23" AND Z$="B")
 172 LET D$=CHR$ VAL "118"
 175 LET D$=("6"+D$+"9"+D$+"E"+D$ AND Z$="W")+("F"+D$+"    " AND Z$="B")
 180 LET A=VAL "22305"
 185 GOSUB L
 200 CLS 
 205 POKE VAL "16535",NOT PI
 210 PRINT "ENTER YOUR INTERFACE TYPE.",,,"(IF NO BIG PRINTER, PRESS ""X"")",,,"1: TASMAN TYPE B OR C","2: AERCO OR OLIGER 2068","3: OLIGER 1000 (MAPPED FFFF)","4: MEMOTECH CENTRONICS","5: MEMOTECH RS232","6: ENER-Z REPORT GENERATOR","7: EPROM SERVICES C.P.","8: BYTE-BACK C.P."
 215 SLOW 
 220 GOSUB K
 230 IF Z$="X" THEN GOTO VAL "300"
 240 IF Z$<"1" OR Z$>"8" THEN GOTO VAL "200"
 245 CLS 
 250 LET A=VAL "20824"+VAL "40"*VAL Z$
 260 LET D=VAL "20098"
 270 FOR N=A TO A+VAL "23"
 280 POKE D,PEEK N
 285 LET D=D+SGN PI
 290 NEXT N
 295 POKE VAL "16535",SGN PI
 300 CLS 
 310 PRINT "CHANGE MODE WORD?"
 320 GOSUB K
 330 IF Z$="N" THEN GOTO VAL "400"
 335 IF Z$="Y" THEN GOTO VAL "345"
 340 GOTO VAL "300"
 345 CLS 
 350 PRINT "ENTER MODE NUMBER, AS FOLLOWS:",,,"1 STOP BIT: ADD 64","1.5 STOP BITS: ADD 128","2 STOP BITS: ADD 192",,,"EVEN PARITY: ADD 32",,,"PARITY ENABLE: ADD 16",,,"CHARACTER LENGTH:","5: ADD 0",,"6: ADD 4",,"7: ADD 8",,"8: ADD 12",,,,"FOR 300 BAUD RATE:","WESTRIDGE: ADD 3   ","BYTE-BACK: ADD 2"
 360 INPUT M
 370 POKE VAL "16563",M
 400 CLS 
 410 PRINT "INSTALL USER OPTIONS?"
 420 GOSUB K
 430 IF Z$="N" THEN GOTO VAL "500"
 440 IF Z$="Y" THEN GOTO VAL "450"
 445 GOTO VAL "420"
 450 CLS 
 460 PRINT " POKE AS NEEDED, THEN GOTO 500"
 470 STOP 
 500 CLS 
 505 PRINT "RELOCATE?"
 510 GOSUB K
 520 IF Z$="N" THEN GOTO VAL "700"
 530 IF Z$<>"Y" THEN GOTO VAL "500"
 600 PRINT " TO ADDRESS?"
 610 INPUT A
 615 LET O=A-VAL "28672"
 620 IF O<NOT PI THEN GOTO VAL "500"
 630 RAND O
 640 RAND USR VAL "21969"
 650 LET Z=Z+O
 660 CLS 
 670 PRINT " RAND USR ";Z;" TO ENTER"
 680 GOSUB K
 700 CLS 
 710 PRINT "MEMORY:",,,,"1: 16/32K","2: 64K"
 720 GOSUB K
 730 IF Z$<>"1" AND Z$<>"2" THEN GOTO VAL "700"
 750 POKE VAL "16572",(VAL "60" AND Z$="1")+(VAL "217" AND Z$="2")
 760 POKE VAL "16573",(VAL "192" AND Z$="1")+(VAL "255" AND Z$="2")
 900 CLS 
 910 PRINT " SAVE CONFIGURED PGM?"
 920 GOSUB K
 930 IF Z$="N" THEN GOTO VAL "1010"
 940 IF Z$<>"Y" THEN GOTO VAL "900"
1000 SAVE "ZXT8%0"
1010 RAND USR VAL "20624"
1020 RAND USR Z
2000 FOR N=SGN PI TO LEN D$
2010 POKE A+N,CODE D$(N)
2020 NEXT N
2030 RETURN 
9000 IF INKEY$<>"" THEN GOTO 9000
9010 LET Z$=INKEY$
9020 IF Z$="" THEN GOTO 9010
9030 RETURN