atarionline.pl
atarionline.pl Atari
Login:
Hasło:
Zapamiętaj mnie
Translate to RSS RSS
Wyniki Silly Venture 2024 Winter Edition z 2024-12-09 21:04 (9)
Ruszyła edycja zimowa Silly Venture 2024 z 2024-12-06 08:48 (16)
Historia Robbo w J2ME (Java) z 2024-12-04 20:10 (6)
Spowiedź autora symulatora lotu z 2024-12-01 13:44 (10)
11-latek naprawia komputer szachowy z 2024-11-30 12:08 (8)
Tajemnice Atari 5200 (KWAS #35) z 2024-11-27 00:44 (10)
Spotkanie z autorem gry "F-16 Falcon Strike" z 2024-11-22 15:06 (3)
Jak Xorcerer zrobił grafikę do dema STE? z 2024-11-22 14:12 (6)
Pomagamy Atarowcowi! z 2024-11-20 15:02 (28)
Wyniki ATASCII Compo 2024 z 2024-11-10 20:06 (13)
Wyniki konkursu ABBUC 2024 z 2024-11-02 15:54 (19)
Konkurs na grafikę ATASCII 2024 - głosowanie z 2024-10-27 23:34 (14)
Nowszy RECOIL z 2024-10-27 16:05 (0)
W sobotę KWAS #35 w Krakowie z 2024-10-16 00:17 (7)
Giełda 80/90 w Gdańsku z 2024-10-15 13:45 (5)
Pędź Mietku, pędź! z 2024-10-10 12:44 (42)
ATASCII Compo - 4. edycja z 2024-10-06 19:12 (16)
Gra "Dangerous City" uwolniona! z 2024-10-03 15:49 (25)
Miniaturowe Atari #2 z 2024-09-30 19:15 (13)
Wkrótce "Bubble Bobble" na Atari z 2024-09-27 10:34 (52)
«« nowszestarsze »»

Pomocnik/Helper
Gry/Games

Katalog gier (konwencja Kaz)
Aktualizacja: 2024-12-05
Liczba katalogów: 8501, liczba plików: 37171
Zmian katalogów: 43, zmian plików: 90

0-9 A B C D
E F G H I
J K L M N
O P Q R S
T U V W X
Y Z inne
zipCałość 2935 MB

Katalog gier (konwencja TOSEC)
Aktualizacja: 2021-07-11

Opisy gier
"Old Towers" (Atari ST) opisał Misza (19)
Submarine Commander opisał Kaz (35)
Frogs opisał Xeen (0)
Choplifter! opisał Urborg (0)
Joust opisał Urborg (16)
Commando opisał Urborg (35)
Mario Bros opisał Urborg (13)
Xenophobe opisał Urborg (36)
Robbo Forever opisał tbxx (16)
Kolony 2106 opisał tbxx (3)
Archon II: Adept opisał Urborg/TDC (9)
Spitfire Ace/Hellcat Ace opisał Farscape (8)
Wyspa opisał Kaz (9)
Archon opisał Urborg/TDC (16)
The Last Starfighter opisał TDC (30)
Dwie Wieże opisał Muffy (19)
Basil The Great Mouse Detective opisał Charlie Cherry (125)
Inny Świat opisał Charlie Cherry (17)
Inspektor opisał Charlie Cherry (19)
Grand Prix Simulator opisał Charlie Cherry (16)
«« nowszestarsze »»

Wewnętrzne/Internals



   Nowinki tworzone dzięki CuteNews
Archiwizowanie dyskietek
Jakub Husak napisał:

Niegdyś wpadłem na pomysł (inspirowany listem atarowca, który chciał zgrać sobie dyskietki i ma stację, ale nie miał kabelka) aby stworzyć możliwość przeniesienia atarowskiej dyskietki na PC. Zadałem pytanie na forum. A na konkurencyjnym portalu rozwalił mnie xxl, który mniej więcej napisał tak: Co się pytasz, chcesz, to napisz!

Pomysł polegał na utworzeniu czegoś w rodzaju manetofonowego turbo. Jednak zwolniony z dekodowania w locie oraz korzystając z możliwości uzyskania sygnału bardzo dobrej jakości mogłem uzyskać znacznie większe prędkości transmisji. Problem jajka i kury został rozwiązany tak: napisać króciutki programik w Basicu ze wstawką maszynową, który zamieni dyskietkę w dźwięk :).

