Единоразовое использование

[tito]

Как вызвать сообщение или действие один раз, при многоразовой проверке?

Ну например if Weight > 1000 then UOSay('Перегруз');
Чтобы один раз только надпись вызывалась, а не постоянно пока вес не уменьшиться?

[drabadan]

Как вызвать сообщение или действие один раз, при многоразовой проверке?

Ну например if Weight > 1000 then UOSay('Перегруз');
Чтобы один раз только надпись вызывалась, а не постоянно пока вес не уменьшиться?

Code: Select all

while true do
if weight > 1000 then
 begin
  UOSay('lalalalalalalalalala ;)');
  exit;
 end;