Straszne nieprzyjemnie zrobiło się ostatnio na forum w niektórych wątkach, wiec postanowiłem zrobić coś, co może chociaż na chwilę pozytywnie skupi nasze umysły na komputerze, dla którego się tutaj schodzimy, a nie na wyżywaniu się w ten czy inny sposób.

ZbyniuR zamieścił newsa o powstającym porcie amigowej Agony na jakieś mało znane mi ustrojstwo, ale mniejsza z nim (ustrojstwem, nie ZbyniemR ). Naszło mnie, żeby sprawdzić, jak by sobie poradził AMOS z taką ilością grafiki na ekranie. Wiedziałem, że dobrze nie będzie, ale zgadywanie mało mnie satysfakcjonuje, więc postanowiłem na szybko sklecić kod i zobaczyć efekt. Przy czym zaznaczam: To nie jest gra. To nawet gry nie udaje. Nie ma tam latających przeciwników, żadnego dodatkowego liczenia i tym podobnych. Grafika jest przygotowana pobieżnie i wyrywkowo. Ilość kolorów 32 (przy czym nie jest to paleta oryginalna, bo tam programista zastosował kilka trików, no i tryb EHB). To zwykły kilkuplanowy scrolling i parę animacji i liczenie klatek na sekundę. Ot, luźny i szybki eksperyment, który zrobiłem przede wszystkim dla siebie, ale skoro już zrobiłem, to pomyślałem, że podzielę się z resztą.
Jak wielka jest to agonia, oceńcie sami i skomentujcie. Ale proszę - konstruktywnie. Aha, jeśli ktoś byłby tak życzliwy i zamieścił na jutubie wideo dla tych, którzy nie mają ochoty/możliwości odpalić tego eksperymentu, to będę wdzięczny.

Przed uruchomieniem należy zrobić assign agony: "" do katalogu, gdzie zostanie rozpakowane archiwum agonia.lha

• Odpowiedz

@Umpal, post #1

• Odpowiedz

@QUAD, post #2

• Odpowiedz

@QUAD, post #2

• Odpowiedz

@Umpal, post #1

• Odpowiedz

@Umpal, post #1

• Odpowiedz

@Umpal, post #1

Nagralem ci Filmik

Jak animujesz sowe i wode? Bo jesli nie w AMALu to lepiej go uzyc bo jest sporo szybszy.

No i mamy kolejny projekt na Retrokomp

• Odpowiedz

@agrajek, post #3

Grafikę z gry znalazłem w necie, ale to nie były iffy, więc musiałem przerabiać sporo żeby się to nadawało do Amigi. Stąd też wygląda to, jak wygląda. Ale nie o piękno grafiki w tym chodziło, lecz o "chodzenie", czyli działanie.
Listingu nie zamieszczę, ale napiszę, jak to zrobiłem, bo kod jest prosty, jak budowa cepa (literalnie zajęło mi to parę minut): Ładuję grafikę, tworzę Boby, Otwieram ekran z podwójnym buforowaniem (tryb manualny, czyli Autoback 0) i tworzę scenę na logicznym a następnie zamieniam z fizycznym. Wszystko rysowane jest tradycyjnie, bez udziału AMAL-a (który ma u mnie złą opinię po dogłębnych testach jakiś czas temu). Tło wklejam co klatkę i to samo z drugim planem przesuniętym w osi X o piksel. Pierwszy scroll idzie co 3 piksele, ale wyświetlany jest co parzysty przesuw całości. Woda i sowa rysowane są co klatkę, stąd zwolnienie wszystkiego przy spadku fps'ów.

Sprawdzone i jest tak samo jak na A4K/060,działa identycznie i zwalnia do 10 klatek :)

Jak napisał cholok, szybszy procesor niewiele tu zmienia (maks. 3 klatki), bo po prostu blitter jest za słaby (dodatkowo interpretacja AMOS-a, choć naprawdę dobra, też dodaje swoje "trzy grosze").

