Оазис-покер => Расчёт M и D [#9199]

Офлайн-казино / Оазис-покер / Расчёт M и D

Re: Расчёт M и D ID:9199 ответ на 9196

Ср, 7 июля 2004 06:29 («] [#] [»)

korovin

Пример

//каре
for i1:=0 to 12 do
for i5:=0 to 12 do if i5<>i1 then begin n:=n+1;
ArShaf[n,1]:=i1*4+1; ArShaf[n,2]:=i1*4+2;
ArShaf[n,3]:=i1*4+3; ArShaf[n,4]:=i1*4+4;
ArShaf[n,5]:=i5*4+Random(4)+1;
ArShaf[n,0]:=1;
end;

//фулл
for i1:=0 to 12 do
for i4:=0 to 12 do if i4<>i1 then begin n:=n+1;
p3:=Random(4)+1; p2:=Random(6)+1;
ArShaf[n,1]:=i1*4+ArMst3[p3,1]; ArShaf[n,2]:=i1*4+ArMst3[p3,2];
ArShaf[n,3]:=i1*4+ArMst3[p3,3]; ArShaf[n,4]:=i4*4+ArMst2[p2,1];
ArShaf[n,5]:=i4*4+ArMst2[p2,2]; ArShaf[n,0]:=6;
end;

...

ArShaf[n,0] это вес комбинации/4

Список сообщений

	Расчёт M и D От: BUGy вкл Вт, 6 июля 2004 07:05
	Re: Расчёт M и D От: korovin вкл Вт, 6 июля 2004 11:37
	Re: Расчёт M и D От: BUGy вкл Ср, 7 июля 2004 03:43
	Re: Расчёт M и D От: korovin вкл Ср, 7 июля 2004 06:29
	Re: Расчёт M и D От: BUGy вкл Чт, 8 июля 2004 02:05
	Re: Расчёт M и D От: korovin вкл Чт, 8 июля 2004 06:21
	Я полностью симулирую игровой процесс. От: Ivan вкл Чт, 8 июля 2004 12:01
	Re: Я полностью симулирую игровой процесс. От: BUGy вкл Пт, 9 июля 2004 00:10
	Я говорил о МО игры в целом. От: Ivan вкл Вс, 11 июля 2004 06:41

Предыдущая тема:	правила
Следующая тема:	Что лучше одна 6-я и ТК или 2 6-х и пара двоек. Везде страховка

Быстрый переход к форуму

Текстовая версия RSS лента

Вернуться вверх

Текущее время: Пт, 29 ноября 05:41:08 2024

Время, затраченное на генерацию страницы: 0.01254 секунд