[net.sources.mac] Vt52 DA, version 1.4

info-mac@uw-beaver (10/03/85)

From: Robert E. Yellen (MISD-SEAD) <ryellen@Ardc.arpa>

Here's a nice DA that is a vt52 emulator. It is written by Alan Dahlbom.
He has place it in the public domain.

He can be reached at adahlbom@bbncc4.arpa

(This file must be converted with BinHex 4.0)

:"(Cd06)!4%C*6%406eB!N!J8l1Rq!*!%!3#3!a5d!!!6Y!#3!cJ!N2)6X#3!!!%
!#[d#!4B#`J,-!X)#-!K8CA*YD@jKE!"*qK15+8MrpLP*rrT1G5"XrrC1G3!!E%C
XEhFJ3fpZG(*[E#%51d*KBfYcF'&MC5"TFb"%48`l+#dl8Q9MEh*N1e9`E'pKC$X
S,6Y0Ef4PE5"3Eh*d)4)l8(*TER4PFL"3Eh*d1bJY1b!J-c!`1c%b-$!K%MXb0$!
`1c3i-$!l16B`-$XS,6Y"BQpeG#"8CA*YD@jKE#k3!`&m!&i!,J!@!!S&,Q*[GA3
%,Q*TEJ!&,Q&[GA3%,Q&TEJ!)6'pR)%CTE'8!%&*PBfpbC#"'D@aP)%jKE@8!9%9
B9$q3""Y@9$8b)&4PFQeTEQ&X)%9YG@aKG'pb)(Ba,M419J!!51F-%%kkr[`S,2r
k*%4+UJ!HCJ!!p#4%,`S[2!!!"541ZK)B@%mNAb9!!"3NE2rk+LS!&#4%,`T#Td+
R5'crjNKkrjir22rr2c`!%#mmrj!%2ccrrd+RU4-J(bC!*&mP3!!H*%3hDJ!B!'`
[#kKc2ccrr8*RU(Jr2!!%U)Fr2!!*U)Sr2!!"U)NN469m!!%!@$9m!!%!"L4&,`T
#TkPe)"mNAb9!!&SN48*U!!JN48*U!"!N469m!!%!9L4&3QS!#N*U!!`N48*U!!3
N48+U!%!N48*U!%C#DJ"%*%9#DJ"3*%9#UJ!m*%8[#N+R2ccp!NKkrJ5T-5!I*&m
NJ#4&,a*)H[i8U601Z[i'F!"-h`J`6Pj1G8j@!!")j`J36VVpiL4XrrSS+J!8*%4
+UJ!mCcJN4#*U!$`r%8kk$j486b4%)QS!2$mT!!*1ZJq%9%mN4#*U!$a8L5m**%3
LDJ!m,bN!$%kk%2"36bCXrrS[+`!HU44#U`!H2ccp!UNfU6FNE2rk)QS!&#m46VS
3QPK2,bX!&%kk%*TB6dkkrA4`!%cI#""1ANje6PB!!(!!6Pj1G8j@rk4)j`J36VV
p4L4XrrSQDJ!8*'crqLmU!"kSFb4XrrB`+J!DB!!$i#4XrrB[+J!F,`Y1ZJ2d8%p
J!!2J$'[rr`!3CNBYI!#3!`(rr%KZrrG)E[rm2bX!%Nkk$fEHr!!+5N"R($mV!"*
1ZJlk9%p#D`!3,a-r2!!%3QHT4@!!!j`r,[rf6VS-I&423UHTG5!IN!#V!&U`[!#
3!aj[)%+RUA8J(bG!!&Tf!CCV!&Jh3`"B*%[9r!#3!dJ[#ULNU&"+D`!%C`!$9NK
ZrrJND`!m2a*1ZJmqA%p+D`!'CcT+D`"@CaJ-VJ#3!d$rq'm12c`!%dkk$""86d*
V!&C+D`"@CKC+V[riCK!r2!!46VS,pP420h`!!3"@$+i!N!6rq'p%6VS-&-"m!(m
p32rf$'[rr`!)CL3YI!#3!`(rr!aZ!!VrpQF85'lrpdKZrr`r+`!16VS1FYlm!!S
r,[rf6VS(HP42B!*J"'!!rejJ!!+Z*'crpM!U!"ii!'!!!R"+D`!'CJJhI!!"!!C
J"%*V!!B[%cmm!!&+D`!'C`4frf!#GJ!r!kP&B!!#9%TV!!TQ#$Gm!!%!#Q!%3QX
!#Lm62c`!!NTV!!TR"(ErB!*f!$m$U89J!!)S$'[rr`!)CK`r+`!16VS0JP423QX
!##m62c`!"%*RU89J!!)%2A`!C2rb2A`!82rd,blrmNKkr!K)H[[k3UG)E[qS6VS
0k"BZrkK)JdT$C`!"eMmZrkj)E[qb6VS05&a2,cVllLmkqqir,[qZ5'lrXNkk$1M
Hr!!15N"Q!!'U*%[9r!#3!`i[#MmZrkj)E[qb6VS0-0lm!!T+3'B!!BShI2rr!!J
[%cmm!!3r2!%!U89J!!&d$'[rr`!3CK`r+`!56VS-cP423QX!%#m62c`!"8*RU89
J!!&32A`!C2rb2A`!82rd,blrmNKkqe4#Tcmm!!&)H[YF3UG)E[qS6VS00"BZrkK
)JdT$C`!"(#4,eI`!N!-5,`Sr,[qZ5'lrXNkk$+,Hr!!+5N"Q!!$m0hcrr`!3,a-
r2!!&2c`"!+P&B!!!jLm62c`!#%*RU88[%cmm!!G#CkP&*%[9r!#3!a3[#Nkk#UK
B6bm62c`!"cmm!3#T4@!!!,)[%cmm!!K#CkP&,a-r2!!(3QHT454,eI`!N!-S,`T
1ZJTd@%m[%cmm!!Jr2!%!U89JIMem!!VrpJaZ!!lrpQ`3,a-r,[rf3QHT49*ZrrC
Jk#m62`3r2!%!U88ND`!m0J5@I!!+5-2MJd2kqM)eF6J!!!41ZJN#B$K1ZJVHB$)
!![f%rE!!![hFrT!!!!,r([p5!!,rK2q%ri6rK2q%!!,rbV"m!"&N#Z0!-$X!e%l
l!!"J(Q!Fr"$m*2bNr9D3!(`!3,"m!!4Nl10!-$X!kNll!!"1Z[P!F!"-h`J36Pj
1G8j@rra)j`m3*Qi!##JZ!!`N4$!5B!!$A#4%*LS!!NL$1J-N4#BU!!,JJc`$bR`
!Ib4%0LS!$XCm#!"Q!!+d*%3f+J!1aR`"!'F1ZR`!'fB%HQ"J"-Tm!"p+D`!+C`L
kI!!)CJ*kIc!'B!!#D'!!!RT)HJ-86VS+$&K260m)m%jH6R9)HJ-&6VS*qPK2B1a
)HJ,m6VS*lPK2B1")HJ,c6VS*iPK2B04+D`!-C`j)HJ,N6VS*d&K20J"J$$mm!$G
1ZJJD9%mf!'#b5QX!$'F15(S#aNkk#DjB6cB!B!`r2!!i6VS(q&420J"JN!"+D`!
-C`j)HJ+S6VS*M&K20J"J$$mm!$P1ZJI@9%mf!'!!rfj+D`!-C`j)HJ+)6VS*D&K
20J"J$$mm!#e1ZJHb9%mf!'!!rdT+D`!-C`j)HJ*S6VS*4&K20J"J$$mm!$41ZJH
19%mf!'!!rbC+D`!-C`j)HJ*)6VS*)&K20J"J$$mm!$91ZJGU9%mf!'!!r`*+D`!
-C`j)HJ)S6VS)r&K20J"J$$mm!$C1ZJG'9%mf!'!!rYj+D`!-C`j)HJ))6VS)f&K
20J"J$$mm!#a1ZJFL9%mf!'!!rVT+D`!-C`j)HJ(S6VS)Y&K20J"J$$mm!$&1ZJE
q9%mf!'!!rTC+D`!-C`j)HJ()6VS)N!"B6cB!B!`r2!!b6VS'fP420J"J!2jb5QX
!$'F15(S"U%kk#'aB6cB!B!`r2!!c6VS'YP420J"J!2j15QX!$'F15(S"L%kk#%K
B6cB!B!`r2!!`6VS'NP420J"J!2iU5QX!$'F15(S"D%kk##4B6cB!B!`r2!!Z6VS
'EP420J"J!2i'5QX!$'F15(S"5%kk#!"B6cB!B!`r2!!06VS'5P420J"J!2hLrfc
pY2f'rBEpK[fSrBVqZ2f'rBEpK[q3!2iSrCcpK[f'rBEr52lFr`$r*2j-rR$qP2h
!rBEpi[i%N!"m!%'`I!!FC!$pN!$M3$!l!,K1q`!!2`91ZJAZ9%pJ!!#3!'!!!)`
N4$BU!!l'I!!"CcK+D`!%CLSN5pAm!*!$&#m+6VS'0&K22c`!)%kk!C!!9%mr2!!
)6VS"KP420hcrr`!%,a0#CkNeB!Br22d#U6DT0f!m*%3[+J!#U5)N4#mU!!+TD54
%,bS!!UNMB#)!![pd!!,mQ!!#r*MraJ!#rhL`I!!*C!VM3$!l!141q`!!B!$mpKY
3!"Y4!"Y5!"Y6!"XrG`!E2hJ!'cpj!"XrE3!E2h3!'cpe!"XrGJ!E2fi!'cpa!"X
rFJ!E2h-!'cp`!"XrE!!E2dd!6PErq#m,*'crqLCU!"3f+`"%a[`!"Me$rrSf+`"
'a[`!$$e$rrJpI!(Jrrif,[rieR`!$6e$rra)E[riU+-QAdjH6R919[ri3QlrqMe
m!H$rrMBZ!!M'r!!-282rq$em!5$rr%KZrrK#Ccmmrr3NE2rk)QS!&#mT!%#Sldj
H6R919[ri3QlrqMem!H$rrN*ZrrJpI!%Jrra)E[ri3QFr2!!-*'crqL*U!"3[+3"
!U1p1ANje6PErq%*ZrrSNE2rk)QS!&$BT!%E'r!!-282rq$em!H$rrMem!5$rr%K
ZrrLSSdjH6R919[ri51F-%$JZ!!JNE2rk*QS!&%UV!%"Q(N+RU0JJ(bG!!%"#D`"
+3QX!5$Gm!!F!6MGm!!d!6$!V!&"J!!0@-!4J!!%k2c`!!DR)60m)-%jH6R8hI!!
"!&"Jm#m,6VS&[PK25QX!4'F'8fX!4'!B0h`!6`"%5QX!4QF'8fX!4Q!'0h`!&`"
'B!!"+#m,6VS&MPK2$'X!8!"%E!C5D`"%B"C#D`"%$'X!&`"'E!C5D`"'B!4#D`"
'B!!!q$BV!%433mCmrrJi!jKV!%3f"&0%5N0R$$mm!#"1Z[mQ9%pJl'!!rfS[#dk
k"6CB6`aV!"F!4Q`'8QX!4Q!)3QG1Z[jJ9%pJ!!#Z,`Y1ZJ88@%p#D`"%B!!!RLm
,6VS&"&K2$'X!N!0'E`C6D`"'B!BhI!!A!%CJIVKm!#"Y"VKm!(pY"'!!r`SN5pA
m!*!$5#m+U+-f+`"%a[`!"P*$2`-f+`"'a[`!$0Cm!!Nr!kL62`5SJ`aV!%m!4'`
%8QX!4'!dAd"R!2l%8d"R!2l88d"R!2mZ8d"R!2p38d"R!2pm8d"R!2lX8d"R!2p
JN!"m!!jR!2kQB)*J!!(`-!4J!!%U,`Y1ZJ4H@%p1Z[e86VVq"'!!!9`[#dkk"%T
B6dTV!%CQ"NkkrETJ&$BV!%C63cm$3QG1ZJ1q@%mh3!"'B!!"-#m,6VS%(PK20LX
!4P0$2`0#Cdkk!jjB6cG!!%CJ!!%3,`Y1ZJ2q@%p#D`"'3QX!4'!!!2`[#dkk!qT
B6cBV!%C53cm$2c`!&dkk!daB6cG!!%CJ!!$D,`Y1ZJ2)@%mf+`"%8N-r!cmm!%p
1ZJ-U@%mh3!"%B!!!Z#m,6VS$TPK20LX!4&0$2`0#Cdkk!bCB6cG!!%4J!!#B,`Y
1ZJ1'@%p1Z[amB!!!L$Gm!!%!$'"q3QX!$'"i0h`!!J"3B!$pNMmm!"Y1ZJ&S9%m
r2!![6VS"AP422c`!@Nkk!9486f"13QX!8'!!r@U3!(`!2@Hk8d"R[PG!C`$r#P0
!C`$r1&0!C`$r9&0!C`$rF&P!C`$r%P0!C`$q`&0!C`$qTP0!C`$rH*!!I!!1Cij
63'H8B,*#D`"3B(3f"*Cm!#!h3`"88QX!8'!!r3`f"*Cm!#!h3`"53QX!8!aV!*!
$9'dZ$'X!&`"8ELB-D`#3!e*Y(JaV!%m!8Qi@,`Y1ZJ+U@%mhD`"8!%BhD`"5!%4
J"'!!r-4J'2bHrK6rM[qJX(`!"'3+id!`1`$Z6[X!!$BV!%6'r!!'0d-!5MBV!%E
'r!!-0d-!5$BV!%TH3cG$!%if+`")eR`!$6G$!%`N5pAm!*!$5#m+U+3hI!!"!&K
J!2aQ6PB!!#m,*'crqLCU!"3ND`!m)QX!2$BU!!5'D3!'*'X!2)CU!!JND`!mKQS
!#Mm$*'X!2$m56VS$1&K2*Pp1ANje6PErr#m,*'crqLCU!"3YI!#3!`(rr%KZ!!P
)E[rm*'X!2$mU!!*1ZJ+Dh[`!#LCI6Pj1G8j@rrS[#b4XrrSQDJ!8,A`!N!-"rrT
)E[rr5'lrqL4V!$`r%Nkk!Q6Hr!!+%#lrrdL!`(`!rbCI6Pj1G8j@!!![#b4XrrS
QDJ!84IV`ELG+!$4&q["X*dS!1%Akm'SR5J!J4IV`D#G+!#3hI!"H!#`hI!"H!"J
hI#!!!#ihI#!!!"ShI-!!!$!hI-!!!"`hI!`!!$)hI!`!!"i[,J!)B3KB6bCI6Pj
1G8j@!!![#b4XrrSQDJ!8*'X!2,AZ!!KQ"LCI6Pj1G8UV!$aR'L4V!$`r%Nkk!4*
86b4V!$`r+J!#6VS""&42*fi!#!!m*'X!2&5+,`SND`!m,bS!$%kk!Qj36bmV!$`
ND`!m,bS!%%kk!Pa36dkkrR3r2!5`*%[9r!#3!ei[#L4V!$`r%Nkk!HT36f#-6PB
!!$BZ!!LfEJ!+E!J`,J!)6Pj1G6!Z!!TJpNj@!!!f,J!)YQi!#Qm)-#i!#%jH6R8
`,J!+B2C19J!!6Pj1G8j@!!!NEJ!)5K*R&L4Z!!K5VJ!)&K*)Jcm$6VVq2&42B1*
1ANje6PB!!#4Z!!K+%QF@*'i!#&+Z!!J@%NL$2`01Z[RX9%pJiNjH6R919J!!,`X
QEJ!)5QX!@'F3*%[9r!#3!dJ[#ULN3QX!@#CI6Pj1G8j@rq)J6c&Z!!J!'+!"6Pj
1G8j@rl""l[q`)@i!#!!5-@i!$!!@3QJ!'U!)5N"Q&%*S!"bJ$%2S!#!LlJ!5)Ui
!$U!06Pj1G8j@rmj"l[r1-@i!#!!BS!&1ANje6PErcN(ZrmiKEJ!)!")aEJ!-!"C
#D!!DS!P1ANje6PErcN(ZrmiKEJ!)!")aEJ!-!"C#D!!D3UJ!(+!!)Qi!$M+S!"K
1ANje8-"J!P(!6PErcN(ZrmiaEJ!)!"JLEJ!+)9%!*#&Z!!i!)%*S!#a#U!!Z5J"
Q"+!$B!+J!L*Z!!SLU!!S6Pj1GA!"6[S!"(!#)&mr!#m)VHT19[r1)%maEJ!)!"J
aI!!#!"UJ"5*Z!!SLU!!F6Pj1G8j@rmiJ6c&Z!!J!'$&m!!J!'M&Z!!S!(+!%6Pj
1G8j@rmiJ6c&Z!!J!'$&m!!N!'L&Z!!S!($&Z!!i!)+!%6Pj1G5"[!!5J)dlk!#!
JE`!%S"p1qJ!@)#m!"+%H6[S!!N2YrribJ#!)6R9$lIrq-S"1G8j@rmiJ6b&Z!!J
!%N*S!"C#D!!D3UJ!(+!!)Qi!$$+S!"K1ANje!#J!$!&2!I)!N!3")!(J!*!M(!!
b!!"%8PC5!*!$#J!D!!!J!*!("3"@G$8bYG3: