Кстати, о примерах....
Коллега С.Дубров, было дело - макакал меня мордой в то, что вчерась съел, за то, что я выступал в форуме без проверки своих советов - ветераны-соколовцы помнят...
Ну дык вот - с тех пор я внял!
Приведенный
( в доке )
пример
не работает:
...примере переменная Х ( численная ) в IF .. THEN используется безо всякой VALUE :
- Код: Выделить всё
SET X=1
AGAIN:
SET X=<X> + 1
;see compound strings for this
WRITE <X>
IF <X> < 9 THEN GOTO AGAIN
Не работает, кстати не только по логике, но даже по синтаксису! ("Дети! Кто это написал на доске это слово? Это очень плохое слово, дети...")
А вот мой пример работает именно так, как надо:
- Код: Выделить всё
set x = "1"
again:
set x = <x> + "1"
;see compound strings for this
WRITE <x>
IF <x> < VALUE "19" THEN GOTO AGAIN
(Значение константы сравнения увеличено, что бы отстроиться от совпадения строки и значения)
Кстати, лучше было бы его записать так:
- Код: Выделить всё
set x = "1"
again:
;see compound strings for this
WRITE <x>
set x = <x> + "1"
IF <x> < VALUE "19" THEN GOTO AGAIN
Желающие могут попробовать оба варианта, как с параметром VALUE, так и без:
18 сравнений с параметром VALUE., без параметра VALUE - только одно сравнение.
(Опытная пощадка: реальная сеть 2*NW51+6, вин2к рус, кл483+2конс, эквивалент админу.)
РЕЗЮМ(с): Дети, проверяйте доки практикой!