home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FreeWare Collection 3
/
FreeSoftwareCollection3pd199x-jp.img
/
kxc
/
t_os
/
townsexp
/
nrdb
/
dx1.bas
< prev
next >
Wrap
BASIC Source File
|
1980-01-02
|
2KB
|
40 lines
10000 'Ray Tracing Data////////////////////////////////////
10000 '
10020 DATA DX1 'GRD形式ファイルネーム
10030 DATA -.330,.300,-.8945 '光線の単位ベクトル
10040 DATA 101,3,4 '第1パラメータ以外無意味
10310 DATA 3, 160, 0, 350, 34, 1,128,128,128,0, 10, 10,0 '円柱
10310 DATA 3, 80, 86, 400, 34, 1,128,128,128,0, 10, 10,0 '円柱
10310 DATA 3, -80, 86, 450, 34, 1,128,128,128,0, 10, 10,0 '円柱
10310 DATA 3, -160, 0, 500, 34, 1,128,128,128,0, 10, 10,0 '円柱
10310 DATA 3, -80, -86, 550, 34, 1,128,128,128,0, 10, 10,0 '円柱
10310 DATA 3, 80, -86, 600, 34, 1,128,128,128,0, 10, 10,0 '円柱
10310 DATA 1, 160, 0, 350, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, 86, 400, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, 86, 450, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -160, 0, 500, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, -86, 550, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, -86, 600, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 160, 0, 650, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, 86, 700, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, 86, 750, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -160, 0, 800, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, -86, 850, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, -86, 900, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 160, 0, 950, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, 86,1000, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, 86,1050, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -160, 0,1100, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, -86,1150, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, -86,1200, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 160, 0,1250, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, 86,1300, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, 86,1350, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -160, 0,1400, 34, 1,248,248, 0,0 '球体
10310 DATA 1, -80, -86,1450, 34, 1,248,248, 0,0 '球体
10310 DATA 1, 80, -86,1500, 34, 1,248,248, 0,0 '球体
10310 DATA 3, 0, 0,1600, 34, 1, 13,221,221,0, 35, 95, 15 '楕円体
15800 DATA 2, 9, 9, 1,8236, 0,160,160,112,0 '平面
15800 DATA 2, -9, -9, 1,8236, 0,160,160,112,0 '平面
10100 DATA 0,0