Zacząłem bawić się tym tematem. Najpierw przetestowałem różne metody zapisu kilku bitów na raz, ale to jednak ślepa uliczka - kondensatory robią swoje, a i program miał być możliwie krótki. Powróciłem więc do starej sprawdzonej metody - długości impulsu. Ta metoda przypomina w wielkim uproszczeniu radiowe FM. Zero logiczne to impuls długości trwania jednej linii ekranu (sta WSYNC), jedynka logiczna - 2 linie ekranu - trudno się pomylić przy dekodowaniu. Nie jest problemem wygenerowanie na Atari takich sygnałów, trzeba tylko wyłączyć wszelkie przerwania: CLI + zablokować NMI w ANTIC oraz wyłączyć ekran.

W rezultacie powstał możliwie jak najkrótszy programik w Basic i łatwo przepisywalny.

Programik disk2snd.bas:

0 . DISK2SND COPIER
1 . WITHOUT ANY CABLES.
2 . BY JAKUB HUSAK, DATE:07.2012
4 . JUST RETYPE THIS PROGGY,
5 . PUT THE DISK INTO DRIVE 1
6 . YOU WANT TO CONVERT TO XFD,
7 . ENTER NUMBERS AND RECORD
8 . OUTGOING NOISE ON PC, THEN
9 . SAVE AS WAV AND FEED THE PC APP
10 SUM=13218 : PLEN=145
11 POKE 65,0: DIM A$(4), B$(512)
12 FOR I=1 TO PLEN*2 STEP 4: READ A$: B$(I,I+4)=A$:N.I
13 FOR I=1 TO PLEN*2 STEP 2: VAL=(ASC(B$(I))-65)*16+
ASC(B$(I+1))-65:POKE 1536+(I-1)/2,VAL:SUM=SUM-VAL:N.I
14 IF SUM<>0 THEN ? "DATA ERROR": END
15 ? "START SEC?": I. SSEC
16 ? "END SEC?": I. ESEC
17 ? "SECT LEN [1]28/[2]56?":I. SLEN
18 FOR I=SSEC TO ESEC: ? "READING SECTOR: ";I,"ST: ";:
? USR(1543,I,I,128+(I>3)*(SLEN=2)*128): N.I
19 ? "OPERATION COMPLETED." : END
20 D. DBAB,FCEA,AIAE,BOKC,AGLN
21 D. AAAG,JNAA,ADGI,JNAI,ADMK
22 D. BAPD,CAFJ,OEIF,NFIE,NEBA
23 D. ABGA,HICA,FIAG,KJFH,IFDB
24 D. CAGI,AGKC,AJIN,AKNE,CAGC
25 D. AGNA,PICA,GFAG,KAAE,KJAI
26 D. IFHO,KJAD,IFHP,CAHG,AGOG
27 D. HPKM,AIAD,CAHG,AGKF,DBKA
28 D. AACA,HJAG,KAEA,KJCC,IMAO
29 D. NEIN,AANE,FIGA,JAAD,INAK
30 D. NEKF,DFCM,KJBP,EJAP,IFDF
31 D. INAK,NEIN,ABNC,MKGA,IILB
32 D. HOIF,DCBI,GFDB,CKGJ,AAIF
33 D. DBKC,AHAG,DCCA,GAAG,BAPJ
34 D. MAAA,NAOG,GA




Programik pobiera 3 liczby i uruchamia w pętli procedurkę czytającą sektor dyskietki oraz kodującą go na dźwięk (zgrzyty i piski). Osiągnięta prędkość przesyłu danych wewnątrz sektora to średnio 1.4 kB/sek (od 1kB/sek gdy są same FF, do 2 kB/sek, gdy same zera). Z ciekawostek - każdy zakodowany sektor ma sygnał pilotujący - 8 zboczy długości 3 linii ekranu. Dlaczego 3? Aby nie interferował się z odczytem z dyskietki pustych bajtów, których bity startu i stopu generują falę o długości niemal równej czterem liniom obrazu (w standardowej prędkości transmisji) - podszedłem do tematu zapobiegawczo, aczkolwiek w praktyce wyszło, że nie ma to znaczenia, ponieważ głośność sygnału właściwego jest dużo większa.

