TRIPALOSKY

[ignatus]

Well. You probably don´t deverve this. But i release it anyway.

IF you play this/if you like this, make a donation pls link:://paypal.me/ignatus1

TRIPALOSKY

Hit and Run System Repeating Sector of 5-system. The original TRIPALOSKY was played with 3 numbers, this i changed to  A sector of 5 (Current number and its 2 neigbours bet) to Reduce variance and increase winrate.

Perhaps this can be tweaked further But i Release this as the FIRST Version ok

BET: Do 1 spin. then BET the Current number and its 2 neigbours (A sector of 5) on the Wheel, for MAX 11 spins. IF Hit within 11 Spins, +1u Bet in the progressionline, keep the same bet (AND do Reset Calculation, do another 10 spins before RESET BET) You RESET Calculation 1-10 spins for EACH Hit IF NO HIT AT the 11 spin, RESET PROGRESSION and Bet the Anew current number and its 2 sectors (5 numbers) 1u bet. ok

Progressionline 1,2,3,5,8,13,17,25,35,55,75,100. ALSO +1 Step in the progressionline After 1 Cycle (7 spins).

That´s pretty much it. its meant for short term hit and run play. About "winrate" idk, just finshed the code now.

cheers 

RX.code TRIPALOSKY

Code Select Expand

system "TRIPALOSKY"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,2,3,5,8,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1000 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 500 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

// add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 8
  begin
    add 1 on Record "progression" Data Index
  end
   
  if Record "Spin counter" Data index = 12
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

Tweaked the BET now as much as i could (perhaps the progressisonline could be tweaked also idk)

But NOW. RESET after 8 SPINS, and +1u Bet in the progression after 3 spins. ok

Winrate should be about 70-80% (That is when the BR go higher than 1000u)

Cheers 

RX.code TRIPALOSKY Version 2

Code Select Expand

system "TRIPALOSKY v.2"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,2,3,5,8,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1500 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 500 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

// add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 4
  begin
    add 1 on Record "progression" Data Index
  end
   
  if Record "Spin counter" Data index = 9
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

Now, i tweaked the progressionline (as much as i could)

RX.code VERSION 3.

Code Select Expand

system "TRIPALOSKY v.3"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,1,2,2,3,5,7,9,13,25,35,50,75,100]

    //6,7,9,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1500 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 500 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

// add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 4
  begin
    add 1 on Record "progression" Data Index
  end
   
  if Record "Spin counter" Data index = 9
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

Further tweaks of the progressionline, AND now this version *only played with a positive progression*

Pos.Prog. 1,2,3,5,8,15,25,35,55,75,100

RX.code VERSION 5

Code Select Expand

system "TRIPALOSKY v.5"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,2,3,5,8,15,25,35,55,75,100]

    //6,7,9,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1500 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 500 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

// add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 4
  begin
   // add 1 on Record "progression" Data Index
  end
   
  if Record "Spin counter" Data index = 9
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

Final1 Version. This is the best i can do for now (similar as version 5 but now also Neg prog)....."winrate" should be about 70% from my testings....

RX.code FINAL1 Version 6

Code Select Expand

system "TRIPALOSKY v.6"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,1,2,3,5,8,15,25,35,55,75,100]

    //6,7,9,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1500 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 500 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

// add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 4
  begin
   add 1 on Record "progression" Data Index
  end
   
  if Record "Spin counter" Data index = 9
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

Just a little TRICK i noticed now played for real (Test) 1 Great Tweak. then, RESET IF WIN 3 TIMES IN A ROW.

You may not win the high amounts with a no limit play, but this Version seems to be more "Safe and Steady winnings", to Reset after 3 wins in a row.

Cheers. 

TRIPALOSKY LIVE Version

Code Select Expand

system "TRIPALOSKY LIVE VERSION"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,2,3,5,8,15,25,35,55,75,100]

    //6,7,9,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1500 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 500 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

  add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 4 each
  begin
   add 1 on Record "progression" Data Index
  end
   

  if Record "win" Data Index = 4 each
  begin
   reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
  put 1 on Record "win" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
  end

  if Record "Spin counter" Data index = 9 each
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
  put 1 on Record "win" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

Im not making a new thread for this one, but its a different BET. (same/similar) BUT now a 7 numbers sector is bet.

Test and see.. Results may vary i got something between 60-80% winrate with WG+400, SL-750.

RX.Code TRIPALOSKY 2

Code Select Expand

system "TRIPALOSKY 2"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,2,3,5,8,15,25,35,55,75,100]

    //6,7,9,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -750 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end


if total bankroll >= 400 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end