@cholok, wiem, że oryginalna gra jest na dual playfield'zie. (jest bardzo fajna strona, na której grafik biorący udział w powstawaniu gry opisał dosyć szczegółowo, jak osiągnęli finalny efekt). W moim eksperymencie nie chciałem tworzyć kalki gry, bo szkoda mi czasu na coś, czego i tak nie będę rozwijał (nie lubię za bardzo platformówek, a tym bardziej ich tworzenia). Chciałem zarzucić procesory typowym liczeniem i wyświetlaniem pikseli i zobaczyć moc przerobową. Z ciekawości zmieniłem ekran na 16 i 8 kolorów i oczywiście przyśpieszenie jest ogromne - 100% w przypadku 8 kolorów. Gdyby ktoś miał ochotę przetestować, to jest tutaj. (Kolory oczywiście będą koszmarne, bo grafika pozostaje wciąż ta sama)

Sporo sztuczek z oryginału można zrobić w amosie.

Z tym się zgadzam - sporo, ale nie wszystkie (szczególnie po lekturze wspomnianego artykułu)
AMOS daje zadziwiające możliwości, ale trzeba go dobrze poznać i cierpliwie "dziargać" kod aż do najlepszego efektu. Różnego rodzaju eksperymenty są do tego niezbędne. Stosując wszystkie zaawansowane sztuczki można uzyskać efekt bardzo podobny do Agony.

@Sordan, dzięki za wrzucenie filmu. Myślę też, że odpowiedziałem wyżej na twoje pytanie.

No i mamy kolejny projekt na Retrokomp OK

To, czego Amiga potrzebuje, to nie kolejnego projektu, a ukończenia obecnych

[Update]
Postanowiłem odnieść się nieco bardziej rzeczowo do AMAL-a. Ma u mnie mieszane uczucia. Oczywiście w przypadku Agony sowa musiałaby być animowana w AMAL-u, nie inaczej. Ale jeśli ktoś poeksperymentuje z AMOS-em trochę bardziej, to zauważy, że Channel(s) odtwarzający kod AMAL-a wcale taki różowy nie jest i po prostu dławi się przy jednoczesnym rysowaniu blitterem innych rzeczy. Dlatego AMAL może jedynie wspomóc w niektórych przypadkach, ale musi być bardzo dokładnie kontrolowany, inaczej będą spowolnienia. Co ciekawe, te przycinki odbywają się czasami w niespodziewanym momencie, co dodatkowo doprowadza do białej gorączki, bo jest trudny do przewidzenia. Zresztą nawet twórca AMOS-a przyznał, że jest to język niedopracowany. Dlatego staram się unikać AMAL-a.

Ostatnia aktualizacja: 11.03.2017 18:27:42 przez Umpal

• Odpowiedz

@Umpal, post #8

• Odpowiedz

@Umpal, post #8

To, czego Amiga potrzebuje, to nie kolejnego projektu, a ukończenia obecnych OK

Spokojnie, Ci co cos robia to robia to po cichu i nic nie pokazuja (na przykad ja:)) zeby nie zapeszac i by niespodzianka byla wieksza jak od razu pokaza caly swoj owoc pracy w pazdziernikowym game compo w Gdansku. Jest Nas mega duzo na ppa wiec nic nie stoi na przeszkodzie by powstal kolejny projekt na nowa gre. Wystarczy, ze choc 1/10 ludzi zakochanych w watku `ciekawostki aukcyjne` (osobiscie dodalem watek do ignorowanych - serdecznie polecam) i zajmujacych sie tropieniem handlarzyn wrzuci na luz i zacznie dzialac i pyk od razu mamy 20 nowych gier na Amige wystawionych na Retrokompie

• Odpowiedz

@sordan, post #10

No i tak trzymaj . Też mam już dosyć wielu wątków na forum i również dałem ignorowanie niektórych, bo szkoda zdrowia i zapału. Trzymam kciuki za zaskakujące produkcje. Mniej pompy - więcej treści

• Odpowiedz

@retronav, post #9

Czytałem też ten artykuł. Bardzo ciekawie to zbadał i opisał. Gdyby ktoś się zabierał za zrobienie kalki gry informacja jak znalazł

• Odpowiedz

@Umpal, post #1

Panowie ponawiam swoj apel!

