// System: EC Paroli
// Paroli 3 EC (red/black, 1-18/19-36, EVEN/ODD)
// option 1: rise to 16 units if reached fall back to 1
// option 2 (don't forget not to disable option 1 line): rise to 16 units if reached stay on 1 (as long es possible)

/* 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)
*/

ST:                             // start section
SZ STMAX(I(1));		            // wait one throw
SZ STMAX(C(1000));
SZ EI1(1);                      // set unit storage 1 to 1 unit
SZ EI2(1);                      // set unit storage 2 to 1 unit
SZ EI3(1);                      // set unit storage 3 to 1 unit

IF GZ IN EC03 THEN SZ EC03;     // if last pulled number is red (EC03) then set EC03
IF GZ IN EC04 THEN SZ EC04;     // if last pulled number is black (EC04) then set EC04
IF GZ IN EC02 THEN SZ EC02;     // if last pulled number is even (EC02) then set EC02
IF GZ IN EC05 THEN SZ EC05;     // if last pulled number is odd (EC05) then set EC05
IF GZ IN EC01 THEN SZ EC01;     // if last pulled number is 1-18 (EC01) then set EC01
IF GZ IN EC06 THEN SZ EC06;     // if last pulled number is 19-36 (EC06) then set EC06

AL:
IF GZ IN EC03 AND IF VZ IN EC03 THEN SZ EI1*2 MAX 16 THEN SZ EI1(1);
IF GZ IN EC04 AND IF VZ IN EC04 THEN SZ EI1*2 MAX 16 THEN SZ EI1(1);
IF GZ IN EC03 AND IF VZ NOT IN EC03 THEN SZ EI1(1);
IF GZ IN EC04 AND IF VZ NOT IN EC04 THEN SZ EI1(1);
IF GZ IN EC03 THEN SZ EC03;
IF GZ IN EC04 THEN SZ EC04;

IF GZ IN EC02 AND IF VZ IN EC02 THEN SZ EI2*2 MAX 16 THEN SZ EI2(1);
IF GZ IN EC05 AND IF VZ IN EC05 THEN SZ EI2*2 MAX 16 THEN SZ EI2(1);
IF GZ IN EC02 AND IF VZ NOT IN EC02 THEN SZ EI2(1);
IF GZ IN EC05 AND IF VZ NOT IN EC05 THEN SZ EI2(1);
IF GZ IN EC02 THEN SZ EC02;
IF GZ IN EC05 THEN SZ EC05;

IF GZ IN EC01 AND IF VZ IN EC01 THEN SZ EI3*2 MAX 16 THEN SZ EI3(1);
IF GZ IN EC06 AND IF VZ IN EC06 THEN SZ EI3*2 MAX 16 THEN SZ EI3(1);
IF GZ IN EC01 AND IF VZ NOT IN EC01 THEN SZ EI3(1);
IF GZ IN EC06 AND IF VZ NOT IN EC06 THEN SZ EI3(1);
IF GZ IN EC01 THEN SZ EC01;
IF GZ IN EC06 THEN SZ EC06;