Procedury interpretera Basica
From Atariki
(Różnice między wersjami)
| Wersja z dnia 12:30, 7 kwi 2010 KMK (Dyskusja | wkład) ← Previous diff |
Wersja z dnia 16:57, 19 kwi 2010 Mono (Dyskusja | wkład) (znalezione błędy) Next diff → |
||
| Linia 78: | Linia 78: | ||
| </td><td><pre> | </td><td><pre> | ||
| 0460 EXIT CPY #$07</pre> | 0460 EXIT CPY #$07</pre> | ||
| + | </td></tr> | ||
| + | |||
| + | <tr><td>158</td><td>18</td><td>-</td> | ||
| + | <td><pre> | ||
| + | 0150 SAVDVC = $BCA8</pre> | ||
| + | </td><td><pre> | ||
| + | 0150 SAVDVC = $BAC0 | ||
| + | 0155 SETDVC = $BCA8</pre> | ||
| </td></tr> | </td></tr> | ||
| Linia 84: | Linia 92: | ||
| $A8F1 - RSTBRG - skasowanie rejestrów Basica</pre> | $A8F1 - RSTBRG - skasowanie rejestrów Basica</pre> | ||
| </td><td><i>usunąć</i> | </td><td><i>usunąć</i> | ||
| + | </td></tr> | ||
| + | |||
| + | <tr><td>184</td><td>-</td><td>28</td> | ||
| + | <td><pre> | ||
| + | $B0D2 - BINT - procedura obliczenia części całkowitej</pre> | ||
| + | </td><td><pre> | ||
| + | $B0D1 - BINT - procedura obliczenia części całkowitej</pre> | ||
| </td></tr> | </td></tr> | ||
Wersja z dnia 16:57, 19 kwi 2010
Mapa pamięci Atari XL/XE: Procedury interpretera BASIC-a to książka Wojciecha Zientary wydana w 1989 roku przez SOETO.
Jest to kompletny listing, wraz z komentarzem, interpretera Atari BASIC rev. C. Nakład 5050 egzemplarzy. Format A-5, 199 stron. Pierwotna cena 2500 zł (od trzech do sześciu złotych obecnych).
Wersja elektroniczna dostepna w Elektronicznym Archiwum Tajemnic Atari (w dziale: Książki)
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 |
| 158 | 18 | - | 0150 SAVDVC = $BCA8 | 0150 SAVDVC = $BAC0 0155 SETDVC = $BCA8 |
| 182 | - | 14 | $A8F1 - RSTBRG - skasowanie rejestrów Basica | usunąć |
| 184 | - | 28 | $B0D2 - BINT - procedura obliczenia części całkowitej | $B0D1 - BINT - procedura obliczenia części całkowitej |
| 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 |
