Enterprise Forever

:HUN => Konvertálás => Topic started by: geco on 2023.November.15. 19:53:14

Title: American Poker II
Post by: geco on 2023.November.15. 19:53:14
Novomatic's American Poker II konverziója.
Több infó a zip-ben lévő Poker.txt-ben

*** Attachment removed, new version can be found in newer post.
*** Csatolmány törölve, új verzió megtalálható pár hozzászólással feljebb
Title: Re: American Poker II
Post by: kvaczko on 2023.November.15. 19:58:54
Geco, nagyon nagy vagy!!!! 🙂
Title: Re: American Poker II
Post by: SlashNet on 2023.November.15. 21:48:47
I don't know what I did, but it froze.

If someone records a demo, I can make a video.
I don't know how to play this at all.

Title: Re: American Poker II
Post by: geco on 2023.November.15. 23:05:06
I don't know what I did, but it froze.

If someone records a demo, I can make a video.
I don't know how to play this at all.

I think you pressed Q, it should not be pressed during game, and i put CTRL (soft reset) into keyboard read routine, which is not read in interrupt, after pressing Q the program jump to a forever loop.
The game is a simple Poker, 1st insert coin:
1: 5 coins
2: 1 coin
3: 5 coins
4: 10 coins

if some coins are entered then
F1: get cards
if cards arrived, you can select the needed cards for HOLD by F4-F8
after selected cards press F1 again to get new cards for the not selected places

the status bar at the bottom shows which actions are available, each action is mapped to F1-F8

PS:
I will put CTRL (Soft reset) into interrupt by this the machine can be taken out from "freeze" state by CTRL, and EP do not have to reset, and load a game again.
Title: Re: American Poker II
Post by: geco on 2023.November.15. 23:52:50
New version, soft reset has been moved into interrupt, POKER.TXT has been updated a bit.
Új verzió, soft reset be lett téve a megszakításba, és POKER.TXT kicsit bővült.


*** Attachment removed, new version can be found in newer post.
*** Csatolmány törölve, új verzió megtalálható pár hozzászólással feljebb
Title: Re: American Poker II
Post by: Zozosoft on 2023.November.16. 09:33:39
Ez játéktermi gép átirata?
Title: Re: American Poker II
Post by: geco on 2023.November.16. 09:48:03
Ez játéktermi gép átirata?
Igen, abban is egy z80 ketyegett 1990-ben :-D
Title: Re: American Poker II
Post by: kvaczko on 2023.November.16. 11:58:50
Az a sztori, hogy ugye én annakidején (1991-95 körül) írtam egy pókerprogramot basicben, pont erről a kocsmai nyerőgépről koppintva, persze egyszerűbb kivitelben. Baromi lassú volt, de működött. Aztán nekifogtam ugyanezt megcsinálni assemblyben, ami ugyan sose készült el, de Zozonak hála sikerült megmenteni annak a floppynak a tartalmát, amin ezeket a programrészleteket annakidején tároltam.

Geco az októberi klubnapon vérszemet kapott, elkezdte már ott helyben túrni az én régi assembly kódjaimat, néhány futtatható részletet is össze tudott belőlük állítani, majd a rákövetkező napokban is folytatta, folyamatosan bombázott újabbnál újabb emu snapshotokkal. 🙂 Megmutattam neki az eredeti kocsmai gépet, ugyanis ez a MAME rendszerében már "grabbelésre került", és azt hiszem neki onnantól nem volt megállás. 🙂 Mivel a gyári nyerőgép Z80 alapú volt, viszonylag egyszerű grafikával, plusz a nyerőgép teljes ROM tartalmát közzétették a MAME oldalán, geco barátunk nekilódult és megcsinálta az átiratot.

Hatalmas köszönettel tartozom neki, ez az Enterprise-os gyerekkorom óriásprojektje volt, neki sikerült megvalósítania és eléggé megörvendeztetett vele! Úgyhogy köszönöm, köszönöm és megintcsak köszönöm!
Title: Re: American Poker II
Post by: SlashNet on 2023.November.16. 14:04:06
Ez játéktermi gép átirata?

