| 1 |
; baseball stadium |
| 2 |
; kyuujou.scm Lat Lon scale rot Altitude |
| 3 |
; 1 2 3 4 5 |
| 4 |
|
| 5 |
Area( 5 %1 %2 10 ) |
| 6 |
PerspectiveCall( :L1 ) |
| 7 |
Jump( :END ) |
| 8 |
|
| 9 |
:L1 |
| 10 |
Perspective |
| 11 |
mif ( %5 ) |
| 12 |
RefPoint( 2 :L3 %3 %1 %2 E= %5 ) |
| 13 |
melse |
| 14 |
RefPoint( 7 :L3 %3 %1 %2 ) |
| 15 |
mifend |
| 16 |
mif( %4 ) |
| 17 |
RotatedCall( :L2 0 0 %4 ) |
| 18 |
Return |
| 19 |
mifend |
| 20 |
|
| 21 |
:L2 |
| 22 |
;; wall |
| 23 |
VecPoints( p 0 |
| 24 |
0 0 -50 0 0 ;0 |
| 25 |
20 0 -42 0 20 |
| 26 |
40 0 -20 0 70 |
| 27 |
50 0 10 0 100 |
| 28 |
40 0 30 0 120 |
| 29 |
20 0 45 0 150 |
| 30 |
0 0 50 0 180 |
| 31 |
-20 0 45 0 210 |
| 32 |
-40 0 30 0 240 |
| 33 |
-50 0 10 0 260 |
| 34 |
-40 0 -20 0 290 |
| 35 |
-20 0 -42 0 340 |
| 36 |
|
| 37 |
0 11 -50 0 0 ;12 |
| 38 |
20 11 -42 0 20 |
| 39 |
40 11 -20 0 70 |
| 40 |
50 11 10 0 100 |
| 41 |
40 11 30 0 120 |
| 42 |
20 11 45 0 150 |
| 43 |
0 11 50 0 180 |
| 44 |
-20 11 45 0 210 |
| 45 |
-40 11 30 0 240 |
| 46 |
-50 11 10 0 260 |
| 47 |
-40 11 -20 0 290 |
| 48 |
-20 11 -42 0 340 |
| 49 |
|
| 50 |
0 11 -50 30 180 ;24 |
| 51 |
20 11 -42 30 200 |
| 52 |
40 11 -20 30 250 |
| 53 |
50 11 10 30 280 |
| 54 |
40 11 30 30 300 |
| 55 |
20 11 45 30 330 |
| 56 |
0 11 50 30 0 |
| 57 |
-20 11 45 30 30 |
| 58 |
-40 11 30 30 60 |
| 59 |
-50 11 10 30 90 |
| 60 |
-40 11 -20 30 110 |
| 61 |
-20 11 -42 30 160 |
| 62 |
|
| 63 |
0 0 -34 30 180 ;36 |
| 64 |
12 0 -28 30 200 |
| 65 |
26 0 -10 30 250 |
| 66 |
32 0 10 30 280 |
| 67 |
28 0 24 30 300 |
| 68 |
18 0 34 30 330 |
| 69 |
0 0 38 30 0 |
| 70 |
-18 0 34 30 30 |
| 71 |
-28 0 24 30 60 |
| 72 |
-32 0 10 30 90 |
| 73 |
-26 0 -10 30 110 |
| 74 |
-12 0 -28 30 160 |
| 75 |
|
| 76 |
0 0 -20 0 0 ; 48 |
| 77 |
20 0 0 0 0 |
| 78 |
0 0 20 0 0 |
| 79 |
-20 0 0 0 0 |
| 80 |
32 0 12 0 0 |
| 81 |
-32 0 12 0 0 |
| 82 |
) |
| 83 |
|
| 84 |
SurfaceColor( 0A F0 ) |
| 85 |
Poly( m 0 32767 0 0 |
| 86 |
36 37 38 39 40 41 42 43 44 45 46 47 ) |
| 87 |
|
| 88 |
SurfaceColor( 06 F0 ) |
| 89 |
ConcavePoly |
| 90 |
Poly( m 0 32767 0 0 |
| 91 |
49 52 40 41 42 43 44 53 51 50 ) |
| 92 |
|
| 93 |
LineColor( 04 F0 ) |
| 94 |
MoveToPt( 48 ) |
| 95 |
DrawToPt( 49 50 51 48 ) |
| 96 |
MoveToPt( 49 ) |
| 97 |
DrawToPt( 52 ) |
| 98 |
MoveToPt( 51 ) |
| 99 |
DrawToPt( 53 ) |
| 100 |
|
| 101 |
ShadedColor( 04 F0 ) |
| 102 |
ShadedPoly( au 24 25 37 36 ) |
| 103 |
ShadedPoly( au 25 26 38 37 ) |
| 104 |
ShadedPoly( au 26 27 39 38 ) |
| 105 |
ShadedPoly( au 27 28 40 39 ) |
| 106 |
ShadedPoly( au 28 29 41 40 ) |
| 107 |
ShadedPoly( au 29 30 42 41 ) |
| 108 |
ShadedPoly( au 30 31 43 42 ) |
| 109 |
ShadedPoly( au 31 32 44 43 ) |
| 110 |
ShadedPoly( au 32 33 45 44 ) |
| 111 |
ShadedPoly( au 33 34 46 45 ) |
| 112 |
ShadedPoly( au 34 35 47 46 ) |
| 113 |
ShadedPoly( au 35 24 36 47 ) |
| 114 |
|
| 115 |
ShadedPoly( a 0 1 13 12 ) |
| 116 |
ShadedPoly( a 1 2 14 13 ) |
| 117 |
ShadedPoly( a 2 3 15 14 ) |
| 118 |
ShadedPoly( a 3 4 16 15 ) |
| 119 |
ShadedPoly( a 4 5 17 16 ) |
| 120 |
ShadedPoly( a 5 6 18 17 ) |
| 121 |
ShadedPoly( a 6 7 19 18 ) |
| 122 |
ShadedPoly( a 7 8 20 19 ) |
| 123 |
ShadedPoly( a 8 9 21 20 ) |
| 124 |
ShadedPoly( a 9 10 22 21 ) |
| 125 |
ShadedPoly( a 10 11 23 22 ) |
| 126 |
ShadedPoly( a 11 0 12 23 ) |
| 127 |
|
| 128 |
:L3 |
| 129 |
Return |
| 130 |
|
| 131 |
:END |
| 132 |
EndA |