Wall art for 1970s lab--Snoopy?

General discussions related to the Altair 8800 Clone

Re: Wall art for 1970s lab--Snoopy?

Postby Caterman » August 29th, 2015, 8:47 am

If you're looking for some pointers I would really recommend checking out PUNMSG in the program's folder in CPM 2.2 within the Altair Clone support stuff, it was adapted by Mike that will help with punching "spaces" also reverses the side of paper!
Caterman
 
Posts: 52
Joined: May 31st, 2015, 3:07 pm
Location: UK

Re: Wall art for 1970s lab--Snoopy?

Postby AltairClone » August 29th, 2015, 8:48 am

It's very difficult to not answer your question about the blank punch position, but regarding flipping to the other side of the tape...

I ended up flipping the image on my paper-tape message printing program for the same reason you mention. I did it in a loop rotating the input byte to the left through carry and likewise to the right for the output byte. Not elegant, but it works.

There is a mathematical trick for reversing bits in a byte if you just happen to have a 64 bit multiplier and divider in your Altair:

Reverse the bits in a byte with 3 operations (64-bit multiply and modulus division):

unsigned char b; // reverse this (8-bit) byte

b = (b * 0x0202020202ULL & 0x010884422010ULL) % 1023;

The multiply operation creates five separate copies of the 8-bit byte pattern to fan-out into a 64-bit value. The AND operation selects the bits that are in the correct (reversed) positions, relative to each 10-bit groups of bits. The multiply and the AND operations copy the bits from the original byte so they each appear in only one of the 10-bit sets. The reversed positions of the bits from the original byte coincide with their relative positions within any 10-bit set. The last step, which involves modulus division by 2^10 - 1, has the effect of merging together each set of 10 bits (from positions 0-9, 10-19, 20-29, ...) in the 64-bit value. They do not overlap, so the addition steps underlying the modulus division behave like or operations.

This method was attributed to Rich Schroeppel in the Programming Hacks section of Beeler, M., Gosper, R. W., and Schroeppel, R. HAKMEM. MIT AI Memo 239, Feb. 29, 1972.
AltairClone
Site Admin
 
Posts: 632
Joined: April 5th, 2013, 10:55 am

Re: Wall art for 1970s lab--Snoopy?

Postby toml_12953 » August 30th, 2015, 8:23 am

mail@gabrielegan.com wrote:It would be an interesting exercise for a student to take the code that produces this and transform it so that Snoopy appears when we look at the other side of the paper-tape. I guess that means mirroring each byte so that the least-significant-bit goes to the most-significant-bit, the second-least to the second-most, and so on. That's just the kind of beginner's exercise my students should enjoy, competing to make the most efficient coding. (My first instinct is to use eight masking operations in a row to pull out each bit, but I wonder if there's some mathematical relationship that makes it simpler).

Thanks again, everyone, for this stimulating stuff.

Gabriel Egan


Ummm...the holes go all the way through the tape. Just turn over all the tapes and Snoopy will be facing the other way with no arrows. :)
toml_12953
 
Posts: 297
Joined: June 7th, 2013, 12:54 pm

Re: Wall art for 1970s lab--Snoopy?

Postby AltairClone » August 30th, 2015, 8:31 am

Haha, well that's just too easy! Though in my over-engineered defense, my background in this topic was with printed messages on papertape which read incorrectly if turned over :)

Mike
AltairClone
Site Admin
 
Posts: 632
Joined: April 5th, 2013, 10:55 am

Re: Wall art for 1970s lab--Snoopy?

Postby Caterman » August 30th, 2015, 11:12 am

That's like NASA spending a fortune to develop the ink pen that would work in space and the USSR using a pencil!
Caterman
 
Posts: 52
Joined: May 31st, 2015, 3:07 pm
Location: UK

Re: Wall art for 1970s lab--Snoopy?

Postby Caterman » September 4th, 2015, 1:53 pm