Albo zaczniemy sie dzielic kodami zrodlowymi i wtedy ludzie z brakiem wiedzy szybko ja nabeda albo bedziemy nadal pokazywac swoje dziela w stylu "patrzcie i podziwiajcie".
Cebularze wprowadzili w nasze srodowisko wyscig szczurow i zazdrosc a wszyscy to niestety powielaja. Nie wiem czy na demoscenie tez to wystepuje ale nie jest to zachecajace dla nowych.
Jesli tworcy pojda caly czas ta sama droga, to dobrych produkcji mozemy sie spodziewac za 15 - 20 lat, bo tyle mniej wiecej trwa nauka programowania zeby osiagnac wysoki poziom wtajemniczenia.
Ubolewam nad tym, ze bardzo zdolni tworcy np. na AMOS Factory przyjeli wlasnie ta taktyke "pokazac ale sie nie dzielic z innymi", dlatego ogolnie slabo z tym amosowym devem.
Na kodach zrodlowych, czlowiek uczy sie 10 razy szybciej niz metoda wynajdywania kola na nowo.
Przemyslcie wiec sprawe, komu sie tak naprawde oplaca to "kiszenie" wszystkiego.

• Odpowiedz

@retronav, post #9

• Odpowiedz

@selur, post #13

Masz rację, ale to nie dotyczy tylko środowiska Amigi - tak się dzieje również w innych kręgach. Odwiedzam różne fora programowania (w różnych językach) i nigdzie nie spotykam się z zamieszczaniem kodu na prośbę. Ludzie pomagają, jak najbardziej, ale nie podają gotowego rozwiązania dopóty, dopóki nie zobaczą, że szukający porady sam też się wysila (choć i nawet w takich sytuacjach jest to bardziej pomoc teoretyczna niż praktyczna, do tego w małej skali). Ja też przez to przeszedłem i na własnej skórze przekonałem się, że gotowego torta nikt nie poda. Kiedyś zwróciłem się do AMOS-owego guru, takiego prawdziwego, bez ironii. Pomyślałem, że po co mam wynajdywać koło na nowo, skoro ktoś już przetarł szlaki. Nie dostałem nawet odpowiedzi . Pomyślałem: 'Dobra, pies cię gryzł. Nie, to sam się nauczę'. U nas na forum w kwestii programowania jest podobnie i nie dotyczy to tylko AMOS-a. Śledząc wątki, w których ktoś szuka porady można zauważyć, że odpowiedź rodzi się czasami w bólu, a i tak ostatecznie autor wątku odpisuje 'dobra, już sobie z tym poradziłem'.

Ale żeby nie stanąć na niczym, bo to wszystko już przecież wiemy. Jestem za pomocą, bardzo chętnie nawet. Tylko nie jestem za zamieszczaniem gotowego rozwiązania, bo jeśli ktoś nie rozumie jak powstał prosty efekt, to jak będzie w stanie zrobić z tego coś bardziej zaawansowanego? Trochę to przypomina Amitena, który pod każdym ciekawszym projektem żebrze o kod źródłowy. Nóż się otwiera. Chłop zna AMOS-a całkiem dobrze, a od wieków stoi w miejscu i czeka aż się samo zrobi. To nasuwa kolejny aspekt dzielenia się w ten sposób wiedzą: brak wdzięczności i skromności. Ludzie bardzo chętnie korzystają z cudzych rozwiązań, ale później taki nawet nie przyzna się, że cię zna i przypisze sobie całą zasługę. To sprawia, że człowiekowi najzwyczajniej przestaje się chcieć. Z drugiej zaś strony nie widzę za bardzo ludzi pytających, jak zrobić to, czy tamto w AMOS-ie, ani jak rozwiązać taki czy inny problem...

• Odpowiedz

@Umpal, post #15

• Odpowiedz

@selur, post #16

• Odpowiedz

@Umpal, post #17

Chciałem zobaczyć listing z ciekawości, nie żeby na jego podstawie zrobić grę czy (jak to właśnie jest na forach pecetowych) uzyskać gotowca na zadanie z informatyki.

Nie ma potrzeby wiedzieć "komu i w jaki sposób" żeby wrzucić kawałek listingu.

Albo się wrzuca albo nie, wolna wola

• Odpowiedz

@agrajek, post #18

