mskrdv    Чтение маски из вектора

 system mskrdv

 <mskrdv Sb>
                   где Sb - символ-ссылка - имя вектора или
                            символ-метка - имя ящика, содержащего имя
                            вектора.

   Значение:  Процедура возвращает макроцифры по 16 бит - маску
              вектора.

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

                start
                entry task
                system newv,delv,wtr,mskrdv,symbxd,prout
                swap box

        printhex
            S0S1S2S3 = <prout <symbxd S0><symbxd S1><symbxd S2><symbxd S3>>

        task =  <wtr /box/<newv 'D'/12//X'1234//X'5678//X'9ABC//X'DEF0/>> +
                <printhex <mskrdv /box/>>   +
                <delv /box/>                +
                <wtr /box/<newv 'D'/12/>>   +
                <printhex <mskrdv /box/>>
                end

         Даст в результате выполнения:

             C:\PRIMER>primer.exe
             123456789ABCDEF0
             FFFFFFFFFFFFFFFF

             C:\PRIMER>

Seealso:



This page last updated on Fri Nov 30 11:06:55 MSK 2001
Copyright © 1992-2001, Vitaly Filatov, Moscow, Russia
Webmaster