Прошу помочь разобраться с работой с Flags
Posted: 27.09.2011 14:30
Прочитал топик Help для Stealth Release 1.0
Меня заинтересовало как работать с
Кто может более детально рассказать как с таким работать, а то у меня данный пример даже не запускается.
Допустим мы его запустили, как стелсу показать с какого итема считывать FlagSet?
13:15:05:921 [Se]: Compiler: [Error] (attack.txt at 4:42): Invalid number of parameters
13:15:05:921 [Se]: Compiling failed
13:15:05:921 [Se]: Script attack.txt stopped successfuly
Меня заинтересовало как работать с
Code: Select all
Program New;
var FlagSet: TTileDataFlagSet;
begin
// флаги, что соответствуют 67117569
// [tdfBackground,tdfSurface,tdfNoShoot,tdfUnknown2]
FlagSet:= ConvertIntegerToFlags(67117569);
IF tdfSurface in FlagSet then
AddToSystemJournal('surface');
IF tdfImpassable in FlagSet then
AddToSystemJournal('impass');
end. Допустим мы его запустили, как стелсу показать с какого итема считывать FlagSet?
13:15:05:921 [Se]: Compiler: [Error] (attack.txt at 4:42): Invalid number of parameters
13:15:05:921 [Se]: Compiling failed
13:15:05:921 [Se]: Script attack.txt stopped successfuly