OP here. I figured I would update this post with my PST Support conversation so far. As of now, it remains unresolved: please see below.<div><br></div><div>Best,</div><div>ekwing</div><div>_______________________________________</div><div><table class="tableDetail" cellpadding="0" cellspacing="0" style="border-color: rgb(102, 102, 153); font-family: 'Trebuchet MS', Arial, Helvetica; width: 1678px; padding-right: 5px; padding-left: 10px; font-size: 10pt;"><tbody><tr style="background-color: rgb(240, 248, 255); background-position: initial initial; background-repeat: initial initial;"><td valign="top" width="100%" style="font-size: x-small; border-color: rgb(102, 102, 153);"><table class="tableDetail" cellpadding="0" cellspacing="0" style="border-color: rgb(102, 102, 153); background-color: white; width: 1678px; padding-right: 5px; padding-left: 10px; font-size: 10pt;"><tbody><tr style="background-color: rgb(240, 248, 255); background-position: initial initial; background-repeat: initial initial;"><td colspan="2" style="font-size: x-small; border-color: rgb(102, 102, 153);"><font size="-1">Dear ekwing,<br><br>I would be happy to help.<br><br>I have attached a modified version of your experiment(.es2) file that I believe solves this issue. <br><br>I have created a variable in the experiment called “endtime”. This variable is in charge of the time limit for the selection of stimuli. If you open your Init InLine object, you can see where the “endtime” variable is created and set. <br><br>Then, if you open the DoHitTest InLine object, you can see how the “endtime” variable is implemented. In this experiment, it is placed into a simple “If…Then” statement. This “If…Then” statement compares the current time (clock.read) to the “endtime” variable. If this portion of the experiment runs longer than the amount of time set by the “endtime” variable, then the experiment is set to go to the “EndStimulus” label. <br><br>Please let me know if you have any other questions after taking a look at this sample experiment.<br><br>Sincerely,<br>################<br>Technical Consultant</font></td></tr></tbody></table><div style="color: rgb(0, 0, 0); background-color: white; height: 1pt; font-size: 6pt;"> </div><table class="tableDetail" cellpadding="0" cellspacing="0" style="border-color: rgb(102, 102, 153); background-color: white; width: 1678px; padding-right: 5px; padding-left: 10px; font-size: 10pt;"><tbody><tr style="background-color: rgb(240, 248, 255); background-position: initial initial; background-repeat: initial initial;"><td valign="top" width="100%" style="font-size: x-small; border-color: rgb(102, 102, 153);"><font size="-1"><strong>From ekwing on 2/4/2013 4:59:00 PM</strong></font></td><td align="center" valign="top" nowrap="" style="font-size: x-small; border-color: rgb(102, 102, 153); padding-top: 5px; padding-right: 5px;"><font size="-1"> </font></td></tr><tr style="background-color: rgb(240, 248, 255); background-position: initial initial; background-repeat: initial initial;"><td colspan="2" style="font-size: x-small; border-color: rgb(102, 102, 153);"><font size="-1">Hi #######,<br><br>Thank you for helping me with this issue, however, I believe my problem remains unresolved.<br><br>Simply running and testing the sample experiment you attached shows that the slide still does not advance after 5 seconds regardless of the selections made; that is, it persists to advance 5 seconds after a selection is made on the screen, not after the slide initially comes on.<br><br>I'll try to phrase my issue another way. The main problem lies in the "Highlight Selection" inline code, where there is a large "if" statement that concludes with "Goto RedoTrial". The if statement codes for the selection of a stimulus, and then goes to Redotrial, allowing for the if statement to be activated again (i.e. allowing for the selection of the next stimulus). This process, however, resets the slide, and therefore also resets the slide timer, making the endtime variable you created no better than the slide duration set in the slide properties of the stimulus slide.<br><br>What I need is for the slide to advance after 5 seconds from initially coming on the screen, not 5 seconds after the participant has made their latest selection. This would involve a work around for the "Goto RedoTrial" part of the code; I need something that allows the participant to make all 3 ratings on the same screen without the slide resetting (i.e. going to RedoTrial). <br><br>Additionally, in the version of the study you provided, you commented out the following code: <br><br>'If the subject did not click on a box or the SlideText used to exit the trial,<br>'then loop back to the Stimulus so the subject can make another selection.<br>'If strHit = "Question" OR strHit = "State1" OR strHit = "State2" OR strHit = "" Then<br>' Goto RedoTrial<br><br>This code is necessary for the study as well; if it is not there, the study will crash if the slide is clicked on anywhere but the text boxes. As you can see, this code involves "Goto Retrial" as well, and so it would have to be modified.<br><br>Please feel free to email me (###########) if any further clarification is necessary or if that would be a quicker form of communication. I sincerely appreciate your help and apologize if my descriptions of the issue have not been as clear as they could be.<br><br>Thanks again,<br>ekwing<br><br></font></td></tr></tbody></table></td><td align="center" valign="top" nowrap="" style="font-size: x-small; border-color: rgb(102, 102, 153); padding-top: 5px; padding-right: 5px;"><br></td></tr></tbody></table>On Thursday, January 24, 2013 11:14:54 AM UTC-7, ekwing wrote:<blockquote class="gmail_quote" style="margin: 0;margin-left: 0.8ex;border-left: 1px #ccc solid;padding-left: 1ex;">Hi everyone,<div><br></div><div>I made a related post about this issue a couple weeks ago (which saw no activity), however I have progressed since then and wanted to make a new post with the updated information.</div><div><br></div><div>The goal of my current project is to create a slide which contains 3 rating scales and allows participants to use the mouse to select one rating on each scale before advancing after 5 seconds (regardless of whether all ratings were made or not). The project is currently set up so that each scale point is represented by an individual text box which becomes activated (i.e. turns and remains a different color and logs data) when clicked. </div><div><br></div><div>Currently, everything about the slide is functional, with the exception of advancing after 5 seconds. Because, I believe, there is a change in slide state when a text box becomes "activated" (the participant makes a selection), the 5 second slide duration resets every time a participant makes a rating scale selection. This, in turn, results in the slide advancing 5 seconds after the participant makes their final selection, rather than advancing 5 seconds after the slide comes on the screen as desired.</div><div><br></div><div>As a secondary question, I was wondering if anyone with experience with slide states had any problems with data collection (E-Prime logging and Physio) or if you can foresee any problems I may run into using this technique.</div><div><br></div><div>I've had problems attaching files in the past, but will post the relevant inline code that follows the stimulus slide below. Also, the stimulus slide properties currently have Duration set to 5000ms, Timing Mode is Cumulative, and a Mouse as a registered device with the following properties:</div><div><br></div><div>Allowable: 1</div><div>Time limit: (Same as duration)</div><div>End Action: Terminate</div><div><br></div><div>Thanks for any help you can provide,</div><div>ekwing</div><div><br></div><div><b>DOHIT TEST</b></div><div><div>'Designate "theState" as the Default Slide State, which is the</div><div>'current ActiveState on the Slide object "Stimulus".</div><div>Dim theState as SlideState</div><div>Set theState = Stimulus.States("Default")</div><div><br></div><div>Dim strHit As String</div><div>Dim theMouseResponseData As MouseResponseData</div><div><br></div><div>'Was there a response?</div><div>If Stimulus.InputMasks.Responses.<wbr>Count < 1 Then</div><div><br></div><div><span style="white-space:pre"> </span>Set theMouseResponseData = Nothing</div><div><br></div><div>End If</div><div><br></div><div>'Was there a response?</div><div>If Stimulus.InputMasks.Responses.<wbr>Count = 1 Then</div><div><br></div><div><span style="white-space:pre"> </span>'Get the mouse response.</div><div><span style="white-space:pre"> </span>Set theMouseResponseData = CMouseResponseData(Stimulus.<wbr>InputMasks.Responses(1))</div><div><br></div><div><span style="white-space:pre"> </span>'Determine name of SlideText object at mouse click coordinates. Assign that value to </div><div><span style="white-space:pre"> </span>'strHit.</div><div><span style="white-space:pre"> </span>strHit = theState.HitTest(<wbr>theMouseResponseData.CursorX, theMouseResponseData.CursorY)</div><div><br></div><div>'<span style="white-space:pre"> </span>Else</div><div>'<span style="white-space:pre"> </span>Set theMouseResponseData = Nothing</div><div><br></div><div>End If</div><div><br></div><div>'Was there a response?</div><div>If Stimulus.InputMasks.Responses.<wbr>Count = 2 Then</div><div><br></div><div><span style="white-space:pre"> </span>'Get the mouse response.</div><div><span style="white-space:pre"> </span>Set theMouseResponseData = CMouseResponseData(Stimulus.<wbr>InputMasks.Responses(2))</div><div><br></div><div><span style="white-space:pre"> </span>'Determine name of SlideText object at mouse click coordinates. Assign that value to </div><div><span style="white-space:pre"> </span>'strHit.</div><div><span style="white-space:pre"> </span>strHit = theState.HitTest(<wbr>theMouseResponseData.CursorX, theMouseResponseData.CursorY)</div><div><br></div><div>'<span style="white-space:pre"> </span>Else</div><div>'<span style="white-space:pre"> </span>Set theMouseResponseData = Nothing</div><div><br></div><div>End If</div><div><br></div><div>'Was there a response?</div><div>If Stimulus.InputMasks.Responses.<wbr>Count = 3 Then</div><div><br></div><div><span style="white-space:pre"> </span>'Get the mouse response.</div><div><span style="white-space:pre"> </span>Set theMouseResponseData = CMouseResponseData(Stimulus.<wbr>InputMasks.Responses(3))</div><div><br></div><div><span style="white-space:pre"> </span>'Determine name of SlideText object at mouse click coordinates. Assign that value to </div><div><span style="white-space:pre"> </span>'strHit.</div><div><span style="white-space:pre"> </span>strHit = theState.HitTest(<wbr>theMouseResponseData.CursorX, theMouseResponseData.CursorY)</div><div><br></div><div>'<span style="white-space:pre"> </span>Else</div><div>'<span style="white-space:pre"> </span>Set theMouseResponseData = Nothing</div><div><br></div><div>End If</div><div><br></div><div>'If the subject did not click on a box or the SlideText used to exit the trial,</div><div>'then loop back to the Stimulus so the subject can make another selection.</div><div>'If strHit = "Question" OR strHit = "State1" OR strHit = "State2" OR strHit = "" Then</div><div>'<span style="white-space:pre"> </span>Goto RedoTrial</div><div>'End If</div><div><br></div><div>'Release references</div><div>'Set theMouseResponseData = Nothing</div></div><div><br></div><div><b>HIGHLIGHT SELECTION</b></div><div><div>'Declare SlideText variable used for modifying box properties.</div><div>Dim xSlide As SlideText</div><div><br></div><div>'Declare string for holding the name of the Row the box clicked is in.</div><div>Dim strRow As String</div><div><br></div><div>'Declare variables for storing subject's final rating.</div><div>Dim intRating1 As Integer, intRating2 As Integer, intRating3 As Integer</div><div><br></div><div>If Stimulus.InputMasks.Responses.<wbr>Count > 0 Then</div><div><br></div><div> 'Gain access to selected box.</div><div> Set xSlide = CSlideText(Stimulus.States.<wbr>Item("Default").Objects(<wbr>strHit))</div><div><br></div><div> 'Store the name of the row the box was clicked in. This Mid function will return</div><div> 'the first 4 characters of strHit (the name of the box) and store them in strRow</div><div> strRow = Mid(strHit, 1, 4)</div><div><span style="white-space:pre"> </span></div><div><span style="white-space:pre"> </span>Select Case strRow</div><div> Case "Row1"</div><div><br></div><div><span style="white-space:pre"> </span> 'If a box in this row has not yet been selected...</div><div><span style="white-space:pre"> </span> If R1 = False Then</div><div><br></div><div><span style="white-space:pre"> </span> 'Highlight this box and set R1 to true (a box in this row has now been selected)</div><div><span style="white-space:pre"> </span>xSlide.BackColor = CColor("yellow")</div><div><span style="white-space:pre"> </span>R1 = True</div><div><br></div><div><span style="white-space:pre"> </span>'Return the final character in strHit (the digit) as subject's rating for this</div><div><span style="white-space:pre"> </span>'row.</div><div><span style="white-space:pre"> </span>intRating1 = CInt(Mid(strHit, 5, 1))</div><div><br></div><div> 'If a box in this row has been selected...</div><div><span style="white-space:pre"> </span> Else</div><div><br></div><div><span style="white-space:pre"> </span>'If this is the box that has already been selected, reset the color and set R1</div><div><span style="white-space:pre"> </span>'to false (a box in this row has not been selected). Otherwise, do nothing.</div><div><span style="white-space:pre"> </span> If xSlide.BackColor = CColor("yellow") Then</div><div><span style="white-space:pre"> </span> xSlide.BackColor = CColor("green")</div><div><span style="white-space:pre"> </span> R1 = False</div><div><span style="white-space:pre"> </span> End If</div><div><br></div><div><span style="white-space:pre"> </span> End If</div><div><span style="white-space:pre"> </span></div><div><br></div><div> <span style="white-space:pre"> </span>Case "Row2"</div><div><br></div><div><span style="white-space:pre"> </span> 'If a box in this row has not yet been selected...</div><div><span style="white-space:pre"> </span> If R2 = False Then</div><div><br></div><div><span style="white-space:pre"> </span>'Highlight this box and set R2 to true (a box in this row has now been selected)</div><div><span style="white-space:pre"> </span>xSlide.BackColor = CColor("yellow")</div><div><span style="white-space:pre"> </span>R2 = True</div><div><br></div><div><span style="white-space:pre"> </span>'Return the final character in strHit (the digit) as subject's rating for this</div><div><span style="white-space:pre"> </span>'row.</div><div><span style="white-space:pre"> </span>intRating2 = CInt(Mid(strHit, 5, 1))</div><div><br></div><div><span style="white-space:pre"> </span> 'If a box in this row has been selected...<span style="white-space:pre"> </span></div><div> Else</div><div><br></div><div><span style="white-space:pre"> </span>'If this is the box that has already been selected, reset the color and set R2</div><div><span style="white-space:pre"> </span>'to false (a box in this row has not been selected). Otherwise, do nothing.</div><div><span style="white-space:pre"> </span> If xSlide.BackColor = CColor("yellow") Then</div><div><span style="white-space:pre"> </span> xSlide.BackColor = CColor("green")</div><div><span style="white-space:pre"> </span> R2 = False</div><div><span style="white-space:pre"> </span> End If</div><div><br></div><div><span style="white-space:pre"> </span> End If</div><div><br></div><div><br></div><div><span style="white-space:pre"> </span>Case "Row3"</div><div><br></div><div><span style="white-space:pre"> </span> 'If a box in this row has not yet been selected...</div><div><span style="white-space:pre"> </span> If R3 = False Then</div><div><br></div><div><span style="white-space:pre"> </span>'Highlight this box and set R3 to true (a box in this row has now been selected)</div><div><span style="white-space:pre"> </span>xSlide.BackColor = CColor("yellow")</div><div><span style="white-space:pre"> </span>R3 = True</div><div><br></div><div><span style="white-space:pre"> </span>'Return the final character in strHit (the digit) as subject's rating for this</div><div><span style="white-space:pre"> </span>'row.</div><div><span style="white-space:pre"> </span>intRating3 = CInt(Mid(strHit, 5, 1))</div><div><br></div><div><span style="white-space:pre"> </span> 'If a box in this row has been selected...<span style="white-space:pre"> </span></div><div> Else</div><div><br></div><div><span style="white-space:pre"> </span>'If this is the box that has already been selected, reset the color and set R3</div><div><span style="white-space:pre"> </span>'to false (a box in this row has not been selected). Otherwise, do nothing.</div><div><span style="white-space:pre"> </span> If xSlide.BackColor = CColor("yellow") Then</div><div><span style="white-space:pre"> </span> xSlide.BackColor = CColor("green")</div><div><span style="white-space:pre"> </span> R3 = False</div><div><span style="white-space:pre"> </span> End If</div><div><br></div><div><span style="white-space:pre"> </span> End If</div><div> <span style="white-space:pre"> </span> End Select</div><div><span style="white-space:pre"> </span></div><div><br></div><div> Goto RedoTrial</div><div> </div><div> ' Else</div><div> <span style="white-space:pre"> </span> 'If R1 = False Or R2 = False OR R3 = False Then</div><div> <span style="white-space:pre"> </span>' Goto EndStimulus</div><div><br></div><div><span style="white-space:pre"> </span>' End If</div><div><br></div><div> End If</div></div></blockquote></div>
<p></p>
-- <br />
You received this message because you are subscribed to the Google Groups "E-Prime" group.<br />
To unsubscribe from this group and stop receiving emails from it, send an email to e-prime+unsubscribe@googlegroups.com.<br />
To post to this group, send email to e-prime@googlegroups.com.<br />
To view this discussion on the web visit <a href="https://groups.google.com/d/msg/e-prime/-/niZqw7lAFroJ">https://groups.google.com/d/msg/e-prime/-/niZqw7lAFroJ</a>.<br />
For more options, visit <a href="https://groups.google.com/groups/opt_out">https://groups.google.com/groups/opt_out</a>.<br />
<br />
<br />