Google
 
Trailing-Edge - PDP-10 Archives - BB-AI48A-BM - datatrieve/pc350/wombat.cdd-plot
There are 3 other files named wombat.cdd-plot in the archive. Click here to see a list.
{
ie\Q\\ \)\4\>\I\T\c\n\}]]]+]9]F]S]c]s]x^^ ^/^=^M^]^m^|

__)_8_E_L\9\HOUSEKEEP\ 0\@:Y@;@:C@;\& 0\(L(A1)\/ 0
\1L"X"FFFFFFFFFFFFFFFF\9 0
\<L"Y"FFFFFFFFFFFFFFFF\D 0
\FL"Z"FFFFFFFFFFFFFFFF\N 0\QS(M 0(L0)1(L33)2(L67)3(L100))\Z	 0 \\@:AT(A1)s(m 1(ah160l20s67) 2(ah160l45s66) 3(ah120l45s100) 0(al0))\i 0
\ks(e,a[0,0][1050,900])\t 0\vw(ri2s"Y"[,0]) p[600,600]v[660,615][600,600]v(w(e))[660,585]] 0]p[225,560]v[280,575][225,560]v(w(e))[280,545]p[1000,370]] 0(]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]]"	 0 ]$p(b)v(w(e,s0))[790,520]p(e)p[+1]v[475,540]p(b)v(w(e,s0))[500,510]]1 0]3p(e)c(s)[][450,560][400,582][350,585][300,580][](e)]? 0]Ac(c,a-90)[300,550]w(e)c(c,a-90)[300,550]]K 0]Nc(s)[][320,510][325,500][330,484][340,470][](e)]Y
 0#][w(ri1)c(s)[][240,510][200,520][170,528][150,530][120,530][100,528][](e)]i	 0!]kc(c,a-90)[100,470]w(e)c(s)[][30,420][50,390][78,300][100,250][](e)^ 0^c(c,a-80)[290,325]c(s)[][390,100][](e)c(c,a-50)[485,345]^		 0 ^c(s)[][610,110][650,115][700,118][750,120][](e)c(c,a-90)[750,370]^	 0^p[90,450]v(w(e,s0))[230,470][90,450][250,435][90,450][230,410]^%	 0"^(p[190,365]w(e,s1)c[205,365]p[210,330]w(ri1,s"Z")c[210,360]p[220,210]^5 0^7w(i2,s"Y")v[305,75]c(s)[][310,100][320,150][](e)w(i1)^C
 0$^Ec(s)[][300,200][220,210][](e)p[265,185]w(e,s1)v[300,120]v(w(i2))[290,185]^S
 0#^Up[300,700]w(s0ri3)t(A0i0s3)"LARGE WOMBAT"t(s1)s(a[0,0][767,479])p[,500]^c	 0"^e@;@A@:B W(I0S1)P[,-130]V[+250]W(I3S0)V[,+130][-250][,-130][+250]P(B)^r	 0"^u[-161,+10]T[12,0]"Legend"P(E)[-240,+38]P(B)[,+20]T(A1)W(I1S[,-20]"Z")_	 0!_V[+40]W(S0)V[,-20][-40][,+20][+40]P[+10,-20]W(I3)T(A0)[12,0]"Bulk"_	 0"_P(E)P(B)[,+50]T(A1)W(I2S[,-20]"Y")V[+40]W(S0)V[,-20][-40][,+20][+40]_! 0_#P[+10,-20]W(I3)T(A0)[12,0]"Ears and Toes"P(E)P(B)[,+80]_/	 0 _1T(A1)W(I3S[,-20]"A")V[+40]W(S0)V[,-20][-40][,+20][+40]P[+10,-20]_> 0_@W(I3)T(A0)[12,0]"The Word Wombat"P(E)@;_I9_KHOUSEKEEP
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 "S(M 0(L0)1(L33)2(L67)3(L100))"
%PRINT "@:AT(A1)s(m 1(ah160l20s67) 2(ah160l45s66) 3(ah120l45s100) 0(al0))"
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