Dla ciekawskich zawartość linii data w formacie mads assembler (145 bajtów!):

OPT h-
org $607 - basic_entry + siotable
tmp = $32
vedge =$35
buffer =$408
seclen = DDEVIC+8
icl "atari.asm"
siotable
.by $31 $01 'R' $40
; +4
.wo buffer
; +6
.by 30
basic_entry
ldx #6
nsiotab
lda siotable,x
sta DDEVIC,x
pla
sta DDEVIC+8,x
dex
bpl nsiotab
jsr SIOV
sta $d5 ; 0
sty $d4 ; 1 if ok
spl:rts

sei
jsr nmi ; 1->NMIEN 0->DMACTL
loop:
lda #$57
sta chksum
jsr zero
ldx #9
nedge
sta WSYNC
jsr ledge
bne nedge
jsr edge

ldy #4
mwa #seclen $7e
jsr outsector

; lsb are the same, buffer one page further
inc $7f
ldy seclen
jsr outsector
lda chksum
ldy #0
jsr outbyte
ldy #$40
lda #$22
nmi sty NMIEN
sta DMACTL
cli
rts
cedge bcc edge
ledge sta WSYNC
edge:
lda vedge
; skip next two bytes
.byte $2C ; bit Q
zero:
lda #$1f
eor #$0f
sta vedge
sta WSYNC
sta AUDC1
dex
rts
outsector
dey
lda ($7e),y
outbyte
sta tmp
clc
adc chksum
rol
adc #0
sta chksum
ldx #7
loop2
asl tmp
jsr cedge
bpl loop2
cpy #0
bne outsector
rts


Na początku były 192 bajty, potem 179 (już news miał być opublikowany) i teraz 145 :) Mam nadzieję, bo nie testowałem, że będzie działał na innych SO, niż oryginalny, ponieważ wykorzystuje wartości w rejestrach po powrocie z SIOV. Jest pole do popisu:) a zatem... Konkurs! Za każde 2 bajty ukręcone powyższemu kodowi w asemblerze, przy zachowaniu pełnej funckjonalności, daję jedną gwiazdkę SZACUNU! Warunek: nie przenosimy nic do Basica.

Zakodowana dyskietka SD zajmuje czas około 2 minut, DD około 4,5 minuty. Można zapisać taką falę jako WAV mono 8 bitów, po zzipowaniu będzie miał 1-2 MB, można to wysłać komuś pocztą :). Uwaga! WAV może być mono lub stereo, 8 lub 16 bitów, bez kompresji (PCM), ale musi mieć 44.1 KHz.

Po stronie PC powstał programik - dekoder - nazywa się AuDecoder. Napisany we FreePascalu, działa pod MacOS X, Windows, a może też i pod Linuksem (nie pokusiłem się jeszcze o skompilowanie). Zawsze można uruchomić AuDecoder pod Wine :).



Dołożyłem wszelkich starań, aby WAV wrzucony do AuDecoder mógł mieć dowolną głośność. Taki rezultat osiągnąłem - jeśli ktoś utworzy obraz dyskietki, który nie wchodzi do AuDecoder, to proszę o przysłanie mi go do testów.

Program jest typu freeware. Można go sobie ściągnąć stąd. Uwaga! Wersja PC na razie jest bez podpisu, więc antywirusowe oprogramowanie może różne cuda z tym wyczyniać (włącznie z usuwaniem aplikacji z dysku :). Miłego użytkowania!

2012-07-22 22:46 by Jakub Husak
komentarzy: 0
nickname
e-mail / website (opcjonalnie)

