procedura wypelnia znaki tworzace forme gracza w buforze areny;
poczatek procedury = 4D10;

4BF0 : 00 00 08 00 00 02 0B 02 00 20 00 00 00 00 82 00
4C00 : 00 00 00 20 00 00 00 00 00 00 00 00 20 00 02 00
4C10 : 20 B8 20 00 20 02 0B 02 00 00 00 00 00 00 80 00
4C20 : 00 00 08 20 B8 20 00 00 00 20 00 20 B8 20 02 00
4C30 : 00 00 20 00 00 00 00 00 00 08 2E 08 20 00 02 00
4C40 : 00 00 00 00 20 00 00 00 00 00 20 B8 20 00 00 00
4C50 : 00 18 30 48

4C54: jest odpowiedzialna za animowane gwiazdki - 3 znaki po 8 bajtow;
komorka 6116 to licznik klatek animacji gwiazdek - wykorzystywane sa tylko 2 najmlodsze bity co daje 4 klatki animacji, dane do animacji gwiazdek sa w tablicy 4BF0;

4C54    LDX $D2             ; 3cyc ; A6 D2
4C56    LDA $DD,X ;FRE+3    ; 4cyc ; B5 DD
4C58    ASL                 ; 2cyc ; 0A
4C59    TAY                 ; 2cyc ; A8
4C5A    LDA $6880,Y         ; 4cyc ; B9 80 68
4C5D    STA $62 ;PALNTS     ; 3cyc ; 85 62
4C5F    LDA $6881,Y         ; 4cyc ; B9 81 68
4C62    STA $63 ;LOGCOL     ; 3cyc ; 85 63
4C64    LDA $6144           ; 4cyc ; AD 44 61
4C67    CMP #$02            ; 2cyc ; C9 02
4C69    BCS $4C77           ; 2cyc ; B0 0C
4C6B    LDY #$17            ; 2cyc ; A0 17
4C6D    LDA #$00            ; 2cyc ; A9 00
4C6F    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4C71    DEY                 ; 2cyc ; 88
4C72    BPL $4C6F           ; 2cyc ; 10 FB
4C74    JMP $4C94           ; 3cyc ; 4C 94 4C
4C77    LDA $6121           ; 4cyc ; AD 21 61
4C7A    CMP #$07            ; 2cyc ; C9 07
4C7C    BCS $4C6B           ; 2cyc ; B0 ED
4C7E    LDA $6116           ; 4cyc ; AD 16 61
4C81    AND #$03            ; 2cyc ; 29 03
4C83    TAY                 ; 2cyc ; A8
4C84    LDX $4C50,Y         ; 4cyc ; BE 50 4C
4C87    LDY #$00            ; 2cyc ; A0 00
4C89    LDA $4BF0,X         ; 4cyc ; BD F0 4B
4C8C    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4C8E    INX                 ; 2cyc ; E8
4C8F    INY                 ; 2cyc ; C8
4C90    CPY #$18            ; 2cyc ; C0 18
4C92    BCC $4C89           ; 2cyc ; 90 F5
4C94    RTS                 ; 6cyc ; 60

4C90 :                00 00 01 00 01 01 01 00 00 00 00
4CA0 : 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 00
4CB0 : 00 00 00 00 00 00 00 01 00 01 01 00 01 00 00 00
4CC0 : 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
4CD0 : 00 00 00 00 00 00

4CD6: jest odpowiedzialna za mruganie oczami i poruszanie ustami zawodnika;
sekwencja mimiki zapisana jest w tabeli 4C95; znaczenie poszczegolnych pozycji jest nastepujace:
#$00 - twarz bez zmian;
#$01 - otworzenie ust;
#$80 - mrugniecie oczami;
dana wejsciowa procedury jest 6197+Y (Y to numer rozpatrywanego zawodnika) - jest to offset sekwencji mimiki w tabeli 4C95; po wykonaniu wszystkich czynnosci procedura zwieksza 6197+Y o 1;