Here's my ALTAIR 8800 Banner nearly 6' when printed in Altair type font.
Hope you like!
Code: Select all
1 REM ALTAIR 8800 BANNNER
2 PRINT "ALTAIR 8800 ASCII BANNER"
3 PRINT "FOR TERMINAL PRESS 1    FOR LINEPRINTER PRESS 2"
4 INPUT A
5 IF A<1 OR A>2 THEN GOTO 3
6 READ L,A$
7 IF A$="END" THEN GOTO 12
8 FOR N=1 TO L
9 IF A=1 THEN PRINT A$ ELSE LPRINT A$
10 NEXT N
11 GOTO 6
12 END
100 DATA 1," BFi."
101 DATA 1," @B@@@BM2r."
102 DATA 1," B@B@B@B@B@B@MXr,"
103 DATA 1," @B@B@B@@@B@B@B@@@B@PL,"
104 DATA 1," :vS@B@@@B@B@B@B@B@B@B@B@B0L:"
105 DATA 1,"       ,7qB@B@B@B@B@B@B@@@B@B@B@Ej:"
106 DATA 1,"             :YE@B@B@@@B@B@B@B@B@@@@@BOji."
107 DATA 1,"                   iJ0B@B@B@B@B@B@@@B@B@B@B@MF;."
108 DATA 1,"                      qB@@@B@B@B@B@B@B@B@B@B@B@B@B@S7."
109 DATA 1,"                      E@B@B@B@.i2MB@B@B@B@B@B@B@B@B@B@B@Bqv:"
110 DATA 1,"                      OB@B@B@B      .rSM@@@B@B@B@@@B@B@B@B@B@B@NL:"
111 DATA 1,"                      O@B@B@B@            .75BB@B@@@@@B@B@B@B@B@B@B@BGLi"
112 DATA 1,"                      OB@B@B@B                  ,rXM@B@B@@@B@B@B@B@B@B@B@B@82i,"
113 DATA 1,"                      8@B@B@B@                        .r5BB@B@B@B@B@B@B@B@@@@@B"
114 DATA 1,"                      OB@B@B@B                               .jM@@@@@B@B@@@B@B@"
115 DATA 1,"                      8@B@B@B@                            :rLSG@B@@@@@B@B@B@@@B"
116 DATA 1,"                      OB@B@B@B                    .iuE@B@B@B@B@B@@@@@B@B@@@B@B@"
117 DATA 1,"                      8@@@B@B@             .iu0@B@B@B@B@B@@@B@B@@@B@@@B@B@B@B@B"
118 DATA 1,"                      OB@B@B@B      .:Jq@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@"
119 DATA 1,"                      q@B@B@B@:7k@@@@@B@B@@@B@B@B@B@B@B@B@@@B@B@B@B@@@B@B@B@B@B"
120 DATA 1,"                      OB@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@@@@@"
121 DATA 1,"               :7SM@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@@@B@B@B"
122 DATA 1,"        ,rF8@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@B@@@B@B@"
123 DATA 1," :r5G@B@@@B@B@B@@@B@B@@@B@B@B@B@@@@@@@B@B@B@@@B@B@B@@@B@B@B@B@@@@@B@B@B@B@B@B@F"
124 DATA 1," @@B@B@B@B@B@B@@@B@B@B@B@@@B@B@B@@@B@B@B@@@B@B@B@B@B@B@@@B@B@@@B@B@@@B@B@B@B@B"
125 DATA 1," @B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@@@B@B@B@B@B@B@B@@@B@B@B@B@B@@@B@B@B"
126 DATA 1," B@B@B@B@B@B@B@B@@@B@B@@@B@B@B@B@B@B@B@@@B@B@@@B@B@B@B@B@B@@@B@B@@@B@B@B@BE:"
127 DATA 1," @B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@@@B@B@B@@@B@B@B@B@B@B@@@B@B@@@B@B@Xv:"
128 DATA 1," B@@@@@B@B@@@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@@@B@B@B@B@@@B@B@Gui."
129 DATA 1," @@@B@B@@@B@B@B@@@B@B@B@B@B@B@@@B@B@B@@@B@B@B@B@B@B@B@MFr,"
130 DATA 1," B@B@B@@@@@B@B@B@B@B@B@@@@@B@@@@@B@@@B@@@B@B@B@B0Yi"
131 DATA 1," @B@@@B@B@@@B@B@B@@@B@B@B@B@B@B@B@B@@@B@BOUr."
132 DATA 1," B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@@@B@kv:"
133 DATA 1," @B@B@B@B@@@B@B@B@B@B@B@@@B@Eu:."
134 DATA 1," B@B@B@B@B@B@B@B@B@@@OFr,"
135 DATA 1," @B@B@B@B@B@B@B0L:"
136 DATA 1," B@B@B@BOur."
137 DATA 1," @qv,"
138 DATA 7," "
145 DATA 1,"   SB@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@@@B@@@B@B@B@B@B@B@B@B@B@B@@@@@B@B@@@B@B@@@@"
146 DATA 1," .@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@@@B@B@B@B@B@B@B@B@@@@@B@B@@@B@B@B@B@@@B@B@"
147 DATA 3," @B@@@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@@@B@B@@@B@B@B@B@B@B"
150 DATA 1," B@B@@@B@B@B@B@B@B@B@@@B@B@B5"
151 DATA 18," @B@B@B@B@B@@@B@B@B@B@B@B@B@"
169 DATA 2," @@@B@B@B@B@B@B@B@B@B@B@B@B@                       jB@B@B@B@B@B@B@B@B@B@B@B@B@B"
171 DATA 13,"                                                   vB@B@B@B@B@B@B@B@B@B@B@@@B@B"
184 DATA 5," @@@@B@B@B@B@B@B@B@B@@@B@@@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@@@B@B@"
189 DATA 13,"                                                   0B@B@B@B@B@@@@@B@B@B@B@B@B@B"
202 DATA 1," G7.                                               7@@@B@B@B@B@B@B@B@B@B@B@B@BB"
203 DATA 1," @B@B@Bk7."
204 DATA 1," B@B@B@@@B@B@Xv,"
205 DATA 1," @B@@@@@B@B@B@B@B@B0L:"
206 DATA 1," 7kM@B@B@B@@@B@B@@@B@B@B@0u:"
207 DATA 1,"      .7S@B@B@B@B@B@@@B@B@@@B@BOji."
208 DATA 1,"            ,70B@@@B@B@B@B@B@B@B@B@B@O1i."
209 DATA 1,"                  :Y0@@@B@B@B@B@B@B@B@B@B@BBF7."
210 DATA 1,"                      0B@B@B@B@@@@@B@@@B@B@B@B@B@@P7:"
211 DATA 1,"                      E@B@B@B@:JO@B@B@B@B@B@B@B@B@B@B@B@NL:"
212 DATA 1,"                      O@@@@@@B     .r2MB@B@B@B@@@B@B@B@B@B@B@BGY:"
213 DATA 1,"                      O@B@B@B@           .i5M@B@B@B@B@B@B@B@B@B@B@B@Gui."
214 DATA 1,"                      OB@@@B@B                 .r2BB@B@B@@@B@B@B@B@@@B@@@BM2r."
215 DATA 1,"                      8@B@B@B@                       .i5O@B@@@B@B@@@B@@@B@B@B@B"
216 DATA 1,"                      OB@B@B@B                               i1B@B@B@B@B@@@B@@@"
217 DATA 1,"                      8@B@@@B@                             .:vk@@@B@B@B@@@@@B@@"
218 DATA 1,"                      OB@B@B@B                     .;uGB@B@B@B@B@B@B@B@B@@@B@@@"
219 DATA 1,"                      8@@@B@@@              .iJGB@B@B@B@B@@@B@B@B@@@B@B@B@B@B@@"
220 DATA 1,"                      O@@@@B@B        iYZB@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@"
221 DATA 1,"                      q@B@B@B@ ,v0B@B@B@B@B@B@B@B@B@B@B@@@B@B@@@B@@@B@B@B@B@B@B"
222 DATA 1,"                      ZB@B@B@B@B@B@B@B@@@B@@@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@"
223 DATA 1,"                ,7FMB@B@B@@@B@@@B@B@B@B@B@B@@@B@B@B@B@B@B@B@@@B@@@B@B@B@B@B@B@B"
224 DATA 1,"         ,72MB@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@@@B@B@B@@@B@B@B@B@B@"
225 DATA 1,"  ,r2OB@B@B@B@B@B@@@@@@@B@B@B@B@B@B@B@@@B@@@@@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@N"
226 DATA 1," @@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@@@@@@@B@B@B@B@B@B@B@@@@@B@B@B@B@B@B@@@B@B@B@B"
227 DATA 1," @B@B@B@@@@@@@@@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@@@B@@@B@B@B@@:"
228 DATA 1," @@B@@@@@@@B@B@B@B@B@@@@@B@B@B@@@B@B@B@B@@@B@@@B@B@B@B@B@@@B@B@@@B@B@B@B@B@L"
229 DATA 1," @B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@@@B@@@B@B@B@B@B@@@B@@@B@B@B@B@@@B@B@BP7:"
230 DATA 1," B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@BGJi"
231 DATA 1," @B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@B@@@B@B@B@B@B@B@B@B@B@BM1r."
232 DATA 1," B@B@@@B@@@B@@@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@qL:"
233 DATA 1," @B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@Gui."
234 DATA 1," @@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@MX7:"
235 DATA 1," @B@B@@@B@B@B@B@B@B@B@B@B@B@@EL:"
236 DATA 1," B@B@@@B@B@B@B@B@B@B@BM2r."
237 DATA 1," @B@B@B@B@B@B@B@XL:"
238 DATA 1," B@B@@@B@Zui."
239 DATA 1," @BX7:"
240 DATA 7," "
247 DATA 15," @@@B@@@@@@@@@B@B@B@@@B@@@B@B@B@B@B@B@@@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B"
262 DATA 7," "
272 DATA 15," B@B@B@B@B@B@B@B@B@@@B@B@B@B@@@B@B@B@B@B@B@B@B@B@@@B@B@B@B@@@@@B@B@B@B@B@@@B@@@"
287 DATA 13,"                                  B@B@@@B                              MB@B@B@B"
300 DATA 1,"                                 u@B@B@B@G                            iB@B@B@B@"
301 DATA 2," @B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@@@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@@@B@B@@@B"
303 DATA 1," @@@B@B@B@B@B@@@B@B@B@@@@@B@@@@@B@B@BJB@B@@@B@@@B@B@@@@@B@B@B@B@B@B@@@B@B@@@B@."
304 DATA 1," B@B@B@B@@@B@B@B@B@B@B@B@B@@@B@B@B@BL rB@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@;"
305 DATA 1," BGENEq0qENEN0qEqEq0q0NEq0NEqEq00qr     vqNENENEqEN0qEq0q0qEN0q0q0N0qEq0005;"
306 DATA 32," "
338 DATA 1,"    :5qEq0q0q0q0N0qEqEq0N0q0q0q0qEq0qEqEki    jEq0q0N0q0q0q0N0N0NEq0q0N0NNL."
339 DATA 1,"  :@@B@@@B@B@B@B@@@B@B@B@B@B@B@B@@@B@B@B@BO .B@B@B@B@B@B@@@B@B@B@B@B@B@B@@@BM"
340 DATA 1," ,B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@BvB@B@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@"
341 DATA 2," B@@@@@@@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@@@B@B@@@@@B@B@B@B@@@B@@@@@B@B@B@B@B@BF"
344 DATA 1," @B@B@B@B@B@B@B@B@B@B@B@@@B@r           B@B@B@BN                       @@@B@B@B"
345 DATA 21," @@B@B@@@B@B@B@B@B@B@B@B@B@@            vB@B@B@.                       B@B@B@B@"
366 DATA 1," @@@B@B@B@B@B@B@B@B@B@B@B@B@v           B@B@B@B8                      .@B@B@B@B"
367 DATA 2," B@B@B@B@B@B@B@B@@@B@B@B@B@B@M2YjJuJuYkB@@@B@B@B@2jYujuJujujujuJujuYuE@B@B@B@B@"
369 DATA 1," X@@@B@B@@@B@@@@@B@B@B@B@B@@@B@B@@@B@@@@@B@B@B@B@B@B@@@@@B@B@@@@@B@B@B@B@B@B@B:"
370 DATA 1,"  B@B@B@B@@@B@@@@@B@B@B@B@B@B@@@B@B@B@B@B@B.7@B@B@@@B@B@@@B@B@B@@@B@B@@@B@B@Bj"
371 DATA 1,"   v@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@@@B@BJ  S@B@@@B@B@B@B@B@B@B@B@B@B@B@B@M,"
372 DATA 9," "
381 DATA 1,"    :5qEq0q0q0q0N0qEqEq0N0q0q0q0qEq0qEqEki    jEq0q0N0q0q0q0N0N0NEq0q0N0NNL."
382 DATA 1,"  :@@B@@@B@B@B@B@@@B@B@B@B@B@B@B@@@B@B@B@BO .B@B@B@B@B@B@@@B@B@B@B@B@B@B@@@BM"
383 DATA 1," ,B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@BvB@B@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@"
384 DATA 1," B@@@@@@@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@@@B@B@@@@@B@B@B@B@@@B@@@@@B@B@B@B@B@BF"
385 DATA 2," @B@B@@@B@B@B@B@B@B@B@B@@@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@@@B@B@B@B"
387 DATA 1," @B@B@B@B@B@B@B@B@B@B@B@@@B@r           B@B@B@BN                       @@@B@B@B"
388 DATA 21," @@B@B@@@B@B@B@B@B@B@B@B@B@@            vB@B@B@.                       B@B@B@B@"
409 DATA 1," @@@B@B@B@B@B@B@B@B@B@B@B@B@v           B@B@B@B8                      .@B@B@B@B"
411 DATA 2," @B@B@B@B@B@@@B@B@B@B@B@B@B@B@@@B@B@B@B@@@B@B@B@B@B@B@@@B@B@@@B@B@B@B@B@B@B@B@B"
412 DATA 1," X@@@B@B@@@B@@@@@B@B@B@B@B@@@B@B@@@B@@@@@B@B@B@B@B@B@@@@@B@B@@@@@B@B@B@B@B@B@B:"
413 DATA 1,"  B@B@B@B@@@B@@@@@B@B@B@B@B@B@@@B@B@B@B@B@B.7@B@B@@@B@B@@@B@B@B@@@B@B@@@B@B@Bj"
414 DATA 1,"   v@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@B@@@B@BJ  S@B@@@B@B@B@B@B@B@B@B@B@B@B@B@M,"
415 DATA 9," "
425 DATA 1,"   7B@B@B@@@B@@@B@@@B@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@O."
426 DATA 1,"  MB@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@@@B@B@B@@@B@B@B@B@B@B@@@@@B@@@B@B@B@@@B@7"
427 DATA 1," kB@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@@@B@@@B@B@B@B@B@B@@@@@B@B@B@B@B@B@,"
428 DATA 2," B@@@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@@B"
430 DATA 1," B@B@B@B@B@B@@@B@B@@@B@B@B@@@                     i@@B@B@B@@@B@B@B@B@@@B@@@B@B@"
431 DATA 22," @B@B@B@B@B@B@B@B@B@B@B@B@B@                       UB@B@B@B@B@@@B@@@B@B@B@B@B@B"
453 DATA 1," @@@B@B@B@B@@@B@@@B@B@B@B@B@B.                    i@@@B@B@B@B@@@@@B@B@B@B@B@B@B"
455 DATA 2," @B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@@@B@B@F"
456 DATA 1," ,@B@B@B@B@@@B@@@B@@@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@@"
457 DATA 1,"  :@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@@@B@B@B@B@@@B"
458 DATA 1,"    rXOZGZ8E8ZGE8Z8Z8Z8Z8ZGZGZ8EGZGEGEGZ8EGZGZ8E8EGZ8Z8ZGZGE8ZGZGZGZGZ8ZOZF,"
459 DATA 9," "
460 DATA 1,"   7B@B@B@@@B@@@B@@@B@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@O."
461 DATA 1,"  MB@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@B@@@B@B@B@@@B@B@B@B@B@B@@@@@B@@@B@B@B@@@B@7"
462 DATA 1," kB@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@@@B@@@B@B@B@B@B@B@@@@@B@B@B@B@B@B@,"
463 DATA 2," B@@@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@@B"
464 DATA 1," B@B@B@B@B@B@@@B@B@@@B@B@B@@@                     i@@B@B@B@@@B@B@B@B@@@B@@@B@B@"
465 DATA 22," @B@B@B@B@B@B@B@B@B@B@B@B@B@                       UB@B@B@B@B@@@B@@@B@B@B@B@B@B"
466 DATA 1," @@@B@B@B@B@@@B@@@B@B@B@B@B@B.                    i@@@B@B@B@B@@@@@B@B@B@B@B@B@B"
467 DATA 2," @B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@B@B@B@B@B@B@@@B@B@F"
468 DATA 1," ,@B@B@B@B@@@B@@@B@@@B@B@B@B@B@B@B@B@B@@@@@B@B@B@B@B@B@B@B@B@B@B@B@@@B@B@B@B@@"
469 DATA 1,"  :@B@@@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@B@@@@@@@B@B@B@B@@@B"
470 DATA 1,"    rXOZGZ8E8ZGE8Z8Z8Z8Z8ZGZGZ8EGZGEGEGZ8EGZGZ8E8EGZ8Z8ZGZGE8ZGZGZGZGZ8ZOZF,"
471 DATA 1,"END"