Aktualne tematy
Time Wizard Deluxe Edition - wyda... (19)
ostatni: 11-12-2024 18:46, Mq
RMT hacking (263)
ostatni: 11-12-2024 17:31, emkay
[S] A8 Pico Sio (1)
ostatni: 11-12-2024 17:29, zaxon
Magnetofon Ca12 nie zamyka klapki (7)
ostatni: 11-12-2024 15:06, jhusak
Zdekompletowane płyty do XE (7)
ostatni: 11-12-2024 10:36, takron27
Why does it take decades for the ... (1)
ostatni: 11-12-2024 08:47, emkay
Muzycy scenowi... (122)
ostatni: 10-12-2024 22:52, mayonez
Silly Venture 2024WE - in tribute... (131)
ostatni: 10-12-2024 21:44, pirx
Płytka Composite dla małego ATARI (17)
ostatni: 10-12-2024 20:12, Irekl
MGR Zygadło - zakończenie emisji ... (2)
ostatni: 10-12-2024 11:56, starymarabut
Poison - Adam Gilmore music covers (7)
ostatni: 10-12-2024 10:31, poison
Time Wizard - gra na ABBUC Softwa... (323)
ostatni: 10-12-2024 00:22, slaves
Husakoło - Tribute to Jakub Husak (5)
ostatni: 09-12-2024 21:45, miker
Ciekawostki (5593)
ostatni: 09-12-2024 19:10, rozyk
Gier kreatory i edytory (68)
ostatni: 09-12-2024 18:44, mono

Kategorie Forum Atarum

Użytkowników: 2862
Ostatnio zarejestrowany: RafałSikorski
Postów ostatniej doby: 17

Spotkania i zloty/Meetings & Parties

Najbliższe imprezy
link do naszych spotkań online, zapraszamy do odwiedzenia kanału zoom również przez kod QR:

KWAS

Kalendarz AOL


Społeczność/Community


Rozmawiali
Wywiad z Mariuszem Jaroszem i Kaz (14)
Wywiad Dracona z Mr. Bacardim i Kaz (16)
Tomasz Dajczak i Kaz (22)
Lech Bąk i "Świat Młodych" i Kaz (26)
Michał "Mike" Jaskuła i Kaz (30)
F#READY i Dracon (22)
Daniel „Arctus” Kowalski i Dracon (25)
KATOD i TDC (15)
Mariusz Wojcieszek i "Adam" (17)
Romuald Bacza i Ramos (16)
Śledzenie Amentesa i Larek (9)
Leszek Łuciów i Charlie Cherry (17)
TO JUŻ ZA TOBĄ: rozmowa z Bobem Pape i cpt. Misumaru Tenchi (39)
Rob Jaeger i Emu (53)
Jacek "Tabu" Grad i Dracon (0)
Alexander "Koma" Schön i Kaz (0)
Maciej Ślifirczyk i Charlie Cherry (0)
Jarek "Odyniec1" Wyszyński i Kaz (0)
Marek Bojarski i Kaz (0)
Olgierd Niemyjski i Ramos (0)
«« nowszestarsze »»

Stragan
Nowe, pojemniejsze RAM-Carty oferuje Kaz (21)
"mouSTer" czyli myszka ST oferuje Kaz (30)
Atari USBJoy Adapter oferuje Jakub Husak (0)
Programy: Kolony 2106 oferuje Kaz (7)
Sprzęt: rozszerzenia oferuje Lotharek (134)
Gadżety: naklejki, pocztówki oferuje Sikor (11)
Sprzęt: cartridge RAM-CART oferuje Zenon (7)
Miejsce na drobne ogłoszenia kupna/sprzedaży oferuje Kaz (58)
Sprzęt: interfejs SIO2IDE oferuje Piguła (0)
Sprzęt: interfejs SIO2SD oferuje Piguła (58)

Użytki/Utils
Sprzęt/Hardware

Wynalazki
Atari i Bluetooth napisał Kaz (34)
SIO2PC-USB napisał Larek (45)
Nowe SIO2SD napisał Larek (0)
SIO2SD w CA12 napisał Urborg (12)
Ratowanie ATMEL-ów napisał Yoohaas (12)
Projektowanie cartów napisał Zenon (12)
Joystick do Atari napisał Larek (54)
Tygrys Turbo napisał Kaz (11)
Testowałem "Simple Stereo" napisał Zaxon (5)
Rozszerzenie 1MB napisał Asal (20)
Joystick trzyprzyciskowy napisał Sikor (18)
Moje MyIDE oraz SIO2PC na USB napisał Zaxon (16)
Jak wykonać płytkę drukowaną? napisał Zaxon (26)
Rozszerzenie 576kB napisał Asal (36)
Soczyste kolory napisał scalak (29)
XEGS Box napisał Zaxon (13)
Atari w różnych rolach napisał Różyk (9)
SIO2IDE w pudełku napisał Kaz (5)
Atari steruje tokarką napisał Kaz (15)
DarkMouse napisał Kaz (7)
«« nowszestarsze »»