Zrób w lini 130:

130 READ A$ 

zamiast READ A (nie zapomnij o rezerwacji miejsca dla A$) - zrozumiesz, co się stało.

Zachowanie odpowiada interpretacji bloku DATA dla Atari Basic.

Narzuca się inne pytanie: jak w liniach DATA przemycić do zmiennej PRZECINEK?

Ja robię to tak, że inny znak w foncie przypisuję jako przecinek - jakiś mało używany lub mi niepotrzebny (często jest to średnik, aby mi się nie myliło).

Wiesz, wszystko ma swoje "zady i walety"... (screen-shot poniżej, widać go jak jesteś zalogowany)

EDIT: ^^^ może doprecyzuję wypowiedź... bo zaraz jakiś flame-war się nam rozpęta, a nie o to mi chodzi... wiem że mogłem użyć cudzysłowów, ale chodziło mi o pokazanie niezgodności w obie strony. To że jedna implementacja języka różni się od tej na innej platformie jest całkiem zrozumiałe :) A ponieważ ja na BASIC-u C64 nie znam się kompletnie, to dla mnie zdziwienie budzi niemożność używania ":" lub konieczność używania " w przypadku zmiennych tekstowych :D Ciebie zdziwiła niemożliwość komentowania czy użycia ":" w liniach DATA ... a dla mnie to zupełnie naturalne :)

Pamiętaj o tym że w tamtych czasach BASIC musiał się zmieścić w 8KB kości ROM, więc wszystkie te "smaczki" i różnice, wynikają z różnego podejścia autorów różnych interpreterów, to optymalizacji i skracania ich kodu. Dodatkowo użycie " powoduje że oprócz przecinków nie możesz używać znaku cudzysłowu. A więc znowu coś kosztem czegoś.

Prawdę mówiąc wolę tak jak jest w Atari BASIC, ponieważ nie bardzo rozumiem po komentować coś na końcu linii DATA, to jest po prostu mało czytelne, nie lepiej pisać po prostu:

10 REM --- dane wyssane z palca ---
20 DATA 10,20,30,OZON, BOZON, 1,2,3,4,8,-16,-32,3.14519

EDIT2: Ale ta cała dyskusja to jest czysto akademicka i nie ma wydaje się że teoretycznie najmniejszego sensu :) Bo skoro znasz dany dialekt/interpreter to będziesz widział co zrobić w razie napotkania takich kwiatków przy przenoszeniu programów z innych platform. A jeżeli ktoś nie wiedział (np. tak jak ja że w C64 BASIC tak można) to już wie... właśnie dzięki temu że poruszyłeś ten temat na forum! :)

No jak widzisz takie dinozaury jak ja które żyły długo w jaskini gdzie było tylko Atari... to się na starość dziwią że inne interpretery takie rzeczy dopuszczają. Zresztą przyznaję ze nie wiem jak jest w innych dostępnych dla Atari BASIC-ach... jest tego przecież trochę, i pewnie jeszcze parę innych.

Prawdę mówiąc "otworzyłeś mi oczy", i dlatego prze-edytowałem swój wcześniejszy post... bo jak zwykle chcąc szybko odpowiedzieć dokonałem zbytnich uproszczeń i wyszło dość grubiańsko, co nie było moim celem. Cieszę się ze pojawiają się takie posty jak Twój bo człowiek może dowiedzieć się czegoś nowego, a nie żyć w błędnym przeświadczeniu ze gdzie indziej jest tak samo! :)

Dzięki za te informacje!

Moja ignorancja i nieznajomość różnic tego typu może wynikać również z tego że dość szybko skierowałem swoje kroki w stronę assemblera i przestałem się interesować światem BASIC-ów... chociaż Turbo Basic XL, długo służył mi do wykonywania jakichś pomocniczych obliczeń bazujących na liczbach FP :)

Spoko, choć temat jest pozornie mało istotny, na tyle mnie zaintrygował, że mam zamiar:
- w wolnej chwili sprawdzić to zagadnienie na wszystkich posiadanych platformach retro,
- sprawdzić to samo na innych BASIC-ach dla Atari,
- zrobić z tego jakiś wpis, albo nawet  filmik na YT (w zasadzie kiedyś trzeba :)).

Generalnie wydaje mi się, że problem w ATARI BASIC może wynikać z "niechęci" jego twórców do zmiennych tekstowych. Jest to jedyny, znany mi dialekt, gdzie trzeba używać do tego deklaracji DIM (wszędzie indziej tak się deklaruje jedynie tablice - w tym liczbowe i tekstowe) oraz.. gdzie można łańcuchy znaków umieszczać w bloku DATA bez cudzysłowów - i pewnie tu jest "pies pogrzebany":

1000 DATA ARBUZ, KOTEK, GRZYB, 114, 12

W innych dialektach byłoby:

1000 DATA "ARBUZ", "KOTEK", "GRZYB", 114. 12

... i wówczas nie ma żadnego problemu z odróżnieniem stringu od innych danych w linii.

Jest to o tyle ciekawe, że jakby w tym momencie zamknęło się pewne koło. ;-) Wszak wcześniej Bill G. pracował przez rok dla Atari, a jego zadaniem było... znalezienie bugów w BASIC-u i przekazanie raportu firmie. Efekt ponoć był taki, że Bill G. dostał kod źródłowy od Atari do analizy, przez rok nic nie zrobił i.. nawet jakąś kasę wziął, a kilka miesięcy potem, ukazał się... MS BASIC. :)

Szczerze mówiąc, w pozostałych dialektach spotkałem się tylko z użyciem DATA i mozolnym wstawianiem liczb 8-mio bitowych (ok, niekiedy można użyć liczb w hex, ale to tyle). Z umieszczaniem kodu w stringu i użyciem A=USR(ADR(A$)) spotkałem się tylko w ATARI BASIC jak dotąd.