.TITLE ALVB05 Five Buffer Set .PSECT ALVIN,CON,GBL .Ident /LVL5 / ;;********************************************************************** ;; A L V I N B U F F E R S - S E T 5 - MULTIPLE COMMAND BUFS ;;********************************************************************** ;; .Globl Bufd1,Bufd2,Bufd3,Bufd4,Bufd5 .GLOBL BUF1,BUF1END,BUF2,BUF2END,BUF3,BUF3END,BUF4,BUF4END .Globl Buf5,Buf5end ;; BufD1: .Word Buf1 ;Buffer descriptor of the console input. .Word Buf1 .Word Buf1 .Word Buf1End ;; BufD2: .Word Buf2 ;Buffer descriptor for remote (typically) .Word Buf2 .Word Buf2 .Word Buf2End ;; BufD3: .Word Buf3 ;Buffer descriptor for third buffer. .Word Buf3 .Word Buf3 .Word Buf3End ;; BufD4: .Word Buf4 ;Buffer descriptor for the fourth buffer. .Word Buf4 .Word Buf4 .Word Buf4End ;; BufD5: .Word Buf5 ;Buffer descriptor for the fifth buffer. .Word Buf5 .Word Buf5 .Word Buf5End ;;****************************************************************** .Psect AlvBuf,Con ;; ;; ALVIN BUFFERS ARE ASSUMED TO BE AT THE END OF THE ALVIN REGION. ;; .GLOBL BUF1,BUF1END,BUF2,BUF2END,BUF3,BUF3END,BUF4,BUF4END .GLOBL BUF5,BUF5END ;; BUF1: .ASCII 'THIS IS ALVIN COMMAND BUFFER 1' .=.+202 ;COMMAND LINE BUFFER SIZE=160 CHARACTERS .EVEN BUF1END: .WORD 0 ;(THE FIRST BYTE WILL BE USED) ;; BUF3: .ASCII 'THIS IS ALVIN COMMAND BUFFER 2' .=.+202 ;COMMAND LINE BUFFER SIZE=160 CHARACTERS .EVEN BUF3END: .WORD 0 ;(THE FIRST BYTE WILL BE USED) ;; BUF4: .ASCII 'THIS IS ALVIN COMMAND BUFFER 3' .=.+202 ;COMMAND LINE BUFFER SIZE=160 CHARACTERS .EVEN BUF4END: .WORD 0 ;(THE FIRST BYTE WILL BE USED) ;; BUF5: .ASCII 'THIS IS ALVIN COMMAND BUFFER 5' ;USED FOR PPG .=.+202 .EVEN BUF5END: .WORD 0 ;(THE FIRST BYTE WILL BE USED) ;; BUF2: .ASCII 'THIS IS ALVIN LIST BUFFER POOL' .=.+202 .EVEN BUF2END: .WORD 0 ;(THE FIRST BYTE WILL BE USED) ;;********************************************************************** ;; .END