home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 5
/
ctrom5b.zip
/
ctrom5b
/
DOS
/
CALCULAT
/
SM32A
/
GRAPH.SM
< prev
next >
Wrap
Text File
|
1993-11-09
|
373b
|
9 lines
# this is demo for drawing a group of circles and ovals.
# Circles are 9 planets around sun.
graph # graph mode
do(circle(getmaxx*0.5+2.5*x,getmaxy*0.5,5), x,0,90,10)
do(oval(getmaxx*0.5,getmaxy*0.5,2.5*x,x), x,10,90,10)
readchar # pause graph by read a char
text # text mode