Esimerkiksi PokerStove arvioi muutamassa sekunnin sadasosassa preflop-voittotodennäköisyydet kahden aloituskäden kesken. Kun pakassa on jäljellä 48 korttia, erilaisia viiden kortin yhdistelmiä on (48*47*46*45*44)/(5*4*3*2*1) = 1.712.304 kpl. Tietokoneessani näiden käsien luuppaaminen koodilla
for J := 1 to 44 do
valitse kortti 1
for K := 2 to 45 do
valitse kortti 2
for L := 3 to 46 do
valitse kortti 3
for M := 4 to 47 do
valitse kortti 4
for N := 5 to 48 do
valitse kortti 5
poyta = kortti 1 kortti 2 kortti 3 kortti 4 kortti 5
vie aikaa vajaat 20 sekuntia.
Tavoitteenani on laskea pelaamistani käsistä todennäköisyydet eri panostusvaiheissa, kun showdowniin on edennyt kaksi pelaajaa. Kolme tai useampi ei siis ole välttämätön.
Laskentaan pitäisi saada vauhtia. Millä tavalla sitä pystyisi nopeuttamaan. Esimerkiksi näistä http://forumserver.twoplustwo.com/45/software/7-card-hand-evaluators-597/ jutuista en saa juuri mitään irti. Ne ovat liian vaikeita kotitarveohjelmoitsijalle.
Pokerikäsien arviointi
1
494
Vastaukset
Silmäilepä allaolevaa QBasic-listausta, "väärä tapa" tekee
yli 100-kertaisest i"työtä" verrattuna "oikeaan tapaan".
Delphiä en tunne, mutta oletan FOR-luuppien pyörivän samoin
kuin Basicissakin. Jos näin on, listauksesi ohjelma kehittää
monet "kädet" tarpeettomasti sataan kertaan.
Luuppimuuttujia voi tietenkin käyttää sellaisinaan korttien
paikkojen määrittelyyn, ei niitä tarvitse erikseen sijoittaa
ylimääräisiin muuttujiin.
Pienenä vihjeenä tulevan varalle: Kun olet muutaman vuoden
päästä päässyt vaiheeseen jossa kortteja ja "käsiä" aletaan
vertailla, suosittelen korttien yksilöimistä 13 mittaisilla
yksipainoisten binäärilukujen taulukoilla.
Neljä yksiulotteista taulukkoa, yksi jokaista maata varten,
jokaisessa taulukossa 13 alkiota, joiden ykkösbitin paikka
määrittelee kortin numeron.
Tuon oman listaukseni kehittämien "käsien" määrät
ja ajankulutukset ovat seuraavat:
"Oikea tapa", "käsiä" 2 598 960 kpl, aika 0.49 sek.
"Väärä tapa", "käsiä" 311 875 200 kpl, aika 52.06 sek.
Aikojen suhde : "Väärä tapa"/"oikea tapa" = noin 105.
"Käsien suhde": "Väärä tapa"/"oikea tapa" = 120
REM **********************************************
REM **********************************************
DEFINT A-Z
CLS
DIM kortteja AS LONG
DIM laskuri1 AS LONG
DIM laskuri2 AS LONG
DIM aika1 AS DOUBLE
DIM aika2 AS DOUBLE
DIM aikasuhde AS DOUBLE
DIM laskurisuhde AS DOUBLE
kortteja = 52
REM **********************
REM oikea tapa
REM **********************
aika1 = TIMER
laskuri = 0
FOR J = 1 TO kortteja
FOR K = J 1 TO kortteja
FOR L = K 1 TO kortteja
FOR M = L 1 TO kortteja
FOR N = M 1 TO kortteja
laskuri1 = laskuri1 1
NEXT N: NEXT M: NEXT L: NEXT K: NEXT J
aika1 = TIMER - aika1
PRINT aika1, laskuri1
REM **********************
REM väärä tapa
REM **********************
aika2 = TIMER
laskuri2 = 0
FOR J = 1 TO kortteja
FOR K = 2 TO kortteja
FOR L = 3 TO kortteja
FOR M = 4 TO kortteja
FOR N = 5 TO kortteja
laskuri2 = laskuri2 1
NEXT N: NEXT M: NEXT L: NEXT K: NEXT J
aika2 = TIMER - aika2
PRINT aika2, laskuri2
aikasuhde = aika2 / aika1
laskurisuhde = laskuri2 / laskuri1
PRINT aikasuhde, laskurisuhde
END
REM **********************************************
REM **********************************************
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Ja taas ammuttu kokkolassa
Kokkolaisilta pitäisi kerätä pois kaikki ampumaset, keittiöveitset ja kaikki mikä vähänkään paukku ja on terävä.465025- 723142
Helena Koivu on äiti
Mitä hyötyä on Mikko Koivulla kohdella LASTENSA äitiä huonosti . Vie lapset tutuista ympyröistä pois . Lasten kodista.3071989Milli-helenalla ongelmia
Suomen virkavallan kanssa. Eipä ole ihme kun on etsintäkuullutettu jenkkilässäkin. Vähiin käy oleskelupaikat virottarell2631808Kuinka kauan
Olet ollut kaivattuusi ihastunut/rakastunut? Tajusitko tunteesi heti, vai syventyivätkö ne hitaasti?1151699Kun näen sinut
tulen iloiseksi. Tuskin uskallan katsoa sinua, herätät minussa niin paljon tunteita. En tunne sinua hyvin, mutta jotain531286Ja taas kerran hallinto-oikeus että pieleen meni
Hallinto-oikeus kumosi kunnanhallituksen päätöksen vuokratalojen pääomituksesta. https://sysmad10.oncloudos.com/cgi/DREQ951249- 701192
Löydänköhän koskaan
Sunlaista herkkää tunteellista joka jumaloi mua. Tuskin. Siksi harmittaa että asiat meni näin 🥲1331167Purra saksii taas. Hän on mielipuuhassaan.
Nyt hän leikkaa hyvinvointialueiltamme kymmeniä miljoonia. Sotea romutetaan tylysti. Terveydenhoitoamme kurjistetaan. ht2801137