https://www.arcade-history.com/?n=american-poker-ii&page=detail&id=4515
Title: Re: American Poker II
Post by: geco on 2023.November.16. 14:43:50
https://www.arcade-history.com/?n=american-poker-ii&page=detail&id=4515
It seems there are more "versions" with minor differences, the conversion made from this:
http://adb.arcadeitalia.net/dettaglio_mame.php?game_name=ampoker2&back_games=rabbitpk;&search_id=
:)
Title: Re: American Poker II
Post by: geco on 2023.November.16. 15:40:01
Here is a demo, i am not a great poker player :ds_icon_cheesygrin: , even i do not like it :mrgreen:
Title: Re: American Poker II
Post by: szipucsu on 2023.November.16. 21:15:44
Jó kis látványos játék és a hang is sztereó. Érdekes, hogy zenei hangok szólnak hangeffektként.
Nem tudom, a pénzbedobós automatának milyen grafikus módjai voltak, biztos kicsit más, mint az Enterprise-nak. 16 szín tuti, hogy van a képernyőn. Sajnos a pókerhez nem értek, így a játék részéhez nem tudok hozzászólni.
A pénzbedobás úgy lenne élethű, hogy az emulátor rácsatlakozna a netes bankszámlájára a játékosnak, és onnan vonná le a bedobott összeget.
Title: Re: American Poker II
Post by: geco on 2023.November.17. 09:12:27
"karakteres" módot használt az automata, annyi, hogy karakterenként 4 szín lehet, és minden karakterre szabadon lehetett választani a 4 színt 64 előre definiált palettából, pont ezért buktunk is jópár színt, meg a grafika konverziójánál kellett sokat játszanom, hogy attributum módban is jól nézzen ki.
Title: Re: American Poker II
Post by: SlashNet on 2023.November.17. 20:08:35
https://www.youtube.com/watch?v=1vykYDnGmZA
Title: Re: American Poker II
Post by: geco on 2023.November.18. 12:15:02
Thx :)
Title: Re: American Poker II
Post by: Lacika on 2023.November.18. 12:45:05
Megnyomoma CTRL-t, kiakad a program? "NO ITNERRUPT OR TOO LONG", és utána csak csipog.
Title: Re: American Poker II
Post by: geco on 2023.November.20. 09:35:54
Megnyomoma CTRL-t, kiakad a program? "NO ITNERRUPT OR TOO LONG", és utána csak csipog.
Milyen konfigon próbáltad?
Az az érdekes, hogy a számlálóját az interrupt ellenőrzőnek meg kellett növelnem, de nekem azután soha nem jött elő.
Title: Re: American Poker II
Post by: Lacika on 2023.November.20. 17:52:34
Sima EXDOS-os konfigban pár CTRL billentyű.
Snapshot segít?
Title: Re: American Poker II
Post by: geco on 2023.November.20. 18:36:10
Sima EXDOS-os konfigban pár CTRL billentyű.
Snapshot segít?
Köszi :)
1 dologban mindenképp, hogy kiderüljön a számláló értéke alacsony, vagy más a bibber.
Title: Re: American Poker II
Post by: geco on 2023.November.20. 19:25:36
Köszi, segített a snapshot, igaz nem abban, amire gondoltam, de abból látszott, hogy az LPT lett felülírva.
Te aztán szorgalmasan nyomkodhattad a controlt :D , mert sima FILE I/O config mellett vagy 50x megnyomva se történt semmi, így visszaállítottam a snapshotban az LPT-t, a PC-t átirányítottam 0000h-ra, ezzel egy restartot előidézve, és ott jópár gombnyomás után sikerült a hibát előidézni, ami teljesen config független.
Az történt, hogy sikerült egy olyan állapotot elkapni a control lenyomására, amikor a 2. videólap van belapozva, ez rövid ideig van csak belapozva, és mivel a "gép" újraindításakor nem lapozódik be az 1. videólap, így a képernyőtörlő rutin a 2. videólapot törölte le, amin csak az attributum képernyő alsó 4 sora van,ha az egész kép attributum módú, majd a legalsó action bar adata, majd  a képernyő alsó 4 szín módú sora, ami a játék kijelzője, és a lap legvégén az LPT.
Itt a javított verzió

*** Attachment removed, new version can be found in newer post.
*** Csatolmány törölve, új verzió megtalálható pár hozzászólással feljebb
Title: Re: American Poker II
Post by: SlashNet on 2023.November.20. 20:25:50
In some cases game start with gray background card colour.
Didn't understand why.

[attach=1]

Title: Re: American Poker II
Post by: geco on 2023.November.21. 08:51:22
In some cases game start with gray background card colour.
Didn't understand why.

(Attachment Link)
Thx, i think i know the reason, I set the bias to 256 by EXOS in the loader, and it seems in some cases interrupt does not occur after bias set and before disabling interrupt, so bias 0 remains, i will fix it soon.
Title: Re: American Poker II
Post by: Zozosoft on 2023.November.21. 09:17:37
Thx, i think i know the reason, I set the bias to 256 by EXOS in the loader, and it seems in some cases interrupt does not occur after bias set and before disabling interrupt, so bias 0 remains, i will fix it soon.
I usualy put one HALT after EXOS variable sets:
Code: ZiLOG Z80 Assembler
  1.                 LD BC,100H+26   ;B=1 write
  2.                                 ;C=26 number of system variable (ST_FLAG)
  3.                 LD D,0          ;new value, 0=STATUS ON
  4.                 EXOS 16         ;handling EXOS variable
  5.                 LD BC,100H+28   ;B=1 write
  6.                                 ;C=28 number of system variable (BIAS_VID)
  7.                 LD D,255        ;new value, BIAS=255 then will be the
  8.                                 ;colors 8-15=248-255, bright colors
  9.                                 ;brown,red,green,yellow,blue,pink,cyan,white
  10.                 EXOS 16         ;handling EXOS variable
  11.                 LD BC,100H+27   ;B=1 write
  12.                                 ;C=27 number of system variable (BORD_VID)
  13.                 LD D,0          ;new value, 0=border will be black
  14.                 EXOS 16         ;handling EXOS variable
  15.                 HALT            ;wait one IRQ, for the EXOS irq routine
  16.                                 ;will write the new settings to the Nick
Title: Re: American Poker II
Post by: geco on 2023.November.21. 09:52:12
I usualy put one HALT after EXOS variable sets:
Sometimes i do it also :D , now i did not do it, the interrupts are enabled during memory allocation, and it seems sometimes this  period is too short.
Title: Re: American Poker II
Post by: geco on 2023.November.21. 18:14:00
Fixed Bias version
Title: Re: American Poker II
Post by: Lacika on 2023.November.21. 22:29:38
Te aztán szorgalmasan nyomkodhattad a controlt :D , mert sima FILE I/O config mellett vagy 50x megnyomva se történt semmi,

Mekem harmadszorra "sikerült" :-)
Title: Re: American Poker II
Post by: geco on 2023.November.21. 23:13:36
Mekem harmadszorra "sikerült" :-)
Ne tudd meg hányszor nyomtam controlt, mire sikerült :D :D , csoda, hogy még a helyén van :D