procedura umieszcza w buforze areny znaki tworzace forme gracza;

4B13    LDY #$0B            ; 2cyc ; A0 0B
4B15    LDA #$00            ; 2cyc ; A9 00
4B17    STA $0082,Y ;VNTP   ; 5cyc ; 99 82 00
4B1A    STA $008E,Y ;RUNSTK ; 5cyc ; 99 8E 00
4B1D    DEY                 ; 2cyc ; 88
4B1E    BPL $4B17           ; 2cyc ; 10 F7
4B20    LDY #$01            ; 2cyc ; A0 01
4B22    LDA $D2             ; 3cyc ; A5 D2
4B24    ASL                 ; 2cyc ; 0A
4B25    TAX                 ; 2cyc ; AA
4B26    BEQ $4B2A           ; 2cyc ; F0 02
4B28    LDY #$41            ; 2cyc ; A0 41
4B2A    STY $6111           ; 4cyc ; 8C 11 61
4B2D    STY $61 ;FKDEF+1    ; 3cyc ; 84 61
4B2F    LDA #$00            ; 2cyc ; A9 00
4B31    STA $6113           ; 4cyc ; 8D 13 61
4B34    STA $D6 ;FR0+2      ; 3cyc ; 85 D6
4B36    STA $60 ;FKDEF      ; 3cyc ; 85 60
4B38    LDA $6A,X ;RAMTOP   ; 4cyc ; B5 6A
4B3A    STA $62 ;PALNTS     ; 3cyc ; 85 62
4B3C    LDA $6B,X ;BUFCNT   ; 4cyc ; B5 6B
4B3E    STA $63 ;LOGCOL     ; 3cyc ; 85 63
4B40    LDA $6E,X ;BITMSK   ; 4cyc ; B5 6E
4B42    STA $64 ;ADRESS     ; 3cyc ; 85 64
4B44    LDA $6F,X ;SHFAMT   ; 4cyc ; B5 6F
4B46    STA $65 ;ADRESS+1   ; 3cyc ; 85 65
4B48    LDX $D2             ; 3cyc ; A6 D2
4B4A    LDA $E2,X ;FR1+2    ; 4cyc ; B5 E2
4B4C    STA $5D ;OLDCHR     ; 3cyc ; 85 5D
4B4E    LDY $D6 ;FR0+2      ; 3cyc ; A4 D6
4B50    LDA ($62),Y ;PALNTS ; 5cyc ; B1 62
4B52    STA $0082,Y ;VNTP   ; 5cyc ; 99 82 00
4B55    BEQ $4BCF           ; 2cyc ; F0 78
4B57    AND #$0F            ; 2cyc ; 29 0F
4B59    STA $5E ;OLDADR     ; 3cyc ; 85 5E
4B5B    STA $0082,Y ;VNTP   ; 5cyc ; 99 82 00
4B5E    LDX $60 ;FKDEF      ; 3cyc ; A6 60
4B60    BNE $4B69           ; 2cyc ; D0 07
4B62    LDX $D2             ; 3cyc ; A6 D2
4B64    TYA                 ; 2cyc ; 98
4B65    STA $E6,X ;FR2      ; 4cyc ; 95 E6
4B67    INC $60 ;FKDEF      ; 5cyc ; E6 60
4B69    LDA ($62),Y ;PALNTS ; 5cyc ; B1 62
4B6B    LSR                 ; 2cyc ; 4A
4B6C    LSR                 ; 2cyc ; 4A
4B6D    LSR                 ; 2cyc ; 4A
4B6E    LSR                 ; 2cyc ; 4A
4B6F    STA $008E,Y ;RUNSTK ; 5cyc ; 99 8E 00
4B72    LDX $5D ;OLDCHR     ; 3cyc ; A6 5D
4B74    BEQ $4B89           ; 2cyc ; F0 13
4B76    LDA #$09            ; 2cyc ; A9 09
4B78    SEC                 ; 2cyc ; 38
4B79    SBC $008E,Y ;RUNSTK ; 4cyc ; F9 8E 00
4B7C    TAX                 ; 2cyc ; AA
4B7D    SEC                 ; 2cyc ; 38
4B7E    SBC $5E ;OLDADR     ; 3cyc ; E5 5E
4B80    STA $008E,Y ;RUNSTK ; 5cyc ; 99 8E 00
4B83    TAY                 ; 2cyc ; A8
4B84    STX $5E ;OLDADR     ; 3cyc ; 86 5E
4B86    JMP $4B8F           ; 3cyc ; 4C 8F 4B
4B89    TAY                 ; 2cyc ; A8
4B8A    CLC                 ; 2cyc ; 18
4B8B    ADC $5E ;OLDADR     ; 3cyc ; 65 5E
4B8D    STA $5E ;OLDADR     ; 3cyc ; 85 5E
4B8F    LDX $6111           ; 4cyc ; AE 11 61
4B92    LDA ($64),Y ;ADRESS ; 5cyc ; B1 64
4B94    BEQ $4BC1           ; 2cyc ; F0 2B
4B96    BPL $4BB0           ; 2cyc ; 10 18
4B98    STX $5F ;OLDADR+1   ; 3cyc ; 86 5F
4B9A    LDX $6113           ; 4cyc ; AE 13 61
4B9D    INC $6113           ; 6cyc ; EE 13 61
4BA0    STA $0D27,X         ; 5cyc ; 9D 27 0D
4BA3    LDA $5F ;OLDADR+1   ; 3cyc ; A5 5F
4BA5    AND #$7F            ; 2cyc ; 29 7F
4BA7    STA $0C27,X         ; 5cyc ; 9D 27 0C
4BAA    TAX                 ; 2cyc ; AA
4BAB    ORA #$80            ; 2cyc ; 09 80
4BAD    JMP $4BC2           ; 3cyc ; 4C C2 4B
4BB0    STX $5F ;OLDADR+1   ; 3cyc ; 86 5F
4BB2    LDX $6113           ; 4cyc ; AE 13 61
4BB5    INC $6113           ; 6cyc ; EE 13 61
4BB8    STA $0D27,X         ; 5cyc ; 9D 27 0D
4BBB    LDA $5F ;OLDADR+1   ; 3cyc ; A5 5F
4BBD    STA $0C27,X         ; 5cyc ; 9D 27 0C
4BC0    TAX                 ; 2cyc ; AA
4BC1    TXA                 ; 2cyc ; 8A
4BC2    STA ($64),Y ;ADRESS ; 6cyc ; 91 64
4BC4    INX                 ; 2cyc ; E8
4BC5    INY                 ; 2cyc ; C8
4BC6    CPY $5E ;OLDADR     ; 3cyc ; C4 5E
4BC8    BCC $4B92           ; 2cyc ; 90 C8
4BCA    BEQ $4B92           ; 2cyc ; F0 C6
4BCC    STX $6111           ; 4cyc ; 8E 11 61
4BCF    INC $D6 ;FR0+2      ; 5cyc ; E6 D6
4BD1    CLC                 ; 2cyc ; 18
4BD2    LDA $64 ;ADRESS     ; 3cyc ; A5 64
4BD4    ADC #$30            ; 2cyc ; 69 30
4BD6    STA $64 ;ADRESS     ; 3cyc ; 85 64
4BD8    BCC $4BDC           ; 2cyc ; 90 02
4BDA    INC $65 ;ADRESS+1   ; 5cyc ; E6 65
4BDC    LDY $D6 ;FR0+2      ; 3cyc ; A4 D6
4BDE    CPY #$0C            ; 2cyc ; C0 0C
4BE0    BCS $4BE5           ; 2cyc ; B0 03
4BE2    JMP $4B50           ; 3cyc ; 4C 50 4B
4BE5    LDX $D2             ; 3cyc ; A6 D2
4BE7    LDA $6111           ; 4cyc ; AD 11 61
4BEA    SEC                 ; 2cyc ; 38
4BEB    SBC $61 ;FKDEF+1    ; 3cyc ; E5 61
4BED    STA $E8,X ;FR2+2    ; 4cyc ; 95 E8
4BEF    RTS                 ; 6cyc ; 60

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 (out)
0D27: bufor kolizyjnych znakow zastapionych (out)
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);

Uwagi:
-zastepowanie znakow w buforze areny powoduje zachowanie wartosci ich najstarszego bitu;
-znaki zastepujace w buforze 0C27 zawsze maja skasowany najstarszy bit;
-forma gracza sklada sie z 12 bajtow ("xc") odpowiadajacych kazdej linii tekstowej areny; starsze 4 bity kazdego bajtu ("x") okreslaja przesuniecie (w prawo wzgledem lewej krawedzi formy) pierwszego znaku gracza w danej linii a mlodsze 4 bity ("c") okreslaja ilosc znakow w tej linii; w rzeczywistosci do kazdej linii wstawianych jest c+1 znakow;
-maksymalna szerokosc formy gracza wynosi 10 znakow + 1 pusty znak;
-orientacja odwrotna gracza oznacza narysowanie lustrzanego odbicia jego formy wzgledem osi pionowej;
