Download Simscript III Graphics Manual

Color'_cyan, LineStyle)
call end_drawing(aGraphic)i
''5) draw a pie.
create aGraphic
file this aGraphic in graphic_set(theView)
let name(aGraphic) = "majenta pie"
call begin_drawing(aGraphic)
let pattern(FillStyle) = FillStyle'_narrow_diagonal
call draw_pie(aGraphic)(150, 150, 50, pi.c / 4, 3 * pi.c / 4,
Color'_majenta, FillStyle)
call end_drawing(aGraphic)
let location_x(aGraphic) = 350
''shift position of this shape
''6) draw a circle.
create aGraphic
file this aGraphic in graphic_set(theView)
let name(aGraphic) = "yellow pie"
call begin_drawing(aGraphic)
let pattern(FillStyle) = FillStyle'_wide_crosshatch
call draw_circle(aGraphic)(150, 150, 50, Color'_yellow, FillStyle)
call end_drawing(aGraphic)
let location_x(aGraphic) = 700
''shift position of this shape
''display window and contents of canvas
call display(theWindow)
''loop until the user dismisses the window
while visible(theWindow) <> 0
call handle.events.r(1)
''handle any mouse events
end
36