 |
 |
5.
Examples
> Some Examples
5.1. EXAMPLES | Example 1 | Example 2 | Example 3 |
5.1.1. EXAMPLE 1
PROBLEM:
To draw a Computer
PLANNING: Draw a BOX chart
CODING THE PROGRAM:
| CODING 1 (MAIN PROCEDURE) | CODING 2 | CODING 3 | CODING 4 | CODING 5 |
| TO
COMPUTER SCREEN KEYBOARD BASE END |
TO RECT
:L :W REPEAT 2[FD :L RT 90 FD :W RT 90] END |
TO
SCREEN RECT 40 60 END |
TO
KEYBOARD LT 135 FD 30 LT 135 FD 100 LT 135 FD 30 END |
TO BASE PU BK 30 LT 135 RECT 10 100 END |
SAMPLE
RUN: Type <COMPUTER>
5.1.2. EXAMPLE 2
PROBLEM:
To draw a Rocket
PLANNING: Draw a BOX chart
CODING THE PROGRAM:
| CODING 1 (MAIN PROCEDURE) | CODING 2 | CODING 3 | CODING 4 | CODING 5 | CODING 6 |
| TO
ROCKET HEAD BODY BASE END
|
TO
TRIANGLE REPEAT 3[FD 50 RT 120] END
|
TO
RECTANGLE REPEAT 2[FD 70 RT 90 FD 50 RT 90] END
|
TO HEAD RT 30 TRIANGLE END
|
TO BODY LT 30 PU BK 70 PD RECTANGLE END |
TO BASE LT 135 FD 20 LT 135 FD 80 LT 135 FD 20 END
|
SAMPLE
RUN: Type <ROCKET>
5.1.3. EXAMPLE 3
PROBLEM:
To draw a Butterfly
PLANNING: Draw a BOX chart
CODING THE PROGRAM:
| CODING 1 (MAIN PROCEDURE) | CODING 2 | CODING 3 | CODING 4 | CODING 5 | CODING 6 | CODING 7 | CODING 8 |
| TO BFLY LWING RWING ABDOMEN LEFTFEL RIGHTFEL END |
TO
TRISIZE :SIZE REPEAT 3[FD :SIZE LT 120] END
|
TO WING TRISIZE 25 TRISIZE 45 TRISIZE 65 END
|
TO LWING
LT 60 WING END
|
TO RWING RT 180 WING END
|
TO
ABDOMEN TRISIZE 60 TRISIZE 40 END
|
TO
LEFTFEL PU HOME LT 30 PD FD 60 LT 90 FD 10 END
|
TO
RIGHTFEL PU HOME RT 30 PD FD 60 RT 90 FD 10 END
|
SAMPLE
RUN: Type <BFLY>
HOME