from piscript.PiModule import *

init("virtual2", 120, 200)

beginpage()
gsave()
center()

scale(20)
setdeg()
translate(0,0)
rotate(-39)
gsave()
rotate(39)

newpath()
moveto(-3,0)
lineto(3,0)
stroke(0.7)

scalelinewidth(2)
newpath()
moveto(-1,0.05)
rlineto(2,0)
stroke(0,0,1)
newpath()
moveto(-1,-0.05)
rlineto(2,0)
stroke(1,0,0)
grestore()

A = 13
ell = 0.76
gsave()
translate(0,-4)


gsave()
newpath()
rotate(A)
moveto(0,0)
rlineto(0,ell)
moveto(0,0)
rotate(-2*A)
rlineto(0,ell)
stroke()
grestore()

newpath()
moveto(0,0)
arc(0,0,0.84*ell,90-A,90+A)
closepath()
fill(0.7,0.7,1)
stroke(0)

setdash([0.1,0.1], 0)
newpath()
rotate(A)
moveto(0,1.25*ell)
lineto(0,2*ell)
rotate(-2*A)
moveto(0,1.25*ell)
lineto(0,2*ell)
stroke(0.7)

grestore()

grestore()


setfont("/Helvetica-Bold", 9.5)
moveto(13,29)
show("virtual eye")

endpage()
flush()