I have been looking for an old program that prints banners by simply typing in the phase you want, I can't find it anywhere, anyone have anything.
I have loved revisiting the old ASCII art days, great challenge.
Wouldn't it be great if we could have some form of software challenge set regularly. Perhaps a separate forum!
Also any clues on sending hex data or something to a paper tape punch on the second SIO just using 8k Basic or Basic under CPM, not just using LPRINT? Instead of machine code.
Caterman
 
Posts: 52
Joined: May 31st, 2015, 3:07 pm
Location: UK

Re: Wall art for 1970s lab--Snoopy?

Postby Caterman » September 9th, 2015, 4:43 am

How about this. Framed and mounted neatly, this time, on black card.
IMG_2488.JPG

Having a little trouble in having image show up in portrait mode?
My solution to the arrows is to punch on plain paper.
I only have 1 roll of paper with arrows left now. All new paper I get is plain!
Caterman
 
Posts: 52
Joined: May 31st, 2015, 3:07 pm
Location: UK

Re: Wall art for 1970s lab--Snoopy?

Postby toml_12953 » September 9th, 2015, 8:04 am

Caterman wrote:Here's my ALTAIR 8800 Banner nearly 6' when printed in Altair type font.
I have been looking for an old program that prints banners by simply typing in the phase you want, I can't find it anywhere, anyone have anything.
I have loved revisiting the old ASCII art days, great challenge.
Wouldn't it be great if we could have some form of software challenge set regularly. Perhaps a separate forum!
Also any clues on sending hex data or something to a paper tape punch on the second SIO just using 8k Basic or Basic under CPM, not just using LPRINT? Instead of machine code.


You could do an OUT to the port number of the second serial port. Follow it by WAIT so you don't sent the next character too quickly.

Tom L
toml_12953
 
Posts: 297
Joined: June 7th, 2013, 12:54 pm

Re: Wall art for 1970s lab--Snoopy?

Postby AltairClone » September 9th, 2015, 9:23 am

Caterman,

Wanna make us a 72 column version of the big banner for the Teletype? :)

Mike
AltairClone
Site Admin
 
Posts: 632
Joined: April 5th, 2013, 10:55 am

Re: Wall art for 1970s lab--Snoopy?

Postby Caterman » September 9th, 2015, 9:30 am

Tom, Thanks for the OUT command, I was convinced it would be more difficult than that!!! DOH (must do me a Homer Simpson Paper Tape Artwork soon)
Mike, Sure I'll make a 72 column banner, I'll post it just as soon as I can!
Caterman
 
Posts: 52
Joined: May 31st, 2015, 3:07 pm
Location: UK

PreviousNext

Return to General Discussions

Who is online

Users browsing this forum: No registered users and 17 guests