4CD6    LDY $D2             ; 3cyc ; A4 D2
4CD8    LDX $6197,Y         ; 4cyc ; BE 97 61
4CDB    LDA $00DD,Y ;FRE+3  ; 4cyc ; B9 DD 00
4CDE    ASL                 ; 2cyc ; 0A
4CDF    TAY                 ; 2cyc ; A8
4CE0    LDA $6880,Y         ; 4cyc ; B9 80 68
4CE3    STA $62 ;PALNTS     ; 3cyc ; 85 62
4CE5    LDA $6881,Y         ; 4cyc ; B9 81 68
4CE8    STA $63 ;LOGCOL     ; 3cyc ; 85 63
4CEA    LDA #$95            ; 2cyc ; A9 95
4CEC    LDY #$21            ; 2cyc ; A0 21
4CEE    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4CF0    LDA #$AA            ; 2cyc ; A9 AA
4CF2    LDY #$26            ; 2cyc ; A0 26
4CF4    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4CF6    LDA $4C95,X         ; 4cyc ; BD 95 4C
4CF9    BEQ $4D0A           ; 2cyc ; F0 0F
4CFB    BMI $4D04           ; 2cyc ; 30 07
4CFD    LDY #$26            ; 2cyc ; A0 26
4CFF    LDA #$A6            ; 2cyc ; A9 A6
4D01    JMP $4D08           ; 3cyc ; 4C 08 4D
4D04    LDA #$AA            ; 2cyc ; A9 AA
4D06    LDY #$21            ; 2cyc ; A0 21
4D08    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D0A    LDX $D2             ; 3cyc ; A6 D2
4D0C    INC $6197,X         ; 7cyc ; FE 97 61
4D0F    RTS                 ; 6cyc ; 60

