 ANTIC VOL. 7, NO. 2 / JUNE 1988 / PAGE 8

I/O Board

BALLPARK LISTING 2

Listing 2 for Ballpark Figures, which makes it easier to type the special characters in lines 1072-74, got left out of the April 1988 Antic.

The data for this listing is printed below. In order to use these data lines numbered 1000-1080, you must add them to the end of Antic's standard BASIC loader routine-which you'll find in this issue as lines 60-250 of Listing 2 for the Game of the Month, Escape From Hell.

To merge both Ballpark Figures listings, follow the Listing 2 instructions in this issue's Escape From Hell article.


Don't type the TYPO II codes!
JE   1000 DATA 247
MO   1010 DATA 0490480550500320830790820840
          36040049044054053041061034216104056233
          003133217104133204104133203
HG   1020 DATA 1041332151041332141041332101
          04133209162000104104157000001232228217
          208246056165209233002133209
DM   1030 DATA 1652102330001332100481081652
          09133211165210133212165204133206133034
          155049048055051032083079082
ZJ   1040 DATA 0840360400540540440490510480
          41061034208165203133205024101214133207
          165208101215133208160000185
FP   1050 DATA 0000011900020011342181900010
          01200200200132216168136177205209207240
          012165218208004144016176046
UX   1060 DATA 1440441760102002022082341642
          16196217208210198034155049048055052032
          083079082084036040049051049
JV   1070 DATA 0440490560500410610342111692
          55197211208006166212240011198212165208
          133206165207024144172165213
NX   1080 DATA 2400041342132081480961342131
          60000177205170177207145205138145207200
          196214208241240203034155

COLLEEN MUSIC CREATOR

Colleen Music Creator, reviewed in Antic March 1988, is no longer distributed the US. However, you can order Colleen directly from the overseas manufacturer Send $29.95 to Colleen Ltd., 18 Bishop Street, Penygraig Mid-Glamorgan, Wales CF40-1PQ, UK. Phone: 0443-434846 or 0443-435709. -ANTIC ED

NO-FRILLS N.E.R.D.S.

Our N.E.R.D.S. Disks of map icons (New Products, Antic, February 1988) are now distributed through No Frills Software both 8-bit (Print Shop) and ST (Print Master) formats. For information, send a stamped, self-addressed envelope to: No Frills Software, 800 E. 23rd Street, Kearney, NB 68847. Don Loeffler
N.E.R.D.S. Software

BILLBOARD HELP

Because of Charles Cherry's review of Bill board (See "8-Bit Enhancements," Antic, February 1988.), I bought the program. In the review he mentioned that he changed the code to make the program work with a Gemini 10-X printer. I'd like to know what changes he made. James Wind
Salt Lake City, UT

Charles Cherry writes, "As Chris Wareham says in his Billboard documentation, the printer codes are used in only three lines: 1020, 1600, and 2100. It's just a matter of changing those lines and inserting the codes for your printer For the Gemini 10-X printer I added some lines to make it easier. Make the changes in lines 1020, 1600 and 2100, then add lines 1601-1604 and 2101-2104." The new code follows:

  1020 POKE 764,255:CLOSE #N4:OPEN 
#N4,N8,Z," P:" :?
#N4;"@A:';CHR$(N8);, '1M";CHR$
(LMAR);:RETURN
  1600 SCR= SCR+ 320/H:FOR I =N1 TO 
HT/N8
  1601 IF MODE=0 THEN ? #N4;"K";
 CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOT0 1610
  1602 IF MODE= 1 THEN ? #N4; "L";
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 1610
  1603 IF MODE= 3 THEN ? #N4; "z";
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 1610
  1604 IF MODE= 6 THEN ? #N4;"y";
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 1610
  2100 FOR J = N1 TO W
  2101 IF MODE=0 THEN ? #N4;"K";
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 2110
  2102 IF MODE= 1 THEN ? #N4;"L"';
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 2110
  2103 IF MODE= 3 THEN ? #N4;"Z";
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 2110
  2104 IF MODE=6 THEN ? #N4;"y";
CHR$(COLL);CHR$(COLH);PRNT$(N1,
LIM):GOTO 2110

DESIGNER LABELS FIXES

Designer Labels (Antic, April 1987) doesn't display the directory of pictures saved with Broderbund's Print Shop Companion, even though you can load a picture if you know the filename. To display the directory, change line 3040 to: 3040 FOR X=CO To 96 STEP 32:IF B$(X + 20,X + 20)<>"X" AND B$(X + 20,X + 20)<>"Y" THEN 3060

The above program line comes from Iconverter (Antic, December 1987). Also, after each run of labels, the printer platen must be rolled back so that the next run will print in the vertical center of the labels. But the following line modifications take care of this on Epson and Gemini printers:

2260 FOR I = C1 TO NLABELS:IF I = C1 THEN GOTO 2270
2262 ?#C2:? #C2:IF PEEK(53279)=C3 THEN POP:CLOSE #C2:RETURN
2310 IF P=C1 THEN ? #C2:GOTO 2330
2320 ? #C2

These modifications delete some printer control codes. Turn your printer off and back on again before booting another program that uses the printer.

Phil Snider
Chattanooga, TN

VENDORS HELP ON-LINE

Type GO ATARIVEN to get to the Atari Vendor Support Forum, a new SIG in the Atari section of CompuServe. As of late February 1988, six vendors, ICD Inc, Intersect Software, Michtron, Drafix, QMI, and Regent Software have uploaded libraries full of short programs, patches, textfiles of tips, etc. Company representatives are also available to read your comments and answeryour questions -ANTIC ED

BIORHYTHM FIX

Three readers pointed out a mistake in BASIC Biorhythms (Antic, January 1988). In line 2232, change the GOTO statement from GOTO 2240 to GOTO 2234. Also, "February" is misspelled in line 4020.

Antic thanks Rick Weissmann of Colorado Springs, Colorado; Dennis Leitch of Yakima, Washington and Gordon Haddrell of Surnmerland, British Columbia.-ANTIC ED

Antic welcomes your feedback, but we regret that the large volume of mail makes it impossiblefor the Editors to reply to everyone. Although we do respond to as much reader correspondence as time permits, our highest priority must be to publish I/O answers to questions that are meaningful to a substantial number of readers.

Send letters to: Antic I/O Board, 544 Second Street, San Francisco, CA 94107