Урок №5 Скрипт по созданию рандомного обьекта из списка в списке секторов.
Смысл в том, чтобы создать в нужных нам секторах обломки кораблей...
| Код:- 001 $Sector.list = array alloc: size=0
- 002 append {Argon Prime} to array $Sector.list
- 003 append {Black Hole Sun} to array $Sector.list
- 004 append {Cloudbase North West} to array $Sector.list
- 005 append {Earth} to array $Sector.list
- 006
- 007 $Sector.list.size = size of array $Sector.list
- 008 $Count = 0
- 009 while $Count < $Sector.list.size
- 010 $Sector = $Sector.list[$Count]
- 011
- 012 $Wracks.var = random value from 1 to 4 - 1
- 013
- 014 if $Wracks.var == 1
- 015 $Wracks = 110
- 016 else if $Wracks.var == 2
- 017 $Wracks = 111
- 018 else if $Wracks.var == 3
- 019 $Wracks = 113
- 020 else if $Wracks.var == 4
- 021 $Wracks = 114
- 022 end
- 023
- 024 $X = random value from -30000 to 30000 - 1
- 025 $Y = random value from -30000 to 30000 - 1
- 026 $Z = random value from -30000 to 30000 - 1
- 027
- 028 $CREATE = create special: type=$Wracks addto=$Sector x=$X y=$Y z=$Z
- 029
- 030 inc $Count =
- 031 end
- 032 return null
|
| |
001 Создание арейя (списка)
002 - 005 Команда добавления секторов в список (арей) 007 - 010 Незнаю как это назвать... скажу проще... это разбивание списка на поштучный, к каждому из которого будут применены команды до пункта END
012 Команда рандомного выбора числа от 1 до 4 014, 016, 018, 020 сравнение числа на соответствие
015, 017, 019, 021 В случеи соответствия чисел указывается номер (в папке тайпс есть файл Тспециал, в котором и можно посмотреть под коким номером что находится) обломков.
022 Конец для соответствий чисел.
024 - 026 выбор рандомной позиции по X Y X координатам... от -30км до 30км 028 Это сама команда по созданию специальных обьектов 030 Обнуление 031 Это тот самый пункт END 032 Завершение скрипта.
П.с. Вот и все! Удачной писанины... |