// System: Dominanz

/* Haftungsausschluss / Disclaimer
   Eine Haftung fuer die Richtigkeit der Implementierung des Systems wird NICHT uebernommen, der Download und
   der Einsatz des Systems erfolgt auf eigenes Risiko!
   A liability for the correctness of the implementation of the system will NOT be assumed, the download and use
   of the system is at your own risk!
   Ing. Thomas Froehlich (www.ing-froehlich.de)
*/

// in the first run - determine TS
// modify: play bet as long as possible - in case of bet bust - reset bet

ST:
SZ STMAX(I(1),A);
SZ ST1(1,1,1,1,1,2,2,2,3,3,4,5,6,7);
SZ CO01(1);			// 1= determine DZ
SZ EI1(ST1(1));
GW:
SZ EI1(ST1(1));
SZ CO01(2);						// prepare for one empty round
VE:
SZ EI1(ST1(+1));
SZ PT1;
AL:
IF CO01(1) THEN SZ PT1(C);
IF CO01(1) AND IF GZ IN TS01 THEN SZ PT1(TS01);				
IF CO01(1) AND IF GZ IN TS03 THEN SZ PT1(TS03);
IF CO01(1) AND IF GZ IN TS05 THEN SZ PT1(TS05);				
IF CO01(1) AND IF GZ IN TS07 THEN SZ PT1(TS07);				
IF CO01(1) AND IF GZ IN TS09 THEN SZ PT1(TS09);
IF CO01(1) AND IF GZ IN TS11 THEN SZ PT1(TS11);				
IF CO01(1) AND IF GZ NOT IN PL00 THEN SZ PT1,CO01(3);
IF CO01(2) THEN SZ CO01(1);