Correct serrated or burr losangle after drawing a diamond polygon

[Camila Gomes Victorino]

Hi!
I have a binary decision making task where the subject needs to find out 
the diamond or losangle in one of the two sides. In the other one, there is 
a square and it needs to be identical to the diamond (just the angle 
position changes). I tried to draw the losangle and it worked, the problem 
is that the stimulus appears with serrated or burr sides. I tried to fix it 
putting the cnvs.penwidth and modifying it but it changes a lot the diamond 
and it needs to be identical to the square. I do not know how to fix it and 
get the serrated burrs out.

I wrote the code as this:

 'Declare variables
Dim r, centerX, centerY As Integer

'Create canvas
Set cnvs = Display.Canvas
cnvs.FillColor = CColor("White")
cnvs.Clear

'Create fixation point
cnvs.TextColor = CColor ("black")
cnvs.FontName = "Courier New"
cnvs.FontSize = "18"
cnvs.FontBold = CLogical("Yes")
cnvs.Text 313, 228, "+"

'Create gray squares
cnvs.Pencolor = CColor("Gray")
cnvs.Fillcolor = CColor("White")
cnvs.Rectangle 255, 205, 55, 62
cnvs.Rectangle Display.XRes -310, 205, 55, 62

'Show targets
cnvs.Pencolor = CColor("black")
cnvs.Fillcolor = CColor("black")
If c.getattrib("Target") = "Diamond" Then
'Write a left diamond 
Dim P (4) As Point
P(0).x = 280
P(0).y = 218
P(1).x = 296
P(1).y = 239
P(2).x = 280
P(2).y = 256
P(3).x = 265
P(3).y = 239
cnvs.Polygon P, 4

cnvs.Rectangle 345, 222, 25, 30
Else
'Write a Rectangle
cnvs.Rectangle 270, 222, 25, 30
'Write a Diamond

Dim L (4) As Point
L(0).x = 357
L(0).y = 218
L(1).x = 373
L(1).y = 239
L(2).x = 357
L(2).y = 256
l(3).x = 342
L(3).y = 239
cnvs.Polygon L, 4


End If

Sleep (1000)

Thank you!
Best regards, 

-- 
You received this message because you are subscribed to the Google Groups "E-Prime" group.
To unsubscribe from this group and stop receiving emails from it, send an email to e-prime+unsubscribe at googlegroups.com.
To post to this group, send email to e-prime at googlegroups.com.
To view this discussion on the web visit https://groups.google.com/d/msgid/e-prime/84cc7844-4a1d-489b-9eac-4b86d7468a7f%40googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://listserv.linguistlist.org/pipermail/eprime/attachments/20140108/1444bf6b/attachment.htm>