Google
 

Trailing-Edge - PDP-10 Archives - BB-AI48A-BM - datatrieve/vt125/wombat.cdd-plot
There are 3 other files named wombat.cdd-plot in the archive. Click here to see a list.
hBBB B)B4B>BIBXBdBoB}C
CC,C:CFCTCdCsCyDD D/D=DMD]DmD|E
EE)E8EEELB9BHOUSEKEEPB 0B@:Y@;@:C@;B& 0B(L(A1)B/ 0
B1L"X"FFFFFFFFFFFFFFFFB9 0
B<L"Y"FFFFFFFFFFFFFFFFBD 0
BFL"Z"FFFFFFFFFFFFFFFFBN	 0!BQ@:AT(A1)s(m 1(ah160l30s100) 2(ah160l45s66) 3(ah120l45s100) 0(al0))B^ 0B`S(M 0(L0)1(L33)2(L67)3(L100))Bi 0
Bls(e,a[0,0][1050,900])Bt 0Bww(ri2s"Y"[,0]) p[600,600]v[660,615][600,600]v(w(e))[660,585]C 0Cp[225,560]v[280,575][225,560]v(w(e))[280,545]p[1000,370]C 0(Cw(i1s"Z"[,0])c(c,a-90)[750,370]v[670,620]c(c,a-90)[670,595]c(c,a-90w(e))[670,595]C"	 0 C%p(b)v(w(e,s0))[790,520]p(e)p[+1]v[475,540]p(b)v(w(e,s0))[500,510]C1 0C4p(e)c(s)[][450,560][400,582][350,585][300,580][](e)C? 0CBc(c,a-90)[300,550]w(e)c(c,a-90)[300,550]CL 0CNc(s)[][320,510][325,500][330,484][340,470][](e)CY
 0#C\w(ri1)c(s)[][240,510][200,520][170,528][150,530][120,530][100,528][](e)Ci	 0!Clc(c,a-90)[100,470]w(e)c(s)[][30,420][50,390][78,300][100,250][](e)D 0Dc(c,a-80)[290,325]c(s)[][390,100][](e)c(c,a-50)[485,345]D		 0 Dc(s)[][610,110][650,115][700,118][750,120][](e)c(c,a-90)[750,370]D	 0Dp[90,450]v(w(e,s0))[230,470][90,450][250,435][90,450][230,410]D%	 0"D(p[190,365]w(e,s1)c[205,365]p[210,330]w(ri1,s"Z")c[210,360]p[220,210]D5 0D7w(i2,s"Y")v[305,75]c(s)[][310,100][320,150][](e)w(i1)DC
 0$DEc(s)[][300,200][220,210][](e)p[265,185]w(e,s1)v[300,120]v(w(i2))[290,185]DS
 0#DUp[300,700]w(s0ri3)t(A0i0s3)"LARGE WOMBAT"t(s1)s(a[0,0][767,479])p[,500]Dc	 0"De@;@A@:B W(I0S1)P[,-130]V[+250]W(I3S0)V[,+130][-250][,-130][+250]P(B)Dr	 0"Du[-161,+10]T[12,0]"Legend"P(E)[-240,+38]P(B)[,+20]T(A1)W(I1S[,-20]"Z")E	 0!EV[+40]W(S0)V[,-20][-40][,+20][+40]P[+10,-20]W(I3)T(A0)[12,0]"Bulk"E	 0"EP(E)P(B)[,+50]T(A1)W(I2S[,-20]"Y")V[+40]W(S0)V[,-20][-40][,+20][+40]E! 0E#P[+10,-20]W(I3)T(A0)[12,0]"Ears and Toes"P(E)P(B)[,+80]E/	 0 E1T(A1)W(I3S[,-20]"A")V[+40]W(S0)V[,-20][-40][,+20][+40]P[+10,-20]E> 0E@W(I3)T(A0)[12,0]"The Word Wombat"P(E)@;EI9EKHOUSEKEEP
DEFINE PLOT WOMBAT
ENTRY 0
BEGIN
	PLOT HOUSEKEEP 0

PRINT "@:Y@;@:C@;"
PRINT "L(A1)"
PRINT "L""X""FFFFFFFFFFFFFFFF"
PRINT "L""Y""FFFFFFFFFFFFFFFF"
PRINT "L""Z""FFFFFFFFFFFFFFFF"
&PRINT "@:AT(A1)s(m 1(ah160l30s100) 2(ah160l45s66) 3(ah120l45s100) 0(al0))"
PRINT "S(M 0(L0)1(L33)2(L67)3(L100))"
PRINT "s(e,a[0,0][1050,900])"
$PRINT "w(ri2s""Y""[,0]) p[600,600]v[660,615][600,600]v(w(e))[660,585]"
!PRINT "p[225,560]v[280,575][225,560]v(w(e))[280,545]p[1000,370]"

.PRINT "w(i1s""Z""[,0])c(c,a-90)[750,370]v[670,620]c(c,a-90)[670,595]c(c,a-90w(e))[670,595]"
%PRINT "p(b)v(w(e,s0))[790,520]p(e)p[+1]v[475,540]p(b)v(w(e,s0))[500,510]"
PRINT "p(e)c(s)[][450,560][400,582][350,585][300,580][](e)"
PRINT "c(c,a-90)[300,550]w(e)c(c,a-90)[300,550]"
PRINT "c(s)[][320,510][325,500][330,484][340,470][](e)"
	(PRINT "w(ri1)c(s)[][240,510][200,520][170,528][150,530][120,530][100,528][](e)"
&PRINT "c(c,a-90)[100,470]w(e)c(s)[][30,420][50,390][78,300][100,250][](e)"
!PRINT "c(c,a-80)[290,325]c(s)[][390,100][](e)c(c,a-50)[485,345]"
%PRINT "c(s)[][610,110][650,115][700,118][750,120][](e)c(c,a-90)[750,370]"
$PRINT "p[90,450]v(w(e,s0))[230,470][90,450][250,435][90,450][230,410]"
(PRINT "p[190,365]w(e,s1)c[205,365]p[210,330]w(ri1,s""Z"")c[210,360]p[220,210]"
 PRINT "w(i2,s""Y"")v[305,75]c(s)[][310,100][320,150][](e)w(i1)"
	)PRINT "c(s)[][300,200][220,210][](e)p[265,185]w(e,s1)v[300,120]v(w(i2))[290,185]"
	)PRINT "p[300,700]w(s0ri3)t(A0i0s3)""LARGE WOMBAT""t(s1)s(a[0,0][767,479])p[,500]"
'PRINT "@;@A@:B W(I0S1)P[,-130]V[+250]W(I3S0)V[,+130][-250][,-130][+250]P(B)"
	)PRINT "[-161,+10]T[12,0]""Legend""P(E)[-240,+38]P(B)[,+20]T(A1)W(I1S[,-20]""Z"")"
'PRINT "V[+40]W(S0)V[,-20][-40][,+20][+40]P[+10,-20]W(I3)T(A0)[12,0]""Bulk"""
(PRINT "P(E)P(B)[,+50]T(A1)W(I2S[,-20]""Y"")V[+40]W(S0)V[,-20][-40][,+20][+40]"
!PRINT "P[+10,-20]W(I3)T(A0)[12,0]""Ears and Toes""P(E)P(B)[,+80]"
&PRINT "T(A1)W(I3S[,-20]""A"")V[+40]W(S0)V[,-20][-40][,+20][+40]P[+10,-20]"
PRINT "W(I3)T(A0)[12,0]""The Word Wombat""P(E)@;"
	PLOT HOUSEKEEP 2
END
END_PLOT