procedure Add1Texture(t: integer);
Creates the Background texture for additional attribute 1
TFlowBg Class