Hej!

Udało się ;) działa zarówno pod Linux (kompilowałem/testowałem na Debian 7.3), jak i pod Windows dzięki MinGW. Jeżeli komuś się przyda wersja 1.1.6 (wraz z patch-em od mono) skompilowana pod Windows, proszę bardzo: franny_1.1.6

Co prawda mam kilka problemów z moimi starymi ATR-ami, ale nie miałem czasu jeszcze wnikać dlaczego tak się dzieje. Efekt jest taki:

C:\franny>franny.exe -f a -I games.ATR
Disk label:       AtariDOS
File system type: Atari DOS II
Density:          custom (256 bytes per sector)
Total Sectors:    65535 (16776960 bytes)
Free Sectors:     32572 (8240716 bytes)
Image Type:       standard
Image Media:      ATR

ale potem już:

C:\franny>franny.exe -f a -L games.ATR
Total: 0 files.

Obraz stworzony w dawnych czasach (około 2005 roku, nie pamiętam czym robiłem ATR-a ale używałem SIO2PC oraz My-DOS 4.53).

ps) celowo piszę post pod postem, aby zainteresowani zobaczyli iż coś się w wątku dzieje :)

Cześć!

Mono dzięki za patch-a, ale skąd zassać wersję 1.1.6 o której wspominał bober, ja na sf.net widzę tylko wersję 1.13:

http://sourceforge.net/projects/atari8/files/franny/

rozumiem iż twój patch jest do wersji 1.1.6?

Hej!

Dziękuję za pamięć! :)

A co do Slight-SID to czekam na przesyłkę od chińczyka z gniazdami i innymi pierdołami. Chiński nowy rok się zbliża mam nadzieję że do Polski przed tym okresem.

a może... Desmond's Dungeon??

thanx!

nawet bardzo atrakcyjny, popatrzyłem na źródło depackera dla 6502 :) rewelacja :) i jeszcze jest miejsce na optymalizację :D

prawdę mówiąc straciłem chyba orientację kto co na serio, a kto co na poważnie :)

@willy: no specjalnie dla Ciebie, wersja bez USR i żadnego POKE :) Pure Atari BASIC Power!

10 GRAPHICS 5+16
15 SETCOLOR 0,3,8:SETCOLOR 1,12,8
20 IF O<>Q THEN PUT #6,125:O=Q
25 COLOR 1:IF STRIG(0) THEN COLOR 2
30 X=40:Y=20:PLOT X,Y
35 Q=STICK(0):B=Q
40 IF (B/2)=INT(B/2) THEN Y=Y-20
41 B=INT(B/2)
42 IF (B/2)=INT(B/2) THEN Y=Y+20
43 B=INT(B/2)
44 IF (B/2)=INT(B/2) THEN X=X-20
45 B=INT(B/2)
46 IF (B/2)=INT(B/2) THEN X=X+20
60 DRAWTO X,Y
90 GOTO 20

ps1) dodam iż to wersja bez optymalizacji i istnieje tutaj spora możliwość przyspieszenia tego :]
ps2) mam nadzieję iż domyślacie się że jaja sobie robię i że można to załatwić bez karkołomnych obliczeń FP :)

bezrobotny jest tylko pretekstem ;) Bo powiedz mi jakbyś skomentował mój post pt. "popełniłem super-megaz-giha-hyper test Joysticka w Atari BASIC!" ;-) he he he :) i do kompletu temat pt "test JOY-a"... to ostatnie co by mi przyszło do głowy :P

ps) wybacz Zenon że używam starej nazwy,  ale nawet nie jestem w stanie poprawnie wymówić Twojej nazwy Joysticka ;)

a wiesz Zenon iż myślałem aby dodać dźwięki :) Może pomyślę nad atrakcyjnymi dźwiękami w wersji V2 :P

Panowie,

To zupełnie nie tak... wasz kod jest zupełnie nieczytelny i niezrozumiały... to musi być tak:

10 GOSUB 1000:GRAPHICS 5+16
15 POKE 708,200:POKE 709,56
20 IF O<>Q THEN PUT #6,125:O=Q
25 COLOR 2:IF PEEK(644) THEN COLOR 1
30 X=40:Y=20:PLOT X,Y
35 Q=PEEK(632)
40 IF USR(1536,Q,4)=0 THEN X=X-20
41 IF USR(1536,Q,8)=0 THEN X=X+20
50 IF USR(1536,Q,1)=0 THEN Y=Y-20
51 IF USR(1536,Q,2)=0 THEN Y=Y+20
60 DRAWTO X,Y
90 GOTO 20
999 END 
1000 RESTORE 1001:FOR I=1536 TO 1551:READ D:POKE I,D:NEXT I:RETURN 
1001 DATA 104,104,104,133,212,104,104,37,212,133,212,169,0,133,213,96

;-)

EDIT: Wersja 1.1, poprawiona :) poprzednio zapomniałem o Fire! :P

ha! czyli nasz szanowny kolega bezrobotny chciał aby mi się czkawką to się odbiło... to ja tu tajemnice zdradzam... prototypy pokazuję... ujawniam radzieckie sekrety... a tutaj taką trutką mnie potraktować? ;) no ładnie :)