это пример из хелпа. он понятен
не понятно др. вот обьект (деревян. стена) мне надо его наверно размножить и раставить на карте. Я видел в примерах тама пишут типа
Dim blox(7,7,Levels)
Dim numblox(Levels)
For l=0 To Levels
Select l
Case 0: Restore Level0
.................
Case 5: Restore Level5
End Select
For by=0 To 7
*For bx=0 To 7
* Read blox(bx,by,l)
* If blox(bx,by,l)>0 And blox(bx,by,l)<8 Then numblox(l)=numblox(l)+1
*Next; bx
Next; by
Next;l
.Level0
Data 0,0,0,0,0,0,0,0
Data 1,1,1,1,1,1,1,1
Data 1,1,1,1,1,1,1,1
Data 1,1,1,1,1,1,1,1
Data 1,1,1,1,1,1,1,1
Data 1,1,1,1,1,1,1,1
Data 1,1,1,1,1,1,1,1
Data 1,1,1,1,1,1,1,1
но как это раборает и называется я незнаю. хотябы принцип?