Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-02 - decus/20-0055/sign.exe
There are 2 other files named sign.exe in the archive. Click here to see a list.
?p0@0 ?hX
3?x " 
 
<++2	`JPQ/H
3|2/@(          ERASEINLINH    PRINT     EXIT DEFSYINSIGWIPE A    B    C    D    E    F    G    H    I    J    K    L    M    N    O    P    Q    R    S    T    U    V    W    X    Y    Z         0    1    2    3    4    5    6    7    8    9    .    ,    ?    -    $    *    =    &    <    >    +    /    !    '    :    #    "    ^        %    ;    (    )    [    ]    ???????   ???????   ???????   ???????   ???????   ???????   ???????   ???????   (' TYPE "H" FOR HELP',/)(' *',$)(A5)(' ?NOT A COMMAND: ',A5)(' ?NO SIGN IN CORE',/)(5X,I)(' WHAT LINE NUMBER? ',$)(I)(' ?LINE #',I2,' DOES NOT EXIST')('+(NEW) ',$)(' ?TOO MANY LINES- "PRINT" THE SIGN.',/)('+SIGN:'I2,'  LINE:',I2,' STRING:',$)(13A1)(' ?TOO MANY CHARACTERS --LINE NOT COMPILED')(' ?NOT A RECOGNIZED SYMBOL: 'A2,'  TRY AGAIN')(8A7)(' ?CANNOT ACCESS SYMBOL DATA FILE SYS:SIGN.LIB ')(' SIGN MAKER  V.4',/,' COMMANDS:'/,' INLINE-TYPED TO INPUT EACH LINE OF A SIGN',/,' INSIGN- TYPED TO INPUT A WHOLE SIGN, RATHER THAN',/,'     A LINE AT A TIME.',/,' PRINT-PRINTS ASSEMBLED SIGN AND CLOSES FILE',/,' DEFSYM-LETS USER DEFINE A CHARACTER OR SYMBOL',/,' ERASE N- TO REPLACE THE NTH LINE OF A SIGN',/,' WIPE- ZEROES OUT THE SIGN IN CORE AND RESETS LINE-COUNTER',/,' H-THIS TEXT',/,' EXIT -TO EXIT FROM THE PROGRAM',/,' PARAMETERS:',/,' 12 CHARS/LINE 10 LINES/SIGN',/,'  THE  USER DEFINED SYMBOL IS',/,' INCLUDED IN A SIGN BY TYPE THE CHARACTER "@" IN ITS',/,' PLACE WHEN YOU INPUT A STRING TO "INLINE"',/,' OR "INSIGN" AFTER USING "DEFSYM"'/,' FURTHER INSTRUCTIONS FOR USE OF "INSIGN " AND "DEFSYM"',/,' WILL BE OFFERED AT APPROPRIATE TIMES.',/,' ALL SIGNS ARE CENTERED AUTOMATICALLY'/)(' DO YOU WISH TO SEE CHARACTER SET?(Y OR N)',$)(A1)(1X,30A2,/,1X,32A2,/)(' ?NOTHING TO PRINT',/)(' ')(8(' ',7X,12(A7,3X)/)/)(' ',/,' ')(8(' ',11X,12(A7,3X)/)/)('SGN',I2)(' ?YOU HAVE NOT PRINTED SIGN',I3,' YET')(' TOTAL OF ',I3,' SIGNS CREATED')(' EACH SYMBOL IS 7 CHARACTERS ACROSS AND 8',/,' CHARACTERS HIGH.  YOUR DEFINED SYMBOL IS CALLED BY',/,' TYPING THE CHARACTER "@" IN ITS PLACE WHEN YOU',/,' INPUT A STRING TO THE COMMAND "INLINE". NOW TYPE IN A',/,' ROW OF YOUR SYMBOL AFTER EACH "^" APPEARS.',/,' (<CR> AFTER EACH ROW)')('   1234567',/)('+',I1,'^',$)(A7)(' NEW SYMBOL DEFINED'/)(' "@" MUST NOT APPEAR IN AN INPUT STRING UNTIL',/,' YOU HAVE GONE THRU DEFSYM DIALOG TO DEFINE THE SYMBOL',/,' THE LINE HAS NOT BEEN COMPILED.'/)(' INSTRUCTIONS? (Y OR N):',$)(A1)(' ')(' FAST FORM OF INLINE COMMAND',/,' KEEPS YOU IN INLINE MODE. TYPE IN A LINE OF THE',/,' SIGN AFTER EACH "LINE NO.:" APPEARS. TO RETURN TO',/,' COMMAND LEVEL, TYPE  A ^Z. ANY ERROR RETURNS',/,' YOU TO COMMAND MODE . THERE IS AN AUTOMATIC',/,' RETURN TO COMMAND MODE AFTER THE',/,' TENTH LINE OF A SIGN IS INPUT.'//)('+LINE ',I2,': ',$)N    |@     8@     SYS  SIGN.LIB  RANDOM    + -<
/ D1 $ DR <
3, <
7,, <
:,, <
=, <
@,
 ?3D
/+
9 
.ZD< < 53F?+
E*d
> <
B, <
E,
 <
F,,+
96b<0b+
L+
G4
L4
c494B4
-4|4
4
 4
- $3D|+
O $3DH+
Q <
I,,+
9 <
L, <
O,
6D?+
W <
Q,, <
T, <
W,
7d?+
Y3d|+
\ <
X, <
[,
+
9 | D| <
],,"$.? D|OdQ+
c | D|@dQ+
9:|1d+
f <
`,,+
t@d47@H+
i $ D:+u7 2+
m <
c, <
f,
+
o <
h, <
k,
 <
