arency ObjectNumber,trans<BR>
print "press 3 to set object cull";cull:if inkey$()="3" then cull=1-cull:set object cull ObjectNumber,cull<BR>
print "press 4 to set object filter";filter:if inkey$()="4" then filter=1-filter:set object filter ObjectNumber,filter<BR>
print "press 5 to set object light";light:if inkey$()="5" then light=1-light:set object light ObjectNumber,light<BR>
print "press 6 to set object fog";fog:if inkey$()="6" then fog=1-fog:set object fog ObjectNumber,fog<BR>
print "press 7 to set obje