I'm having some problem with running this code in E-Prime (which runs code close to visual basic). I'm in quite the bind.
Here's the code I have for one small section
if (BlockRepeats <= 3) and ((100*(AB/ABpres)<minProf) or (100*(BC/BCpres)<minProf) or (100*(CD/CDpres)<minProf) or (100*(DE/DEpres)<minProf) or (100*(EF/EFpres)<minProf)) then
BlockRepeats = BlockRepeats + 1
goto BlockOne
else
goto BlockOneEnd
end if
end if
In short, a block (test section) is repeated if this criterion is not met ((100*(AB/ABpres)<minProf) or (100*(BC/BCpres)<minProf) or (100*(CD/CDpres)<minProf) or (100*(DE/DEpres)<minProf).
If that criterion is met, then they go to the next Block (BlockTwo, Block Three, etc.)
If that criterion is not met for a block, that block (BlockOne, BlockTwo, etc.) is redone and the BlockRepeats integer is updated.
The subject can only continue retrying a block if BlockRepeats is less than or equal to 3 (retrys) on any of the blocks in total (they can retry any of the blocks as long as they don't do it over 3 times).
Once BlockRepeats=4, the subject is kicked from the experiment by sending them to Dismiss (a reference at the end of the experiment).
As of right now, the only problem is that I don't know how to code for them going to Dismiss.