[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Sun terminal entry - please add to distribution



I had requested a Sun "termcap" - BillW@SRI-KL gave me one that almost
worked.  It seems our version of telnet for the Sun-1 and Sun-2 cannot
fully emulate the vt100.  Here is my version, with the addition that
VT1CPS's 2nd JUMPE to remove a Y parameter if it's zero was removed.
The Sun could not recognize $[5H as $[5;1H, for example.
                           -----------------
SUNTB:	34.,,79.		;Nominally 34 lines; otherwise like AMB
	(%TOERS+%TOMVB+%TOMVU+%TOLWR+%TOLID+%TOCID)
	CALL VT1CPS
	CALL VT1CEL
	CALL VT1CES
	CALL VT1CLR
	JFCL
	CALL VT1DSM
	CALL VT1DMV
	CALL SUNILL
	CALL SUNDLL
	CALL AMINSC
	CALL AMDELC
REPEAT 3,JFCL			;(Reset, scroll up, scroll down)
	JFCL			 ; no ini code for SUN
	JFCL			;(Reset temporarily)
	CALL AMINV		;Set/reset inverse video mode
	CALL AMCINV

SUNILL:	HRLZI B,(BP)
	CALL VT1CPS
	MOVEI A,"L
	JRST AMDOIT

SUNDLL:	HRLZI B,(BP)
	CALL VT1CPS
	MOVEI A,"M
	JRST AMDOIT