
proc load_rocket_params {playername} {
	upvar $playername player
	
	player clearParameters

	# ois makee jos nää p-alkuset luettais suoraan shadereista
	
	set params {
		rot
		planerot
		targetheight
		targetz
		particle_a
		scene
		camdist
		camx
		camy
		camz
		p_geom_distort
		p_pulse
		p_glow
		p_mirror_x
		p_fullbright
		p_black
		p_desaturate
		p_overlay_alpha
		p_shake
		light_x
		light_y
		light_z
		light_target_y
		p_bloom_amount
		p_bloom_treshold
		}

	foreach param $params {
		player addParameter $param
	}
}

