Procedury interpretera Basica
From Atariki
(Różnice między wersjami)
Wersja z dnia 20:51, 25 kwi 2005 KMK (Dyskusja | wkład) (→Errata) ← Previous diff |
Wersja z dnia 20:53, 25 kwi 2005 KMK (Dyskusja | wkład) (→Errata) Next diff → |
||
Linia 26: | Linia 26: | ||
<tr><td>41</td><td>-</td><td>16</td> | <tr><td>41</td><td>-</td><td>16</td> | ||
- | <td><pre>Po ustawieniu | + | <td>Po ustawieniu wszystkich bitów statusu |
- | wszystkich bitów statusu | + | </td><td> |
- | </pre></td><td> | + | Po ustawieniu wskaźnika stosu na $FF |
- | <pre>Po ustawieniu | + | </td></tr> |
- | wskaźnika stosu na $FF | + | |
- | </pre></td></tr> | + | |
<tr><td>88</td><td>-</td><td>18</td> | <tr><td>88</td><td>-</td><td>18</td> | ||
Linia 86: | Linia 84: | ||
</td></tr> | </td></tr> | ||
- | <tr><td>185</td><td>5</td><td>-</td> | + | <tr><td>185</td><td>4</td><td>-</td> |
<td><pre> | <td><pre> | ||
+ | $B567 - PUTTXT - wyświetlenie tekstu na ekranie | ||
$B586 - PTMSG2 - wyświetlenie raportu na ekranie</pre> | $B586 - PTMSG2 - wyświetlenie raportu na ekranie</pre> | ||
</td><td><pre> | </td><td><pre> | ||
+ | $B567 - PUTTXT - wyświetlenie tekstu na ekranie | ||
$B581 - PTMSG1 - wyświetlenie raportu na ekranie | $B581 - PTMSG1 - wyświetlenie raportu na ekranie | ||
$B586 - PTMSG2 - wyświetlenie raportu na ekranie</pre> | $B586 - PTMSG2 - wyświetlenie raportu na ekranie</pre> |
Wersja z dnia 20:53, 25 kwi 2005
Książka Wojciecha Zientary "Mapa pamięci Atari XL/XE: Procedury interpretera BASIC-a"
Jest to kompletny listing, wraz z komentarzem, interpretera Atari BASIC wer. C. Wydano w roku 1989. Nakład 5050 egzemplarzy. Format A-5, 199 stron. Pierwotna cena 2500 zł. (od trzech do sześciu złotych obecnych).
Errata
Strona | Wiersz od góry | Wiersz od dołu | Jest | Powinno być |
41 | 15 | - | 1770 Q37 .BYTE $C3,$C8,$03 ;Q38 or end |
1770 Q37 .BYTE $C3,$C8,$03 ;Q38 Q44 end |
41 | 19 | - | 1810 .BYTE $C4,B3,$02,$03 |
1810 Q44 .BYTE $C4,$B3,$02,$03 |
41 | - | 16 | Po ustawieniu wszystkich bitów statusu |
Po ustawieniu wskaźnika stosu na $FF |
88 | - | 18 | 0470 LDA #$BD 0480 CLC 0490 ADC RADFLG 0500 TAX 0510 LDY #$BE |
0470 LDA #<TSCC+$1F 0480 CLC 0490 ADC RADFLG 0500 TAX 0510 LDY #>TSCC+$1F |
89 | - | 2 | -4.681754355*10-7 | -4.681754355*10-3 |
90 | 8 | - | 0180 .BYTE $BC,$46,$81 | 0180 .BYTE $BE,$46,$81 |
117 | - | 6 | 0130 JTSTROM = $E480 | 0130 JTSTROM = $E471 |
144 | 32 | - | 0410 CPX #$07 | 0410 CPY #$07 |
144 | 37 | - | 0460 EXIT CPX #$07 | 0460 EXIT CPY #$07 |
182 | - | 14 | $A8F1 - RSTBRG - skasowanie rejestrów Basica | usunąć |
185 | 4 | - | $B567 - PUTTXT - wyświetlenie tekstu na ekranie $B586 - PTMSG2 - wyświetlenie raportu na ekranie | $B567 - PUTTXT - wyświetlenie tekstu na ekranie $B581 - PTMSG1 - wyświetlenie raportu na ekranie $B586 - PTMSG2 - wyświetlenie raportu na ekranie |