l, <
o,
 F3D
/+
w <
r,,7 Q+
a"$.D|@d2+
9"& $ D= = @2D
/+
|>=8&
x $ D= $/=7 .$( D1 |@fH7&=.&((3F=+ & FH 42$=+:4.1 DN 4 @3D
,+
 
,ZD< < 4  @3HT+*d
 <
u, 4 <
x,
+
t <
y, 
._D?ZDT $
$N |(. $x$T. <
},
:T; ?+,+7`1+%"1 $ F> D: 
. (
$: 
|(
.
 (x$(.
2
'z*d::; >+ 4.10$+3 $.4.1 DT T/& T F= D: 
. (
$: 
|(
.
 (x$(.@l'z@n'z*d,::; =++6 2+5 |1&+
c@d27 Q+
a+
9 <
~,,+
9,<, <
,
 G3D
++
9 <
, <
+
97`H+E+<
9"$$|.$7&.$(6D;+<b <
._HQZHT 
-_HPZH3 (
$3 
(
.
(x$T. <
:3;,P+V:T; Q+U,1D+q <
._HPZHT 
-_HOZH3 (
$3 
(
.
(x$T. <
:3;,O+f:T; P+d,1D+q <
2,@d| $ DH+
9:S@dH <
 <
1,"6b:0b+|+z4
i4
" H1D+
7D|+
,< <
+
9,< <
 <
0,^,< <
 ?3D
++
B<,"< $ <
L< ( <
.$8&
Q<,Od;+
96 ;+
 
. (
$N 
|(
.
 (x$(. ,(

0s
'z*d
+,<+
t7@H+
" $ D:+u7 5+
,,<, <
^<, ?3D
++
+,<,Od5Od2+
c+
9@d|+
9 <
0,
pR0xRHh1^
0^
1
-X=X?X@$?XA$?X=XCX}F$?XGXI$?XJ$?XMXOXS$S$|X
($|X
t
tW@@XXX]$@P77b<0zXbXgPX	7X	<$GX	=@UX	?XR	BXR	BXR	BXR	B0'zXR	EXR	F0'zXR	EP	I0$SX	J$SX	N$SX
X@$?X	RX	oX	q$X	r0 sX	sX	uX
X
$?X
X
	`Z(X^. >X.~(3~+}
&b+
?NO CORE AVAILABLE - CAN NOT PROCEED
!***,^,~*x,>`<*<``pZ@`````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````Ulr[ZYYXpX.pX.pX-pX-9g
&u^
"r:^`:l5m$A*":
(A
8@#xHlJe,(>S	YVBDfFDaC
_
G)cl`9
8v:<LcJt(BVKV4PbXlVkBI
YPbKYYYh[|ggMA
JTUR/}F
/|N	@\:T(q5vX_<F

zR(TsT	`u6
(J"
&*
 R	WJ
>
_Bb
_2v	^,6RW	`
K^
2b
2RYmtL(bIz
3u
Y
	?
> s97
15
9 A
-	J-m
f	ia	B
i	E
?%_+9KzI=F.
t
B%s+9_~]?)3	naPA

E&,9s9pE
(
F&5>
?nUg
G&/
~>s
Em
Wni	<
ab
O&CAn}	=\a	R
I&W!	oER	%	o
L&k
\	N
O&
?C
]	q'
Q'
?W
z
E	F;
T+
- 5]E	rO
W,
I
a
c
X,'
aw
[,;
cyM
],ONzS
`,c
h!
w	73
c,wQz{
i7
"q
f-
bAuuS
h-T{#G
k-3U{7
mu9
r[
l2V{K
o
o23V{
 c	I
r2G
oPU

x2[q
+
x2o
Lzu]3	{]CP}
!iA
+?3
QuG]cauQ
i!	sS
3dziGa[[Q%
"?
3+dz}C{1olQ9
S
u3?e	hAB{Eb	%kg
x3Sf,a
|	hUE
0{
y8?I	hiL+
3 8Sq	h}NVa
?
7V#8g
Y'	i	BS
: 7
}8{
2

_
=K9
,
s
@qG9#
]9|%	u|SMdgt&HgU	Tw04Tan3SPHSN&4BN^^]7I`@HP4HcTGP5Ge,(@P5@&&$?P6?P6>P7>.=P7=P8<
<cm@;
);&?;:/:fuG5Q@5/4X}4
32I722
@[2Y|1^^0
3\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0