Browse Subversion Repository
Contents of /trunk/freesc/tokugawa.scm
 Parent Directory
|  Revision Log
Revision 30 -
( show annotations)
( download)
Mon Feb 26 13:50:55 2007 UTC
(17 years, 1 month ago)
by tmurakam
File size: 533 byte(s)
file moved
| 1 |
; |
| 2 |
; 徳川美術館 (Tokugawa art museum) |
| 3 |
; |
| 4 |
if (!$WithPhoto) |
| 5 |
Area( 5 N35:10:52.0 E136:56:9.4 5 ) |
| 6 |
; LayerCall を使わないと表示されない。scasm 付属の sc_hints.txt を参照 |
| 7 |
LayerCall( :L1 4 ) |
| 8 |
Jump( : ) |
| 9 |
|
| 10 |
:L1 |
| 11 |
Refpoint( 7 :No_object 1 N35:10:52.0 E136:56:9.4 ) |
| 12 |
|
| 13 |
Points( 0 |
| 14 |
-102 0 157 ; 0 |
| 15 |
149 0 120 ; 1 |
| 16 |
98 0 -154 ; 2 |
| 17 |
-143 0 -120 ; 3 |
| 18 |
) |
| 19 |
|
| 20 |
Bitmap( broad.r8 0 0 0 0 ) |
| 21 |
ConcavePoly |
| 22 |
StartSurface |
| 23 |
MoveToPt( 0 ) |
| 24 |
DrawToPt( 1 2 3 ) |
| 25 |
EndSurface |
| 26 |
:No_object |
| 27 |
Return |
| 28 |
|
| 29 |
EndA |
| 30 |
endif |
| 31 |
|
| 32 |
Macro( build.scm N35:10:49.77 E136:56:11.87 0 4 40 80 05 0 1F ) |
| 33 |
|
Properties
| svn:eol-style |
native
|
| svn:keywords |
Author Date Id Revision
|
| 
Parent Directory
Revision Log