home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FreeWare Collection 3
/
FreeSoftwareCollection3pd199x-jp.img
/
kxc
/
t_os
/
townsexp
/
nrdb
/
tranex.bas
< prev
next >
Wrap
BASIC Source File
|
1980-01-02
|
2KB
|
36 lines
10000 'Ray Tracing Data////////////////////////////////////
10000 '
10020 DATA TRANEX 'GRD形式ファイルネーム
10030 DATA -0.223,0.223,-.995 '光線の単位ベクトル
10040 DATA 101,3,4,0,0,900
10040 DATA 1, -31, 44, -26,80,1, 0, 0,160,0
10040 DATA 1, 45, 44, -25,80,1, 0, 0,160,0
10040 DATA 1, -49, 71, -72,50,1,160,160, 0,0
10040 DATA 1, -51, 71, 18,50,1,160,160, 0,0
10040 DATA 1, 69, 4, 37,80,1, 0, 0,160,0
10040 DATA 1, 63, 96, -23,50,1,160,160, 0,0
10040 DATA 1, 65, 20, -71,50,1,160,160, 0,0
10040 DATA 1, 143, 10, 41,80,1, 0, 0,160,0
10040 DATA 1, 45, -68, 35,80,1, 0, 0,160,0
10040 DATA 1, 48, 28, 83,50,1,160,160, 0,0
10040 DATA 1, 63, -96, 80,50,1,160,160, 0,0
10040 DATA 1, 65, -94, -10,50,1,160,160, 0,0
10040 DATA 1, -32, -69, 33,80,1, 0, 0,160,0
10040 DATA 1, -50,-122, 30,50,1,160,160, 0,0
10040 DATA 1, -58, -28, -26,80,1, 0, 0,160,0
10040 DATA 1, -52, -48, 81,50,1,160,160, 0,0
10040 DATA 1,-135, -28, -26,80,1, 0, 0,160,0
10040 DATA 1, -41, -53, -73,50,1,160,160, 0,0
10040 DATA 1,-163, 5, -84,72,1,160, 0,160,0
10040 DATA 1,-155, -4, 19,50,1,160,160, 0,0
10040 DATA 1,-154, -81, -26,50,1,160,160, 0,0
10040 DATA 1,-214, 1, -84,45,1,160,160, 0,0
10040 DATA 1,-148, -18,-127,45,1,160,160, 0,0
10040 DATA 1,-156, 34, -85,40,1,160,255,255,0
10040 DATA 1, 163, 71, 63,67,1, 0,160, 0,0
10040 DATA 1, 183, -34, 28,67,1, 0,160, 0,0
10040 DATA 1, 212, 71, 64,40,1,160,160, 0,0
10040 DATA 1, 155, 71, 92,40,1,160,255,255,0
10040 DATA 1, 157, 89, 40,40,1,160,255,255,0
10040 DATA 0, 0