Autor Wątek: Moje STARTy / menu dyskowe.  (Przeczytany 44903 razy)

trojacek

  • *****
  • Wiadomości: 6831
  • Miejsce pobytu:
    Warszawa
Odp: Moje STARTy / menu dyskowe.
« Odpowiedź #75 dnia: 2020.05.19, 00:58:40 »
OK, dzięki :)
Znalazłem też przykład, który był w... Bajtku 11/1992:


tdu

  • *****
  • Wiadomości: 926
  • Miejsce pobytu:
    Gdansk
    • Nasze Wędrowanie
Odp: Moje STARTy / menu dyskowe.
« Odpowiedź #76 dnia: 2023.06.26, 16:21:38 »
Program jest rozwinięciem pomysłu, który pojawił się w tym wątku.
Wydaje się że jest na tyle dopracowany żę można go używać bez problemowo.

START dla FDD3000 który tworze od prawie dwóch miesięcy,
powinien on się znaleźć na każdej dyskietce działającej z TOS

Program czyta katalog dyskietki, sortuje go i wyświetla
w porcjach po 15 plików (klawisze 1,q,a,z)

Wczytanie programów (tylko basic), klawisz ENTER.

Ponadto w menu1 ogólne
I info o dostepnych dyskach
S nagranie programu START
F format na 140kB
G format na 620kB
K katalog systemowy
L wczytanie z tasmy
J kopia całej zawartości dyskietki

menu2 plikowe
K kopia pliku
U usuwanie pliku
Z zmiana nazwy pliku
I info o pliku

Program mieści się w 4kB czyli jednostce alokacji dla dysków 620kB

Program nie obsługuje katalogów i atrybutów, przynajmniej w tej wersji,
nie wiem czy warto to dorabiać bo mało kto i tak z tego korzysta,
a wydłuży to czas odczytu dyskietki, co i teraz jest na granicy akceptacji.
Poza tym program zajmie już kolejne 4kB.

Czas odczytu dyskietki można skrócić przez edycje linii 2 programu
zmieniając LET z=64, na wartość mniejszą np.32, zleży to od ilości
plików na dyskietce, w typowych zastosowaniach 140kB powinno wystarczyć
z=20, ale dla ekstremistów może być pełne 128, tyle maksymalnie plikow
może by na dyskietce.

Nie gwarantuje że program jest bez wad, więc liczę na Wasze uwagi,
powstanie wtedy kolejna poprawiona wersja.

Podziękowania dla Matofesi za wykonanie kodu sortującego tablicę z nazwami plików.
ZX81/ZX 48k/Zx48k+/ZX +2/ZX +2A/+3/TC2048/FDD3000/FDD5000/3"/3,5'/5,25'/Beta 48k Apina/D+/GP50s/DIVIDE CF/Masterface/Polbasic SamCoupe QL CPC6128/N100 MSX-SVI738  MSX2-VG8235