Ein Beispiel wie man ein Haufen Objekte mit Materialien, Maps und Texturen erstellen lassen kann.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 |
tex = #(\ "D:\\tmp\\tex_001.jpg", \ "D:\\tmp\\tex_002.jpg", \ "D:\\tmp\\tex_003.jpg", \ "D:\\tmp\\tex_004.jpg", \ "D:\\tmp\\tex_005.jpg", \ "D:\\tmp\\tex_006.jpg", \ "D:\\tmp\\tex_007.jpg", \ "D:\\tmp\\tex_008.jpg", \ "D:\\tmp\\tex_009.jpg", \ "D:\\tmp\\tex_010.jpg", \ "D:\\tmp\\tex_011.jpg", \ "D:\\tmp\\tex_012.jpg", \ "D:\\tmp\\tex_013.jpg", \ "D:\\tmp\\tex_014.jpg", \ "D:\\tmp\\tex_015.jpg", \ "D:\\tmp\\tex_016.jpg", \ "D:\\tmp\\tex_017.jpg", \ "D:\\tmp\\tex_018.jpg", \ "D:\\tmp\\tex_019.jpg", \ "D:\\tmp\\tex_020.jpg", \ "D:\\tmp\\tex_021.jpg", \ "D:\\tmp\\tex_022.jpg", \ "D:\\tmp\\tex_023.jpg", \ "D:\\tmp\\tex_024.jpg", \ "D:\\tmp\\tex_025.jpg", \ "D:\\tmp\\tex_026.jpg", \ "D:\\tmp\\tex_027.jpg", \ "D:\\tmp\\tex_028.jpg", \ "D:\\tmp\\tex_029.jpg", \ "D:\\tmp\\tex_030.jpg" \ ) for i = 1 to 500 do ( Box length:(random 1 50) width:(random 1 50) height:(random 1 50) pos:[(random -500 500),(random -500 500),(random -500 500)] isSelected:on str = "000" + (i as string) if str.count == 5 then ( sub= substring str 2 -1 ) else if str.count == 6 then ( sub= substring str 3 -1 ) else if str.count == 7 then ( sub= substring str 4 -1 ) else sub = str newmat = Arch___Design__mi() newmat.name = ("MAT_" + sub) newmat.diff_color_map = falloff () newmat.diff_color_map.name = ("falloff_" + sub) newmat.diff_color_map.MAP1 = bitmaptexture filename:tex[random 1 30] selection[1].material = newmat ) |