Agrajku, spoko, rozumiem. Nikogo nie chciałem urazić moim komentarzem odnośnie żebrania o kod. Podałem jako przykład Amitena, ale wiem, że to skrajny przypadek i u nas na forum takich osób nie ma (nie trafiłem przynajmniej). Odniosłem się do sprawy ogólnie, bez przyklejania komukolwiek etykiety. Przyznaję, że mogło to zabrzmieć trochę surowo, ale nie mam skąpego nastawienia. Jak napisałem jestem bardzo chętny do pomocy, jeśli ktoś o nią poprosi
Głupio się teraz czuję . W ramach "rekompensaty" jutro wrzucę kod na forum. I spokojnie, nie czuję wymuszenia - zrobię to z własnej woli i chęci. W sumie Selur ma rację. Jak będziemy tak kisić wszystko dla siebie, to nic się nie ruszy. Ktoś musi przerwać ten zaklęty krąg. Jeśli będę to ja, to czuję się zaszczycony i takie tam

• Odpowiedz

@Umpal, post #15

• Odpowiedz

@selur, post #20

• Odpowiedz

@maka23111, post #21

• Odpowiedz

@selur, post #13

• Odpowiedz

@Umpal, post #15

• Odpowiedz

@maka23111, post #22

jesli pytasz o pisanie pod karte graficzna w Amosie, to tylko w kategoriach kiepskiego zartu

• Odpowiedz

@selur, post #26

• Odpowiedz

@Umpal, post #19

Obiecałem i spełniam. Ale jeszcze raz zacytuję, co napisałem w pierwszym poście, bo odnoszę wrażenie, że niektórzy myślą, że to gra:

To nie jest gra. To nawet gry nie udaje.

Z założenia miał to być typowy stress test. Doskonale rozumiem, że to powinno być inaczej zrobione, gdyby tylko był to zamiar stworzenia gry. Nie jest, nie był i nie będzie
Oglądajcie i pytajcie, jeśli jest o co pytać.

APPATH$="Agonia:"

For I=1 To 9
   N$=Str$(I)
   N$=Right$(N$,1)
   Load Iff APPATH$+"Gfx/owl_0"+N$+".iff",2
   Screen Hide 
   Get Bob 100+I,0,0 To 32,87
Next I
For I=10 To 16
   N$=Str$(I)
   N$=Right$(N$,2)
   Load Iff APPATH$+"Gfx/owl_"+N$+".iff",2
   Screen Hide 
   Get Bob 100+I,0,0 To 32,87
Next I

For I=1 To 9
   N$=Str$(I)
   N$=Right$(N$,1)
   Load Iff APPATH$+"Gfx/agony_water0"+N$+".iff",2
   Screen Hide 
   Get Bob 10+I,0,0 To 288,32
Next I
For I=10 To 12
   N$=Str$(I)
   N$=Right$(N$,2)
   Load Iff APPATH$+"Gfx/agony_water"+N$+".iff",2
   Screen Hide 
   Get Bob 10+I,0,0 To 288,32
Next I

Load Iff APPATH$+"Gfx/Agony_tree.iff",2
Get Bob 6,0,0 To 334,192

Load Iff APPATH$+"Gfx/Agony_net.iff",2
Get Bob 5,0,0 To 256,128

Load Iff APPATH$+"Gfx/Agony_tree2.iff",2
Get Bob 4,0,0 To 178,191

Load Iff APPATH$+"Gfx/Agony_tree3.iff",2
Get Bob 3,0,0 To 268,192

Load Iff APPATH$+"Gfx/Agony_bgnd2.iff",2
Get Block 1,0,0,288,192
Screen Hide 2

Screen Open 1,288,192,32,Lowres : Flash Off : Curs Off 
Screen Display 1,140,60,,

Get Palette 2

Double Buffer : Rem // Włącz podwójne buforowanie ekranu
Autoback 0 : Rem    // Przejdź na trym manualny (1= półautomatyczny, 2 = automatyczny)

T1=Timer : Rem     // Pobierz aktualny czas 
FPS=0 : Rem        // Wyzeruj licznik klatek/s 
X1=300: Rem        // Ustal pozycję tła w osi X
X2=320 : Rem       // Ustal pozycję pierwszego planu w osi X
WATER=10 : Rem     // Przypisz numer pierwszej klatki animacji wody
OWL=100 : Rem      // Przypisz numer pierwszej klatki animacji sowy
Ink 3 : Gr Writing 0 : Rem // Ustaw kolor nr 4 i wyłącz tło spod tekstu

