Существует ли возможность передать процедуре список для выбора меню? Или как это лучше сделать иначе?
Привожу пример из инжекта:
Code: Select all
Procedure make_plate;
For a = 1 to 6 do
Begin
menu[1] := 'waitmenu 'What' 'Armors' 'What' 'Platemail' 'What' 'Breastplate'';
menu[2] := 'waitmenu 'What' 'Armors' 'What' 'Platemail' 'What' 'Platemail Legs'';
menu[3] := 'waitmenu 'What' 'Armors' 'What' 'Platemail' 'What' 'Platemail Arms'';
menu[4] := 'waitmenu 'What' 'Armors' 'What' 'Helmets' 'What' 'Plate Helm'';
menu[5] := 'waitmenu 'What' 'Armors' 'What' 'Platemail' 'What' 'Platemail Gloves'';
menu[6] := 'waitmenu 'What' 'Shields' 'What' 'Heater'';
item[1] := $1415;
item[2] := $1411;
item[3] := $1410;
item[4] := $1412;
item[5] := $1414;
item[6] := $1B76;
BS(menu[a],item[a]);
End;