Satellite BBS
-- Sebastian Pawlak, 1995.
Reklamówka mojego BBS-u "Satellite"... to były czasy.
KOD SEGMENT assume cs:KOD org 100h start: jmp Main Obraz DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,761,3616 DW 2387,3616,2810,3616,833,3616,2810,3616,2900,3616,762,3616,3909 DW 3616,2810,3616,2892,3616,762,3616,844,3616,762,3616,2377,3616 DW 762,3616,852,3616,2810,3616,2885,544,761,3616,3616,3616,3616 DW 249,761,249,3906,249,762,249,2882,249,762,544,851,3616 DW 2809,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,476,6620,6620,476,3616,303,3616 DW 3616,3616,3616,3616,3616,3616,2554,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,472,3616,3616,3616,3616,3616,3616,3616,219 DW 2524,2524,2524,2524,3616,3616,3616,2524,2524,2524,2524,3616,3616 DW 3616,2524,2524,2524,2524,3616,3616,3616,3616,220,220,220,220 DW 220,220,223,223,223,2553,223,223,223,3616,3616,3616,3616 DW 3616,3616,3616,3616,220,220,476,6620,6620,6623,6620,2523,6620 DW 6620,476,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,2553 DW 3616,3616,3616,3616,220,220,448,450,453,220,3616,3616,3616 DW 219,2523,219,219,219,219,2527,219,2523,3616,506,3616,3616 DW 2527,3616,2523,3616,3616,3616,3616,2523,3616,3616,3616,220,220 DW 220,3616,223,219,219,223,223,223,223,223,223,223,223 DW 3616,3616,3616,3616,3616,3616,3616,220,479,6623,6620,2523,6620 DW 6620,6623,6620,2523,6620,6620,476,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,220,220,476,476,435,47,220,220 DW 220,220,219,2523,219,2524,2524,2524,219,219,2523,3616,2524 DW 2524,2524,3616,3616,3616,2527,2527,2527,3616,2523,3616,3616,3616 DW 3616,3616,223,1017,219,219,219,219,219,219,219,219,219 DW 219,219,219,3616,3616,3616,3616,3616,3616,3616,3616,3616,479 DW 479,6623,6620,2523,6620,6620,6623,6620,2523,6620,6620,476,3616 DW 3616,3616,3616,3616,3616,3616,220,476,6620,2523,2523,6620,476 DW 2351,2500,2552,220,219,2523,219,506,219,219,2523,3616,2523 DW 3616,3616,3616,3616,2523,3616,2524,3616,3616,506,3616,2523,3616 DW 3616,3616,220,220,220,220,223,223,223,223,223,223,223 DW 223,2553,223,223,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,479,479,6623,6620,2523,6620,6620,6623,479 DW 3616,3616,3616,3616,3616,3616,3616,222,4571,6622,2523,2523,2523 DW 2523,6621,4571,220,220,3616,219,219,2527,2527,2527,2527,219 DW 3616,219,2527,2527,2527,2527,3616,3616,3616,2527,2527,2527,2527 DW 3616,3616,3616,3616,220,505,223,223,505,223,223,223,2553 DW 223,223,223,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,506,3616,3616,3616,3616,3616,479,479,6623,479 DW 3616,479,476,3616,3616,3616,476,6620,6620,476,3616,479,6623 DW 2523,2523,6623,479,3616,3616,3616,3616,3616,3616,3616,3616,219 DW 3616,3616,3616,3616,3616,3616,3616,2553,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,505,3616,220,220,220,3616,3616,3616,3616 DW 223,223,223,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,479,476,6620,2523,6619,2523,2523,6620 DW 6620,476,479,479,3616,3616,3616,3616,250,250,250,250,250 DW 250,250,250,250,250,250,250,250,3616,3616,3616,3616,223 DW 2524,2524,2524,2524,3616,3616,3616,2524,2524,2524,2524,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,506,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,2553,3616 DW 3616,3616,3616,3616,3616,3616,476,6620,2523,2523,6623,6619,6619 DW 6619,2523,2523,2523,4571,479,3616,3616,3616,3616,3616,506,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,2527,3616,3616,3616,223,2523,3616,2523,3616,3616,3616,3616 DW 2523,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,220,476,6620,6619,2523,6623,6620,6619 DW 2523,6619,6619,2523,6623,479,219,219,219,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3066,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,506,2527,2527,2524,3616,3616,2527,2527 DW 2527,3616,2523,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,476,6620,6619,2523,6623,6620,2523 DW 2523,6619,2523,2523,6623,479,476,219,3616,3616,3616,3616,223 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,2554,3616,3616,2524,3616,3616,3616,3616,2523,3616,2524 DW 3616,3616,506,3616,2523,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,479,6623,6619,6620,6619 DW 6619,6619,2523,2523,6623,479,219,219,506,479,476,3616,476 DW 6620,476,476,3616,3616,3616,3616,3616,3616,3616,3616,3616,2553 DW 3616,3616,3616,3616,3616,3616,3616,3616,2527,2527,2527,2527,3616 DW 3616,3616,2527,2527,2527,2527,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,2553,3616,3616,3616,3616,3616,3616,3616,476,6620,6619 DW 6619,6623,6623,2523,6623,479,219,219,3616,3616,3616,3616,476 DW 6620,6623,6623,2523,6623,6620,476,476,220,220,220,3616,3616 DW 3616,3616,3616,3616,250,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,506,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3292 DW 16863,479,6623,479,4315,479,223,219,3616,3616,3616,3616,223 DW 479,6623,6623,2523,6623,6620,6623,6623,2523,6623,6620,476,476 DW 3616,303,3616,3616,1017,3616,3616,3616,3616,250,250,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 2524,2524,2524,2524,3616,3616,3616,3616,3616,3616,2524,2524,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,220 DW 19679,19676,1247,3616,3616,3616,3616,3616,3616,3616,2554,3616,3616 DW 3616,3616,3616,3616,3616,479,6623,6623,2523,6623,6620,6623,6623 DW 2523,6623,6620,476,476,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,250,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,2527,3616,3616,3616,3616,2523,3616,3616,3616,2524,2527,220 DW 2523,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 219,19676,1247,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,2554,3616,3616,3616,3616,479,6623,6623 DW 2523,6623,6620,6623,6623,2523,6623,479,3616,3616,3616,3616,3616 DW 3616,3616,506,3616,3616,3616,3616,3616,250,3616,3616,3616,506 DW 3616,3616,3616,3616,506,3616,2524,2527,3616,3616,2524,2527,223 DW 506,3616,2523,3616,3616,3616,3616,3616,3616,506,3616,3616,3616 DW 3616,3616,1247,3616,3616,3616,3616,3616,3616,3616,3616,506,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,479,6623,6623,2523,6623,479,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,220,220,2527,3616,3616,220,3616,2527 DW 2527,2527,2527,223,2523,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,988,988,988,988 DW 988,988,988,988,988,988,988,988,988,988,13275,13275,13275 DW 14812,14812,14812,14812,14812,14812,14812,6620,14812,14812,14812,14812,14812 DW 13275,13275,13275,988,988,988,988,988,988,988,988,988,988 DW 988,988,3616,3616,3616,3616,3616,2527,2527,2527,2527,2527,3616 DW 3616,3616,3616,506,3616,3616,2527,3616,3616,3616,3616,988,988 DW 988,987,5083,5083,14812,14812,14812,14812,14812,14812,14812,14812,14812 DW 14812,14812,2523,14811,14811,6623,6623,6623,6623,6623,6623,6623,6623 DW 6623,6623,6623,6623,12763,12763,12763,12763,12763,12763,12763,12763,12763 DW 4571,6623,6623,6623,6623,6623,6623,6623,6623,6623,14811,14811,14811 DW 14812,14812,14812,14812,14812,14812,14812,14812,14812,14812,14812,14812,14812 DW 5083,5083,987,988,988,988,988,988,340,370,3616,0;,29445 DW 205,205,205,205,205,205,205,708,708,708,708,708,2756 DW 2756,2756,2765,717,3838,2765,2765,3838,2765,717,3838,717,717 DW 3838,717,717,4094,2765,2765,3838,2765,717,3838,717,717,3838 DW 717,717,3838,717,2765,3838,2765,717,3838,717,717,3838,717 DW 2765,4094,2765,2765,4094,2765,717,3838,717,717,2756,708,2756 DW 708,708,708,708,708,205,205,205,205,205,205,205,205 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3833,3616,2899,2336 DW 3834,2336,833,2336,3834,2336,2388,2336,3834,2336,837,2336,3834 DW 2336,2892,2336,3834,2336,844,2336,3834,2336,2377,2336,3834,2336 DW 852,2336,3834,2336,2885,3616,3833,246,246,246,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,3616,205,205 DW 205,3616,3616,3616,3616,3616,3616,2848,2848,2848,2848,2848,2848 DW 2848,2848,2848,2848,2848,2848,2848,2848,2848,2856,2848,816,2866 DW 2848,809,2848,2848,2870,822,2873,2848,819,2873,2848,818,2868 DW 3616,3616,3634,3633,3832,3832,5,2806,246,3634,3636,3832,3832 DW 3616,613,630,613,626,633,544,612,609,633,246,246,246 DW 246,246,246,246,246,246,246,246,246,246,3616,3616,3616 DW 3616,3616,3616,3616,3616,3616,3616,3616,2387,2425,2419,2415,2416 DW 2362,2336,2900,850,2377,2392,2336,2371,2415,2387,2425,2419,2415 DW 2416,2362,3616,2902,841,2386,2388,3616,3616,3898,3885,3881,3616 DW 3616,3616,3616,3616,589,623,612,613,621,570,3616,1109,3187 DW 1106,1135,1122,1135,1140,1129,1123,1139,1056,3411,3440,3439,3442 DW 3444,3443,3444,3429,3442,3616,3122,3128,3116,3128,3120,3120,3616 DW 1110,1070,1094,1091,3616,3616,3616,3616,3616,3616,3616,3616,3616 DW 3833,2592,2628,2629,2637,2625,3616,3833,3616,577,595,595,581 DW 589,578,588,581,594,3616,3833,3616,2611,2628,2592,2643,2644 DW 2645,2628,2633,2639,3616,3833,3616,583,594,601,544,3833,3616 DW 2637,2645,2650,2649,2635,2625,2592,3833,3616,583,594,577,582 DW 585,587,585,544,3833,3616,2640,2642,2639,2631,2642,2625,2637 DW 2649,2592,3833,3616,3616,3616,3616,3616,3616,3616 Main: mov ax,0003 int 10h mov cx,80*24 mov ax,0b800h mov es,ax mov di,0 mov si,offset Obraz Nastepny_znak: mov ax,cs:si mov es:di,ax inc si inc si inc di inc di loop Nastepny_znak mov ah,02h mov bh,0 mov dh,23 mov dl,1 int 10h mov ah,4ch int 21h ends end start