// System: EC Parlay
// Parlay EC red

/* 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(A);					// restart system if rise table fullfilled
SZ ST1(1,2,2,4);
SZ EI1(ST1(1));                 // set unit storage 1 to 1 unit
SZ EC03;						// set EC red

GW:                             // win section
SZ EI1(ST1(+1));                // set unit storage to the next level of the rise table
VE:                             // lost section
SZ EI1(ST1(-1));                // set unit storage back the level before of the rise table
AL:                             // general section
SZ EC03;						// set EC red