Do : Rem // ...roboty! ;-)

   Inc FPS : Rem   // Zwiększ licznik klatek/s  
   T2=Timer : Rem  // Do obliczania czasu i wyliczania FPS 
   T3#=T2-T1 : Rem // Odejmij różnicę w czasie, jaki upłynął

   If A=0 : Rem // Jeśli nieparzysta zmień na następną klatkę animacji wody (co daje co 4 ramkę)
      Inc WATER : If WATER=23 : WATER=11 : End If 
   End If 

   Inc OWL : If OWL=117 : OWL=101 : End If : Rem // Zwiększ klatkę animacji sowy
   If X1=-160 : X1=300 : End If : Rem            // Jeśli tło wyszło poza ekran umieść je z powrotem
   X2=X2-3 : If X2<-735 Then X2=320 : Rem        // Przesuń pierwszy plan o 3 piksele

   If T3#=>50 : Rem      // Minęła sekunda, przekaż ilość klatek/s 
      F$=Str$(FPS) : Rem // Zamień liczbę na ciąg tekstowy
      T1=Timer : Rem     // Pobierz aktualny czas 
      FPS=0 : Rem        // Wyzeruj licznik klatek/s 
   End If 

   A=I mod 2=0 : Rem                  // Oblicz resztę z dzielenia... 
   If A=0 : Rem                       // ...jeśli nieparzysta  
      Put Block 1 : Rem               // Wstaw nieruchome tło
      Paste Bob X1,0,4 : Dec X1 : Rem // Drzewo w tle
      Paste Bob X2,64,5 : Rem         // Sieć rybacka
      Paste Bob 10,64,OWL : Rem       // Sowa
      Paste Bob X2+250,1,3 : Rem      // Koślawe drzewo na pierwszym planie 
      Paste Bob X2+400,0,6 : Rem      // Drzewo + łódź na pierwszym planie
      Paste Bob 0,160,WATER : Rem     // Fale
      Text 6,8,F$ : Rem               // Wyświetl FPS
      Screen Swap : Wait Vbl : Rem    // Zamień ekran logiczny z fizycznym i zaczekaj na ramkę
   Else : Rem      // ...jeśli parzysta
      Put Block 1 : Rem               // Wstaw nieruchome tło
      Paste Bob X1+1,0,4 : Rem        // Drzewo w tle 
      Paste Bob X2,64,5 : Rem         // Sieć rybacka
      Paste Bob 10,64,OWL : Rem       // Sowa
      Paste Bob X2+250,1,3 : Rem      // Koślawe drzewo na pierwszym planie 
      Paste Bob X2+400,0,6 : Rem      // Drzewo + łódź na pierwszym planie
      Paste Bob 0,160,WATER : Rem     // Fale
      Text 6,8,F$ : Rem               // Wyświetl FPS
      Screen Swap : Wait Vbl : Rem    // Zamień ekran logiczny z fizycznym i zaczekaj na ramkę
   End If 

Loop

Jak widać, główny kod znajduje się między Do i Loop. Jest tego niewiele, bo i działanie jest banalne. Ot, zwykłe przesuwanie obiektów na ekranie ze zmianą klatek w przypadku animacji.

• Odpowiedz

@Umpal, post #28

Odnośnie optymalizacji, choć bardziej by tu pasowało napisania Agony w Amosie od nowa, należałoby zastosować:
1. Dual Playfield
2. Odczyt bloków graficznych 32x32 lub 16x16, lub nawet 8x8 (żeby blitter nie musiał rysować za dużo, a liczy się każdy cykl)
3. Mądre rozplanowanie obiektów tak, aby nie pojawiało ich się zbyt wiele na raz na ekranie
4. Sprzętowe sprity (tak, jak to jest w oryginalnym Agony)
5. AMAL, ale z głową i tylko do niektórych rzeczy po bardzo dokładnych testach
6. Dużo cierpliwości i niezadowalania się byle czym

Tyle na początek

• Odpowiedz

@Umpal, post #1

• Odpowiedz