SWPSUBN   Вычитание макроцифр, хранящихся как в ящиках, так и в поле зрения

 SYSTEM SWPSUBN

 <SWPSUBN [arg1][arg2]>

   Вычитание производится из первого аргумента. Операнды могут находиться
   как в ящике, так и в поле зрения.

   Значение:  Результат процедура помещает в первый аргумент, то есть,
              если arg1 находится в ящике, то в ящик первого аргумента,
              если в поле зрения, то в поле зрения.

  -------------------------------- Пример ----------------------------------

                  START
                  ENTRY task
                  SYSTEM PROUT,WTR,RDR,SWPSUBN,SYMB
                  SWAP box,box1
         task =   <WTR /box//100/>                  +
                  <SWPSUBN /box//5/>                +
         * выведет 95
                  <PROUT <SYMB <RDR /box/>>>        +
         * выведет 94
                  <PROUT <SYMB <SWPSUBN <RDR /box/>/1/>>> +
         * выведет 95
                  <PROUT <SYMB <RDR /box/>>>        +
                  <WTR /box1//10/>                  +
         * выведет 85
                  <PROUT <SYMB <SWPSUBN <RDR /box/>/box1/>>>
                  END

Seealso:


 SWPADDN  
 GTR  
 PTR  
 RDR  
 SWR  
 WTR