4D10    LDY $D2             ; 3cyc ; A4 D2
4D12    LDA $00DD,Y ;FRE+3  ; 4cyc ; B9 DD 00
4D15    CMP #$2F            ; 2cyc ; C9 2F
4D17    BEQ $4D1D           ; 2cyc ; F0 04
4D19    CMP #$2B            ; 2cyc ; C9 2B
4D1B    BNE $4D23           ; 2cyc ; D0 06
4D1D    JSR $4C54           ; 6cyc ; 20 54 4C
4D20    JMP $4D2A           ; 3cyc ; 4C 2A 4D
4D23    CMP #$33            ; 2cyc ; C9 33
4D25    BNE $4D2A           ; 2cyc ; D0 03
4D27    JSR $4CD6           ; 6cyc ; 20 D6 4C
4D2A    LDX $D2             ; 3cyc ; A6 D2
4D2C    LDA $E6,X ;FR2      ; 4cyc ; B5 E6
4D2E    STA $D6 ;FR0+2      ; 3cyc ; 85 D6
4D30    LDY $DD,X ;FRE+3    ; 4cyc ; B4 DD
4D32    LDA $6BC0,Y         ; 4cyc ; B9 C0 6B
4D35    STA $5D ;OLDCHR     ; 3cyc ; 85 5D
4D37    LDA $D2             ; 3cyc ; A5 D2
4D39    ASL                 ; 2cyc ; 0A
4D3A    TAX                 ; 2cyc ; AA
4D3B    LDA $72,X ;COLAC    ; 4cyc ; B5 72
4D3D    STA $64 ;ADRESS     ; 3cyc ; 85 64
4D3F    LDA $73,X ;COLAC+1  ; 4cyc ; B5 73
4D41    STA $65 ;ADRESS+1   ; 3cyc ; 85 65
4D43    LDA #$08            ; 2cyc ; A9 08
4D45    STA $62 ;PALNTS     ; 3cyc ; 85 62
4D47    LDA $6118           ; 4cyc ; AD 18 61
4D4A    LDX $D2             ; 3cyc ; A6 D2
4D4C    BEQ $4D51           ; 2cyc ; F0 03
4D4E    CLC                 ; 2cyc ; 18
4D4F    ADC #$02            ; 2cyc ; 69 02
4D51    STA $63 ;LOGCOL     ; 3cyc ; 85 63
4D53    LDA $E2,X ;FR1+2    ; 4cyc ; B5 E2
4D55    BEQ $4D5A           ; 2cyc ; F0 03
4D57    JMP $4DD3           ; 3cyc ; 4C D3 4D
4D5A    LDY #$00            ; 2cyc ; A0 00
4D5C    LDX $D6 ;FR0+2      ; 3cyc ; A6 D6
4D5E    CPX #$0C            ; 2cyc ; E0 0C
4D60    BCC $4D65           ; 2cyc ; 90 03
4D62    JMP $4E79           ; 3cyc ; 4C 79 4E
4D65    INC $D6 ;FR0+2      ; 5cyc ; E6 D6
4D67    LDA $82,X ;VNTP     ; 4cyc ; B5 82
4D69    STA $5F ;OLDADR+1   ; 3cyc ; 85 5F
4D6B    BNE $4D70           ; 2cyc ; D0 03
4D6D    JMP $4DCC           ; 3cyc ; 4C CC 4D
4D70    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D72    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D74    INY                 ; 2cyc ; C8
4D75    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D77    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D79    INY                 ; 2cyc ; C8
4D7A    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D7C    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D7E    INY                 ; 2cyc ; C8
4D7F    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D81    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D83    INY                 ; 2cyc ; C8
4D84    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D86    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D88    INY                 ; 2cyc ; C8
4D89    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D8B    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D8D    INY                 ; 2cyc ; C8
4D8E    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D90    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D92    INY                 ; 2cyc ; C8
4D93    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4D95    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4D97    INY                 ; 2cyc ; C8
4D98    DEC $5D ;OLDCHR     ; 5cyc ; C6 5D
4D9A    DEC $5F ;OLDADR+1   ; 5cyc ; C6 5F
4D9C    BNE $4D70           ; 2cyc ; D0 D2
4D9E    CLC                 ; 2cyc ; 18
4D9F    TYA                 ; 2cyc ; 98
4DA0    ADC $64 ;ADRESS     ; 3cyc ; 65 64
4DA2    STA $64 ;ADRESS     ; 3cyc ; 85 64
4DA4    BCC $4DA8           ; 2cyc ; 90 02
4DA6    INC $65 ;ADRESS+1   ; 5cyc ; E6 65
4DA8    LDA #$00            ; 2cyc ; A9 00
4DAA    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DAC    INY                 ; 2cyc ; C8
4DAD    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DAF    INY                 ; 2cyc ; C8
4DB0    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DB2    INY                 ; 2cyc ; C8
4DB3    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DB5    INY                 ; 2cyc ; C8
4DB6    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DB8    INY                 ; 2cyc ; C8
4DB9    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DBB    INY                 ; 2cyc ; C8
4DBC    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DBE    INY                 ; 2cyc ; C8
4DBF    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4DC1    INY                 ; 2cyc ; C8
4DC2    CLC                 ; 2cyc ; 18
4DC3    TYA                 ; 2cyc ; 98
4DC4    ADC $62 ;PALNTS     ; 3cyc ; 65 62
4DC6    STA $62 ;PALNTS     ; 3cyc ; 85 62
4DC8    BCC $4DCC           ; 2cyc ; 90 02
4DCA    INC $63 ;LOGCOL     ; 5cyc ; E6 63
4DCC    LDA $5D ;OLDCHR     ; 3cyc ; A5 5D
4DCE    BNE $4D5A           ; 2cyc ; D0 8A
4DD0    JMP $4E79           ; 3cyc ; 4C 79 4E
4DD3    LDY #$00            ; 2cyc ; A0 00
4DD5    LDX $D6 ;FR0+2      ; 3cyc ; A6 D6
4DD7    CPX #$0C            ; 2cyc ; E0 0C
4DD9    BCC $4DDE           ; 2cyc ; 90 03
4DDB    JMP $4E79           ; 3cyc ; 4C 79 4E
4DDE    INC $D6 ;FR0+2      ; 5cyc ; E6 D6
4DE0    LDA $82,X ;VNTP     ; 4cyc ; B5 82
4DE2    STA $5F ;OLDADR+1   ; 3cyc ; 85 5F
4DE4    BNE $4DE9           ; 2cyc ; D0 03
4DE6    JMP $4E72           ; 3cyc ; 4C 72 4E
4DE9    TAX                 ; 2cyc ; AA
4DEA    LDA $4E7A,X         ; 4cyc ; BD 7A 4E
4DED    CLC                 ; 2cyc ; 18
4DEE    ADC $62 ;PALNTS     ; 3cyc ; 65 62
4DF0    STA $66 ;MLTTMP     ; 3cyc ; 85 66
4DF2    LDA $63 ;LOGCOL     ; 3cyc ; A5 63
4DF4    ADC #$00            ; 2cyc ; 69 00
4DF6    STA $67 ;MLTTMP+1   ; 3cyc ; 85 67
4DF8    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4DFA    TAX                 ; 2cyc ; AA
4DFB    LDA $1B00,X         ; 4cyc ; BD 00 1B
4DFE    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E00    INY                 ; 2cyc ; C8
4E01    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E03    TAX                 ; 2cyc ; AA
4E04    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E07    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E09    INY                 ; 2cyc ; C8
4E0A    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E0C    TAX                 ; 2cyc ; AA
4E0D    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E10    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E12    INY                 ; 2cyc ; C8
4E13    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E15    TAX                 ; 2cyc ; AA
4E16    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E19    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E1B    INY                 ; 2cyc ; C8
4E1C    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E1E    TAX                 ; 2cyc ; AA
4E1F    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E22    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E24    INY                 ; 2cyc ; C8
4E25    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E27    TAX                 ; 2cyc ; AA
4E28    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E2B    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E2D    INY                 ; 2cyc ; C8
4E2E    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E30    TAX                 ; 2cyc ; AA
4E31    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E34    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E36    INY                 ; 2cyc ; C8
4E37    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4E39    TAX                 ; 2cyc ; AA
4E3A    LDA $1B00,X         ; 4cyc ; BD 00 1B
4E3D    STA ($66),Y ;MLTTMP ; 6cyc ; 91 66
4E3F    INY                 ; 2cyc ; C8
4E40    BNE $4E48           ; 2cyc ; D0 06
4E42    INC $65 ;ADRESS+1   ; 5cyc ; E6 65
4E44    INC $67 ;MLTTMP+1   ; 5cyc ; E6 67
4E46    INC $63 ;LOGCOL     ; 5cyc ; E6 63
4E48    LDA $66 ;MLTTMP     ; 3cyc ; A5 66
4E4A    SEC                 ; 2cyc ; 38
4E4B    SBC #$10            ; 2cyc ; E9 10
4E4D    STA $66 ;MLTTMP     ; 3cyc ; 85 66
4E4F    BCS $4E53           ; 2cyc ; B0 02
4E51    DEC $67 ;MLTTMP+1   ; 5cyc ; C6 67
4E53    DEC $5D ;OLDCHR     ; 5cyc ; C6 5D
4E55    DEC $5F ;OLDADR+1   ; 5cyc ; C6 5F
4E57    BNE $4DF8           ; 2cyc ; D0 9F
4E59    STY $5E ;OLDADR     ; 3cyc ; 84 5E
4E5B    LDX #$07            ; 2cyc ; A2 07
4E5D    LDA #$00            ; 2cyc ; A9 00
4E5F    STA ($62),Y ;PALNTS ; 6cyc ; 91 62
4E61    INY                 ; 2cyc ; C8
4E62    DEX                 ; 2cyc ; CA
4E63    BPL $4E5F           ; 2cyc ; 10 FA
4E65    LDY $5E ;OLDADR     ; 3cyc ; A4 5E
4E67    LDA $62 ;PALNTS     ; 3cyc ; A5 62
4E69    CLC                 ; 2cyc ; 18
4E6A    ADC #$08            ; 2cyc ; 69 08
4E6C    STA $62 ;PALNTS     ; 3cyc ; 85 62
4E6E    BCC $4E72           ; 2cyc ; 90 02
4E70    INC $63 ;LOGCOL     ; 5cyc ; E6 63
4E72    LDA $5D ;OLDCHR     ; 3cyc ; A5 5D
4E74    BEQ $4E79           ; 2cyc ; F0 03
4E76    JMP $4DD5           ; 3cyc ; 4C D5 4D
4E79    RTS                 ; 6cyc ; 60

