#################################
#				#
# 軌道上を動くマシンにあわせて	#
# トンネルが出来てゆくスクリプト#
#   blender2.42a / Python2.4	#
#	（2006/11/27）		#
#				#
#################################

import Blender
from Blender import Ipo

CF=Blender.Get("curframe")	# 現在のフレームを取得
SF=10				# デバッグ用の表示コマ

SP = 0.006			# 最初の表示ポイント
Pich = 0.002025			# 表示用のリングピッチ

MAX = (1.0,1.0,1.0)		#　MAXの定義 縮尺＝1.0 
MIN = (0.0,0.0,0.0)		#　MINの定義 縮尺＝0.0 

RC01 = Blender.Ipo.Get('Speed01') 		#　Ipo”Speed01”を取得
RCL  = RC01[Ipo.CU_SPEED].__getitem__(CF) 	#　現フレームにおけるSpeedの値

##############################################
# Get Object Data (オブジェクトデータの取得）#
##############################################

SSeg001 = Blender.Object.Get("S-Seg001")
SSeg002 = Blender.Object.Get("S-Seg002")
SSeg003 = Blender.Object.Get("S-Seg003")
		:
		:
	　　　(中略)
		:
		:
SSeg459 = Blender.Object.Get("S-Seg459")
SSeg460 = Blender.Object.Get("S-Seg460")

############################
# Tunnel MAX/MIN （On/Off）#
############################

if CF < SF : SSeg001.size= MAX	# 指定コマでデバック用の表示
elif SP+(Pich *	0) < RCL:	# Ipoの数値が指定以上のとき
	SSeg001.size= MAX	# 	→　  表示(大きさ=１)
else: 				# それ以外では
	SSeg001.size= MIN	# 	→　非表示(大きさ=０)
				
if CF < SF : SSeg002.size= MAX
elif SP+(Pich *	1) < RCL:
	SSeg002.size= MAX
else: 		
	SSeg002.size= MIN
				
if CF < SF : SSeg003.size= MAX
elif SP+(Pich *	2) < RCL:
	SSeg003.size= MAX
else: 		
	SSeg003.size= MIN

		:
		:
	　　　(中略)
		:
		:
				
if CF < SF : SSeg460.size= MAX
elif SP+(Pich *	459) < RCL:
	SSeg460.size= MAX
else: 		
	SSeg460.size= MIN