wtrsv     Запись элемента в стек-вектор как в вектор

 system wtrsv

 <wtrsv SbSnEm>
                   где Sb - символ-ссылка - имя стек-вектора или
                            символ-метка - имя ящика, содержащего имя
                            стек-вектора.
                       Sn - номер элемента стек-вектора, куда производится
                            запись.
                       Em - макроцифры по 16 бит - данные для записи
                            в стек-вектор.

   Элемент, в который производится запись уже должен быть инициирован,
   например, с помощью процедуры popsv.

   Значение:  Процедура ничего не возвращает.

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

                        start
                        entry task
                        system newsv,wtr,popsv,rdrsv,wtrsv,cvd,prout
                        swap box

              task =    <wtr /box/<newsv 'D'/12//X'FFFF/>> +
                        <popsv /box//X'9999/>              +
                        <popsv /box//X'2345ABCD//0/>       +
                        <popsv /box//102//0/>              +
                        <wtrsv /box//1//1234//7654//9876//5555/> +
                        <prout <cvd <rdrsv /box//1/>>>
                        end

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

             C:\PRIMER>primer.exe
             1234000007654000009876000005555

             C:\PRIMER>

Seealso:


 popsv