4E70 :                               00 00 08 10 18 20
4E80 : 28 30 38 40 48


zmienne:

005D: orientacja gracza (0-normalna, /0-odwrocona)
005E: wewnetrzna
005F: wewnetrzna
0060: wewnetrzna
0061: numer znaku bazowego ($01 dla gracza bialego, $41 dla czerwonego);
0062,0063: adres formy gracza
0064,0065: adres znaku w buforze areny, od ktorego rysowac gracza - zawsze w pierwszej linii tekstowej areny;
006A,006B: adres formy dla gracza bialego (in)
006C,006D: adres formy dla gracza czerwonego (in)
006E,006F: adres znaku w buforze areny, od ktorego rysowac gracza bialego (in) - zawsze w pierwszej linii tekstowej areny;
0070,0071: adres znaku w buforze areny, od ktorego rysowac gracza czerwonego (in) - zawsze w pierwszej linii tekstowej areny;
0082-008D: bufor dlugosci linii gracza dla 12 linii tekstowych (out);
008E-0099: bufor przesuniec linii gracza dla 12 linii tekstowych (out);
00D2: numer rysowanego gracza (0-bialy, 1-czerwony) (in);
00D6: licznik petli (0-11) i index buforow 0082 i 008E
00E2: orientacja gracza bialego (0-normalna, /0-odwrocona)(in)
00E3: orientacja gracza czerwonego (0-normalna, /0-odwrocona)(in)
00E6: numer linii tekstowej (0-11), w ktorej rozpoczal sie gracz bialy (out)
00E7: numer linii tekstowej (0-11), w ktorej rozpoczal sie gracz czerwony (out)
00E8: ilosc zuzytych znakow dla gracza bialego (out)
00E9: ilosc zuzytych znakow dla gracza czerwonego (out)
0C27: bufor kolizyjnych znakow zastepujacych
0D27: bufor kolizyjnych znakow zastapionych
6111: numer pierwszego wolnego znaku w generatorze do wykorzystania w rysunku postaci (poczawszy od $01 dla gracza bialego i od $41 dla czerwonego)(out);
6113: licznik znakow kolizyjnych (nakladajacych sie znakow obu graczy)(out);