{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

  add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 3 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 4 each
  begin
   add 1 on Record "progression" Data Index
  end
   

  if Record "win" Data Index = 6 each
  begin
   reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
  put 1 on Record "win" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
  end

  if Record "Spin counter" Data index = 7 each
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
  put 1 on Record "win" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[ignatus]

TRIPALOSKY 2 (7 numbers Sector Bet) with No Limit and the most profitable Settings. 

Code Select Expand

system "TRIPALOSKY 2"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
   put 0 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 750 of Record "max risk" Data


    put 0 to Record "Highest Bankroll" Data
    put 500 to Record "LowestBR" Data

    Set List[1,2,3,5,8,15,25,35,55,75,100]

    //6,7,9,13,17,25,35,55,75,100]

    //5,8,12,15,18,22,26,30,35,40,45,51,57,63,70,77,84,92,100]

    //1,2,3,5,8,13,21,32,55,75,100]
      to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data

   Set List[1,2,3,4,5,6,7,8,9]
       to Record "win" Data

   end

  while on each spin
  begin

{
IF spin count >= 500 each
begin
stop session
end
}
  if total bankroll <= -1500 each
begin
stop session
add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index
end

{
if total bankroll >= 400 each
begin
//if flag "W" true each
// begin
  stop session
// end
// set flag "W" true
//stop session
add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

end
}

{
IF Record "TotalBR" data >= 1000 each
begin
stop session
end
}

{
IF Record "LowestBR" data <= -500 each
begin
stop session
end
}

{
  if total bankroll >= 1500 each time
begin
Stop session
put 500 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 500 on total bankroll
    put 0 to Record "Highest Bankroll" Data
    put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout

end


   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 750 Record "max risk" Data
        end



        if Bankroll <= Record "max risk" Data
        begin
            Stop session

            put 500 to Record "A" data
            subtract 100% of Bankroll from Record "A" data


            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 500 on total bankroll
             put 0 to Record "Highest Bankroll" Data

            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 500 of Record "max risk" Data

            add 1 to record "lost sessions" data index

             if Record "TotalBR" data < Record "LowestBR" Data
        begin
            put 100% of Record "TotalBR" data to Record "LowestBR" Data
        end

            put 1 on Record "progression" Data Index
              Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
         //   stop session

        end

{if Record "TotalBR" data <= -750 each
begin
stop session
end }




  Track last Number for 1 spins to
Record "last1" layout





    if any inside bet won each
begin

  add 1 to Record "win" Data Index
//if total inside bets count >= 15 each
//  begin
add 1 on Record "progression" Data Index
//  end
{ subtract 3 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}

  if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index


      end

    //  put 1 on Record "Spin counter" Data index
     

put 2 on Record "Spin counter" Data index
{    reset all flags false
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
}
  //    Put 1 on Record "bet" Data Index
  //    Put 1 on Record "win" Data Index
      //reset all flags false
{     set flag "bet" false
      set flag "bet2" false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
}
end
else
begin
if any inside bet lost each
begin
  //if total inside bets count >= 16 each
// begin
//  Add 1 to Record "progression" Data index
//  end
  //end
//  put 1 on Record "win" Data Index
{
subtract 1 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
}
end
end



{
  If Record "win" Data Index >= 3 each
    Begin
      put 1 on Record "progression" Data Index

       if Bankroll >= Record "Highest Bankroll" Data each
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

      put 1 on Record "progression" Data Index
      Put 1 on Record "bet" Data Index
      Put 1 on Record "win" Data Index
      reset all flags false
   put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
end

   }






   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 3 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

{   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
  // Put 100% of Record "progression" Data to Record "bett2" layout list
  // Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 5 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
  // Put 100% of Record "progression" Data to Record "bett4" layout list
  // Put 100% of Record "progression" Data to Record "bet4" layout list
   end

   if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
  // Put 100% of Record "progression" Data to Record "bett5" layout list
  // Put 100% of Record "progression" Data to Record "bet5" layout list
   end

     if Record "Spin counter" Data index = 24
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 7
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet7" layout
   Copy Neighbors of Record "bet7" layout
   to Record "bett7" Layout
   Put 100% of Record "progression" Data to Record "bett7" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

     if Record "Spin counter" Data index = 8
   begin
   //put 1 on Record "Spin counter" Data index
   Put 1 on Neighbor Count
   Copy Record "last1" layout to Record "bet8" layout
   Copy Neighbors of Record "bet8" layout
   to Record "bett8" Layout
   Put 100% of Record "progression" Data to Record "bett8" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end

}



if Record "Spin counter" Data index >= 1 each
begin
set flag "bet" true
end

if Record "Spin counter" Data index >= 1 each
begin
set flag "bet2" true
end

add 1 to Record "Spin counter" Data index



{

}
Put 100% of Record "progression" Data to Record "bett1" layout list


  if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bett2" layout list
end

  if flag "bet2" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list
Put 100% of Record "progression" Data to Record "bet7" layout list
Put 100% of Record "progression" Data to Record "bet8" layout list
Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
Put 100% of Record "progression" Data to Record "bett7" layout list
Put 100% of Record "progression" Data to Record "bett8" layout list
end

   if Record "Spin counter" Data index = 3 each
  begin
   add 1 on Record "progression" Data Index
  end
   
{
  if Record "win" Data Index = 6 each
  begin
   reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
  put 1 on Record "win" Data Index

   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
  end
}
  if Record "Spin counter" Data index = 4 each
  begin
  reset all flags false
  put 1 on Record "Spin counter" Data index
  put 1 on Record "progression" Data Index
  put 1 on Record "win" Data Index
{ subtract 2 from Record "progression" Data Index
          if Record "progression" Data Index <= 0 each
          begin
             put 1 on Record "progression" Data Index
          end
  }
   clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout


end


  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    reset all flags false
    stop session
   // set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bet7" layout
clear Record "bet8" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
clear Record "bett7" layout
clear Record "bett8" layout
   End

  //reset all flags false
  // put 1 on Record "Spin counter" Data index

  end
END

[verrengia]

Hiiiii