PEN
PEN [#<stream expression> ,]<masked ink>
PEN 1,2
COMMAND: PEN sets the ink to be used when drawing at the given screen stream, defaulting to
screen # 0.
Associated keywords: INK, PAPER
PI
PI
PRINT PI
3.14159265
10 REM Perspective drawing
20 MODE 2
30 RAD
40 INK 1,0
50 INK 0,12
60 BORDER 9
70 FOR N= 1 TO 200
80 ORIGIN 420,0
90 DRAW 0,200
100 REM draw angles from vanishing point
110 DRAW 30*N*SIN(N*PI/4),(SIN(PI/2))*N*SIN(N)
120 NEXT
130 MOVE 0,200
140 DRAWR 0,50
150 DRAWR 40,0
160 WINDOW 1,40,1,10
170 PRINT"Now you can finish the you can finish the
Hangman program!"
FUNCTION: The value of the ratio between the circumference and the diameter of a circle. It is used
extensively in graphics routines such as the one listed above.
Associated keywords: DEG, RAD
To Next Page
Loading...