0072,0073: adres danych graficznych klatki dla gracza bialego (in);
0074,0075: adres danych graficznych klatki dla gracza czerwonego (in);
0082-008D: bufor dlugosci linii gracza dla 12 linii tekstowych (in);
00DD: numer klatki animacji gracza bialego 0-55 (in);
00DE: numer klatki animacji gracza czerwonego 0-55 (in);
00E2: orientacja gracza bialego (0-normalna, /0-odwrocona)(in)
00E3: orientacja gracza czerwonego (0-normalna, /0-odwrocona)(in)
00E6: numer linii tekstowej (0-11), w ktorej rozpoczyna sie gracz bialy (in)
00E7: numer linii tekstowej (0-11), w ktorej rozpoczyna sie gracz czerwony (in)
6116: numer podklatki dla klatki $2B i $2F (zakres wartosci 0-3);
6118: starszy bajt adresu biezacego generatora znakow dla areny (in);
6197: numer podklatki dla klatki $33 dla bialego (zakres wartosci 0-64);
6198: numer podklatki dla klatki $33 dla czerwonego (zakres wartosci 0-64);

1B00-1BFF: tablica odbic lustrzanych wszystkich 256 bajtow dla trybu 4-kolorowego (2 bity na piksel);

6800: tablica 56 adresow 12-bajtowych form dla poszczegolnych klatek animacji postaci;
6880: tablica 56 adresow danych dla poszczegolnych klatek animacji postaci;
6BC0: tablica ilosci znakow dla poszczegolnych klatek animacji postaci;

4D10:
jezeli numer klatki to $2B lub $2F to wywoluje proc. 4C54 modyfikujaca tresc klatki (wirujace gwiazdki); jezeli numer klatki to $33 to wywoluje proc. 4CD6 modyfikujaca tresc klatki (mimika twarzy); proc. 4CD6 dodatkowo zwieksza o 1 zawartosc 6197 dla bialego (lub 6198 dla czerwonego) - na nastepna podklatke sekwencji mimiki; tresc klatki $33 zalezy od zawartosci 6197 (jej wartosci 0-64 sa indeksami trojwartosciowej tabeli 4C95;
