39 lines
1.1 KiB
ArmAsm
39 lines
1.1 KiB
ArmAsm
function printf(fmt,...)
|
|
log(string.format(fmt,unpack(arg)))
|
|
end
|
|
|
|
t_point_att = "internal\\internal_light_attpoint"
|
|
t_rt = "$user$rendertarget"
|
|
t_distort = "$user$distort"
|
|
t_noise = "fx\\fx_noise2"
|
|
|
|
function r1_lspot (shader, t_base, vs, aref)
|
|
shader:begin (vs,"add_spot")
|
|
: fog (false)
|
|
: zb (true,false)
|
|
: blend (true,blend.one,blend.one)
|
|
: aref (true,aref or 0)
|
|
shader:sampler ("s_base") :texture (t_base)
|
|
shader:sampler ("s_lmap") :texture ("internal\\internal_light_att")
|
|
: clamp ()
|
|
: f_linear ()
|
|
: project (true)
|
|
shader:sampler ("s_att") :texture ("internal\\internal_light_attclip")
|
|
: clamp ()
|
|
: f_linear ()
|
|
end
|
|
|
|
function r1_lpoint (shader, t_base, vs, aref)
|
|
shader:begin (vs,"add_point")
|
|
: fog (false)
|
|
: zb (true,false)
|
|
: blend (true,blend.one,blend.one)
|
|
: aref (true,aref or 0)
|
|
shader:sampler ("s_base") :texture (t_base)
|
|
shader:sampler ("s_lmap") :texture (t_point_att)
|
|
: clamp ()
|
|
: f_linear ()
|
|
shader:sampler ("s_att") :texture (t_point_att)
|
|
: clamp ()
|
|
: f_linear ()
|
|
end
|