<div dir="ltr"><div>Hi all,</div><div> </div><div>New to the in-depth programming of Eprime, and all I want to do is allow participants to use the mouse to draw 3 lines visible on-screen over an image that is presented. The basic idea would be to have them click on the initiation point for the line, and then click where they want the line to end.</div><div> </div><div>I've tried to go through the help material and the forums, and cobbled together this little bit of inline code that currently sits immediately before my image. Can someone point me in the right direction for correcting this?</div><div> </div><div>Dim cnvs As Canvas<br>Set cnvs = Display.Canvas<br>Dim xPos, yPos, xPosTwo, yPosTwo As Integer<br>Dim counter As Integer<br>counter = 0<br>Mouse.ShowCursor True<br>Dim rdMouse1 As MouseResponseData<br>Dim mouseClicks As Integer  </div><div>If counter < 3 Then<br> <br>   mouseClicks = Fixation.InputMasks.Item(1).Responses.Count </div><div>                      If mouseClicks > 0 Then</div><div>                                   Set rdMouse1 = CMouseResponseData(Fixation.InputMasks.Responses(1))</div><div>                                   xPos = rdMouse1.CursorX</div><div>                                   yPos = rdMouse1.CursorY</div><div>            </div><div>                                   sleep 50</div><div>                               </div><div>                                   set rdMouse1 = CMouseResponseData(Fixation.InputMasks.Responses(2))</div><div>                                   xPosTwo = rdMouse1.CursorX</div><div>                                   yPosTwo = rdMouse1.CursorY</div><div> </div><div>                         END IF</div><div> </div><div> cnvs.PenWidth = 30<br> cnvs.PenColor = CColor ("red")<br> cnvs.Line xPos, yPos, xPosTwo, yPosTwo<br> counter = counter + 1<br>   <br>END IF</div><div> </div><div> </div><div> </div><div>Thanks!</div><div>-Robert</div></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/msgid/e-prime/4464893c-ff01-4661-b5f6-7f617b37cc5a%40googlegroups.com">https://groups.google.com/d/msgid/e-prime/4464893c-ff01-4661-b5f6-7f617b37cc5a%40googlegroups.com</a>.<br />
For more options, visit <a href="https://groups.google.com/groups/opt_out">https://groups.google.com/groups/opt_out</a>.<br />