Index of /ukdwk_archive/ukncbtlwebcomplekt/Other/form_rsxlib2

[ICO]NameLast modifiedSizeDescription

[PARENTDIR]Parent Directory   -  
[   ]rsxlib2.rar 2016-12-09 22:32 28K 


 
(http://zx-pk.ru/threads/10718-soft-dlya-dvk-pdp11.html?p=893359&viewfull=1#post893359)
   (TPARS)     . 

  RSXLIB. (RSXLIB 2.0)
    
  (ISTAT$, STATE$, TRAN$).  
    :
 (RSXLIB.OBJ)   (RSXLIB.MLB).

  >
http://zx-pk.ru/showthread.php?t=10718&page=16&p=583946&viewfull=1#post583946
http://zx-pk.ru/showthread.php?t=10718&p=583948&viewfull=1#post583948

    
  
RSX-11M/M+/MicroRSX/IAS I/O 
Operations Reference Manual.

  cvt     RT-11:
:

.MAC SY:RSXLIB/LIB+CVT/OB

.LIN/LINK:SY:RSXLIB CVT

(  )

  ( MACRO )  RSX  RT-11.
      SYSLIB,    ULBLIB  source kit,
  .

  :
$CAT5, $CAT5B, $CBDAT, $CBDMG, $CBDSG,
$CBDT4, $CBOMG, $CBOSG, $CBTA, $CBTMG,
$CDDMG, $CDTB, $COTB, $CVTUC, $DAT,
$DAT4, $DATS, $DDIV, $DIV, $DMUL,
$EDMSG, $MUL, $SAVAL, $TIM, .DD2CT, .OD2CT.

    
     RSX.
    RSX 
(   CTAKAH 
HELP SYSL subname
( submane -     $).

      RSX
  :

 $DATS
(   ASCII    )
  $DAT4 (   DD-MMM-YYYY)
  $EDMSG   %X 
  4  5-   .

       RT-11.
    ,    .

     
         
    .

    :

    CALL	$SAVAL		;  
    JSR	R5,$SAVRG	;  3-5
    JSR	R2,$SAVVR	;  0-2
    JSR	R5,.SAVR1	;  1-5

        
  ( ).     
  .      .
 C    .

        
 EIS.

    :

    ;   
    ;
    ;:					:
    ;R0 - 				R0 -  ( )
    ;R1 - 				R1 -  ( )
    ;
    CALL	$MUL

    ;   
    ;
    ;:					:
    ;R0 - 				R0 - 
    ;R1 - 				R1 - 
    ;
    CALL	$DIV

    ;  
    ;
    ;:					:
    ;R0 - 				R0 -  ( )
    ;R2 -  ( )		R1 -  ( )
    ;R3 -  ( )
    ;
    CALL	$DMUL

    ;  
    ;
    ;:					:
    ;R0 -  ( )		R0 - 
    ;R1 -  ( )		R1 -  ( )
    ;R3 -  ( )		R2 -  ( )
    ;
    CALL	$DDIV

         
        .

    :

    ;ASCII ->   
    ; (.DD2CT)   (.OD2CT)  .
    ;
    ;:					:
    ;R3 -   		CC/CS - /
    ;R4 -    
    ;R5 -   
    ;
    CALL	.DD2CT
    CALL	.OD2CT

    ;ASCII ->   
    ; ($CDTB)   ($COTB).
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;					R1 - 
    ;					R2 -    
    ;					     
    ;
    CALL	$CDTB
    CALL	$COTB

    ;ASCII -> RADIX-50
    ;1-3    ($CAT5)    ($CAT5B).
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;R1 -  		R1 - 
    ;	0 -  = 		R2 -    
    ;	1 -  = 		     
    ;					CC/CS - /
    ;
    CALL	$CAT5
    CALL	$CAT5B

    ;   -> ASCII
    ;  0  99 ($CBDAT),   0  9999 ($CBDT4),
    ; ($CBDMG),    ($CBDSG),  ($CBOMG),
    ;   ($CBOSG),   ($CBTMG)
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;R1 - 
    ;R2 -  
    ;	0 -   
    ;	 0 -  
    ;
    CALL	$CBDAT
    CALL	$CBDT4		;XX  R1 < 1900, XXXX  R1 >= 1900
    CALL	$CBDMG
    CALL	$CBDSG
    CALL	$CBOMG
    CALL	$CBOSG
    CALL	$CBTMG

    ;   -> ASCII
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;R1 -   
    ;R2 -  
    ;	0 -   
    ;	 0 -  
    ;
    CALL	$CDDMG

    ;   -> ASCII
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;R1 - 
    ;R2 -  
    ;	 0-7 -  (2-10)
    ;	 8 -   
    ;	 9 -   
    ;	 10 -   (1-31)
    ;
    CALL	$CBTA

    ;ASCII   ->  
    ;
    ;:					:
    ;R0 -   		R0, R1 -  
    ;R1 -  			R2 - 0
    ;R2 -  
    ;
    CALL	$CVTUC

    ; -> ASCII
    ;DD-MMM-YY ($DAT), DD-MMM-YYYY ($DAT4, $DATS)
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;R1 -   
    ;	+00 - -1900
    ;	+02 - 
    ;	+04 - 
    ;
    CALL	$DAT
    CALL	$DAT4
    CALL	$DATS

    ; -> ASCII
    ;
    ;:					:
    ;R0 -  			R0 -   
    ;R1 -   
    ;	+00 - 
    ;	+02 - 
    ;	+04 - 
    ;	+06 - 
    ;	+10 -   
    ;R2 -  
    ;	1 - HH
    ;	2 - HH:MM
    ;	3 - HH:MM:SS
    ;	4 - HH:MM:SS.S
    ;
    CALL	$TIM

     $TIM, $EDMSG, $DAT, $DAT4  $DATS
        ,  RSX  GTIM$.
      .      $GTTIM
         8-   R1  
          GTIM$.

       $EDMSG   
       ,    .

    :

    ; 
    ;
    ;:
    ;R0 -  			R0 -   
    ;R1 -   
    ;R2 -   
    ;
    CALL	$EDMSG

             
     .  : "%nX"  n -  
    , X -  .  n    "V" -
             .
         ,  
      (  %A, %E    
      ).      ,
       .     .
       :

    :

    			
    --------------------------------------------------------------------------------
    %A,%nA,$VA	 /	/ (n -  
    %E,%nE,%VE	 /	 %A,  
    					  
    %I		 ASCIZ 	   

       :

    :

    			
    -----------------------------------------------------------------------------------
    %D,%nD,%VD				   ,  
    					
    %M,%nM,%VM				   ,  
    					
    %U,%nU,%VU				   ,  
    					

    %B,%nB,%VB	 		   ,  
    					
    %O,%nO,%VO				   , 
    					 
    %P,%nP,%VP				   ,  
    					
    %T,%nT,%VT	  		   
    					 ,   

     :

    :

    			
    -----------------------------------------------------------------------------------
    %R,%nR,%VR	  RADIX-50	ASCII  
    %X,%nX,%VX	5-  	ASCII ,  
    		

    %Y		  		    $DATS

    %1Z		 5 		    $TIM, HH
    %2Z					HH:MM
    %3Z					HH:MM:SS
    %4Z					HH:MM:SS.S

    :

    :

    			
    ------------------------------------------------------------------------------------
    %F,%nF,%VF				
    %N,%nN,%VN				
    %S,%nS,%VS				
    %n<					n ,     
    %n>					   n  ,
    					 n     
    					  %n<


     17.11.2016  $GTTIM      
       PSECT. 

    :
http://zx-pk.ru/threads/10718-soft-dlya-dvk-pdp11.html?p=891273&viewfull=1#post891273