function normal(shader, t_base, t_second, t_detail)
    shader:begin("wmark", "wmark")
        :sorting(1, false)
        :aref(false, 0)
        :zb(true, true)
        :fog(true)
    shader:sampler("s_base"):texture(t_base)
end

function l_spot(shader, t_base, t_second, t_detail)
    r1_lspot(shader, t_base, "wmark_spot")
end

function l_point(shader, t_base, t_second, t_detail)
    r1_lpoint(shader, t_base, "wmark_point")
end