D, ‘. 2 OCTOBER 1991 $ 4.95

MACAG IME

[Ma ss CARH bine cra “Magazine

oF SINCLAIR COMPUTERS

The Sinclair QL ~a 32 bit CPU Powerhouse!

“al THE Z88 unpeEr 2 LBs.

A Computer Without Compromise

Me TS-2068 Workhorse UPDATE COMPUTER SYSTEMS PO. Box 1095 Peru, Indiana 46970

News Avo New Propucrs

+ UPDATE COMPUTER SYSTEMS +

UPDATE COMPUTER SYSTEMS is Edited and Published by Carol and Frank Davis of P.0. Box 1095, Peru, Indiana ‘46970. Phone number is 317-473-8031, with normal phone hours being between 5 P.M. and 9:30 P.M. Eastern Time during the week and Noon to 6 P.M. on weekends, When we are not there or unavailable, please leave a message with our auswering machine, Unless urgent you will be answered by mail.

Keiling date for all issuee is the fifteenth of the issue month,

The magazine is published on a quarterly basis in the months of October, January, April and July. All subscriptions begin and end at the same time...first issue being October and all renewals coming due pt of the July issue, The cost is $18.00 U.S, for a one year

for North America, and fcr those outside of this area ept personal and business checks, money orders and to obtain back issues prior to October 1990, please contact the former Publisher, Biil Jones at 1317 Stratford Ave., Panama City, Florida 32404, He will gladly provide you with the needed issues and information he use of a Self Addressed Stamped Envelope would be appreciated and help to speed a reply.

Assistance in Publishing this magazine is provided by Eliad P, Wannum, poet, computer user and all round good guy, The magazine is made possible by the regular contributors such as Peter Hale, Bill Cable, Al Feng, Bob Hartung to name a few, and by the many contributions of other writers and programmers. Your contributions to this magazine are welcome. This is truly a magazine BY THE USER AND FOR THE USER OF SINCLAIR, TIMEX AND CAKBRIDGE COMPUTERS. When we cover other operating systems such as CPM or MSDOS it will be in relationship to our computers or emulators for our systems to run their software. We primarily cover disk based systems and software for the TS2068, Spectrum, QL, 288.,.and will cover items an the TS1000 if disk drive based or in relationship to using it with the above mentioned computers. We do accept reviews of peripherals that are useable by our systems, such as scanners, printers, modems, etc. Submissions should be on disk or hard copy ‘two copies and at least NWLQ, no draft mode). If there is artwork, please let us know in what order it should be used, and provide it as a saved screen or hard copy screen dump. The format is very relaxed. Just pay attention to the width of the pages and allow 3/4 inch top and bottom, and make the left and right margins wide enough to accomodate a 3 hole punch that does not cut out some of the text. We have enlarge and reduction capacity to adjust a page, but may jose some print legibility in the process. Most important is legibility. Draft quality dot matrix does not reproduce well, Print size preference is ELITE 12 characters per inch. PICA 10 characters per inch is okay also, but please no condensed print. Please do not make programs submitted on cassette tape under any circumstance, disk or hardcopy only. Exceptions ta this would be the wafers used on the Rotronics Wafadrive for the Spectrum or TS2068 with emulator. 288 programs on disk may be in either IBM or QL format or hardcopy, TS2068 progrems may be LLISTED in 32 chr. lines, but that is not solely necessary, just do not send a copy protected disk that needs to be LLISTED,

TTT eee

UPDATE COMPUTER SYSTEMS PAGE DIRECTORY, OCTOBER 1991

The computer that an article concerns is marked by using the following mark at the start of the page number-TS2068 = *,QL = # ,288 = % . There will be no mark if the article or ad applies to all or several different computer systems.

Inside Front Cover contains magazine basic information

Page No. 1---Directory

Page No. 2---Editorial by Frank Davis

*Page No. 3---Print Factory Graphics by John McMichael «Page No. 4---TS2068 Super Calc by Bill Jones

*Page No. 6---TS2068 Super Calc for Oliger & LKDOS listing *Page No. 15---Format Magazine (letter)

*Page No. 16---Byte Power Ad

*Page No. 17---When They Built The Timex 2068 They Threw Away ' The Mold! by Bill Pedersen + Local Memory Chart

*Page No. 19---Using The Larken Sequential/Random Filing System To Produce A TS2068 ROM Disassembly by Bob Mitchell

*Page No. 22---TS2068 For Sale--Bill Jones

Page No. 23---RMG Ad

Page No. 24---Desktop Publishing? by Bill Pedersen

Page No. 28---Mechanical Affinity Ad

*xPage No. 29---Sinclair Desktop Publishing Journal by Mike Felerski

Page No. 33---Let’s Read TS2068 Disks With Your QL by Paul Holmgren

Page No. 35---Ed Grey Enterprises Ad

#Page No. 36---Cable Column--Archive Part 6 by Bill Cable

#Page No. 37---Wood & Wind Computing Ad

#Page No. 38---EEC Ltd Ad

Page No. 39---Dan Elliott Prices For Repair Update

#Page No. 40---Q@L For Sale -- Bill Jones

%Page No. 41---IBM Archive to 288 Diary by Chris Fenn

tPage No. 43---The Q(old_s)LAW Project by Al Feng and Comments From The Editor-FWD

Page No. 45---Newsreport on The Computerfest by Eliad P. Wannum

%Page No. 47---The Z88 and Telecommunications by Dave Bennett

%Page No. 48---Excerpts on the Z88 from The Hacker

*Page No. 49---Tech Talk -- Making A Wafadrive Parallel Printer Cable by Mike Felerski

#Page No. 5SO---"XREF"--A Review by Charles Dittell

Back Covers ---Issue Disks for TS2068 and QL

All material used in this publication is copywritten and remains solely in ownership by either the Magazine or the author. To reprint from this magazine please contact either the magazine or specific author. All Issue Disks are copyrighted and remain the property of the software author. All hardware advice is followed at the users sole risk.

EDITORIAL by F-W. Davis

Welcome to the first issue; the second year of Carol and I publishing UPDATE Magazine. The first year was fun, educational, and at times frustrating. We lived through it and were glad for the experience. Now we are solidly decided to give it a go for the second year. Our subscribers have at least another three issues, besides this one , to look forward to. If you have not yet renewed, or have mysteriously received this copy in your mailbox, then please take the time to send in your check or money order at this time. This is not a high profit enterprise and is solely supported by your subscriptions. This goes for dealers also and for those who advertise in UPDATE. The ads may be for free or on an exchange basis, but the magazine is not. Whew!! now that I have all that nasty reminder stuff out of the way, let us get down to the fun part of articles, programs and ads. The best part of all of this is that with what [| have waiting in the wings, the next issue looks to be even better.

At this time I am going to take a look at some of the items that our readers have said they would like to appear in the pages of UPDATE Magazine. I hope this will inspire many of you to write in with articles, hints, tips and programs to answer these requests. All of these answers are out there amongst you, the readers. So far, to the best of my knowledge all = such requests have been answered prior to this.

Jean-Claude Touzin writes saying that he was buying a Hewlett Packard Laser Jet III and would like to see information concerning the use of Laser Printers with the Sinclair QL. I know that Bill Cable has a laser printer, and that Text 87 has been run with a laser printer driver (Peter Hale of EMSoft is a great source for this). Perhaps one of you, or someone unknown to me can answer this one.

This is one we really need to improve on...Alvin E. Bicht asks for more printed programs for the QL. He also asks for us to discuss the exact meaning of the terms "track" and "sector" relative to disk drives. A very thorough explanation of these terms is found in the Digital Precision manual for Solution and for their program, Super Media Manager. Perhaps someone could do a synopsis of this subject for us. It would also be a good place to discuss why there are so many different disk formats and in what way some of them differ. Any takers on this one?

Here is one I would like to see an answer on myself. Anthony Trice asks that we get a section put in the magazine for the readers to ask TECHNICAL QUESTIONS. The request he had was to hear from someone who was using a colour printer with the QL. Since I have two printers capable of colour myself, JI have to agree that an article on this would be most welcome. Also this would be good for the Z88 and the TS2068.

I ran across a note that was sent to me by one of our departed subscribers, Marinus W. Heuseveldt. He had said to tell Larken Ramdisk users that Chips #* LH52256L-12 by Sharp of Japan also work well in the Larken Ramdisk board. He also sent a_ long list of items he wanted to see in print, and I wish that he’ had lived long enough to see this happen. He wanted to see: (1) Transferring Text and Data programs from TS2068 to the QL. (2) Transferring from TS2068 to MSDOS. (3) Networking two TS2068s, without the use of a twister board and Interface Ones. (4) Using the TS2068 as a slave computer (co-processor) to the @L. He also wanted to see a method of linking a TS1000 to a QL. Here are several challenges for our readers to come up with the answers

°P- Lawrence P. Sauter asks “does anybody have a disk header

reader for the Oliger Disk Drive System?" I bet this is one that Bill Pedersen will be able to answer. Bill has recently acquired an Oliger Disk Interface to accompany his Larken.

Jim Bretz wrote to say that he wanted to see more TS2068

projects.

He also said for us not to forget

great controllers. if it works,

hundreds of thousands of TS1000s back to He also says that he has

but no one to call and says that we should start a BBS. have

computer unemployment line. a moden,

I have to confess that I

He also said he would have a payroll

program coming.

the ZX81/TS1000. They make

Controller projects anyone? You send it, and we will publish it. We could put some of these work and lessen the

thought of doing this, but

wondered about the time to maintain the SYSOP side of this. I am

open to suggestions.

Bob Mitchell of Ontario Canada had written saying he wanted us to provide TS2068 listings with 32 column layout and with short lines that were preferably not more than 100 characters or so, as otherwise cursor movement is slow and that pesky delete key becomes a headache. These are both points well taken and I our writers take heed.

Tom E. Bair wrote saying that he has Wordliner and Typeliner and was having a problem with it. He has auto linefeed on his printer OFF, loads !custom and reset the linefeed from 10 to O and still gets double line spacing. He is using an Aerco interface and has verified with the correct PEEK that it is in use. HELP! Someone send both Tom and us the answer. | wonder what printer he is using? He can be reached at 2277 Grand Ave., Shelby, Michigan 49455-9790.

John Shepard II! wants to see a tutorial series on getting graphics programs such as DTP, Tech Draw dr. etc. to run on all printers. This would allow those who have a printer that does not have much support to be able to make use of all of our intensive graphics programs. This is a tall order, but John is correct in the need for such a series.

hope

Put some punch in your

PRINT FACTORY? graphics! " ; pry GAAAAARARAAAKAAIARAIAAIARIRAKNAKIA RAK AAKAAKAAARKRAKKIIY

Collection#1 Collection#2 Collection#3

Miscellaneous Animals Digitized Misc. Men/Boys Funny Female Faces

Women/Girls Transportation Male Faces

Digitized Misc.

praphics in each collection!

$12.95 ppdeach, $19.95 ppd for two, or all three collections for $26.95 ppd [Check or money order only.) Available on tape or 5 1/4." DSDD LARKEN

or OLIGER disk - please specify, fs)

| : Send order to | John MoMichael, 1710 Patmer Dr. Laramie, WY 82070

TS-2068 Super Calc

The two Menus kinda tells the story for this new software. It is a long Key in project (about 27K), so you might want to order the disk from Update Magazine and save time. But if you want to key it in you will learn more about the program as you are dunning it.

Most of us have used the classic View Calc by PSION. View Calc is a nice program but everytime I operate it

think about the things that I would like for it to do that it cannot. So, this program is designed to do those jobs for me. Actually what prompted me to get started was two recent occasions when family members were contemplating borrowing money. My Son was buying a car and my Daughter was about to buy some real estate. Both really needed some guidance as they were about to hitch themselves to a heavy load for a very long time.

So, for discussion we will go down the electives of the two menus, item by item.

1. Calculator Mode: This provides most of the functions of hand held calculators, but with more versatility of input. The Camputer allows input of math calculations, like Sqr Root, Exponent formula, + and - numbers, multiplication, numbers minus or plus other numbers, etc. These inputs exceed the versatility of most calculators. Another plus for calculating with the computer is its ability to display more information. One mode of calc is to use Constants to add, multiply, divide, or subtract. The screen displays two windows showing the math "with constant" and "without constant"

2. Loan Cost Spreadsheet: When this function is elected the printer prints out a spreadsheet of "Cost Per Thousand" of a loan. The table has a range of from 5% through 20%, and from 2 years through 35 years. The table can be used (away from the computer) for estimating the parameters of almost any loan that one is contemplating.

Be, Amortization Spread Sheet: Enter the total price, Down Payment, Interest Rate, and Time. If the Loan has "Points" then the effect of Points

is computed. The print out of the spreadsheet is "by payment number" through to the end, giving Interest by month and the reduced principal. An Ending Sunmary includes Total Interest, Total Cost, Cost per $1000, and an analysis of the effect of Points if any.

4. Loan Payment Inquiry: A quick Screen displays the status of any Loan at any Payment number. The display gives: Balance at that payment number, Total paid to Interest, and Total paid to principal.

5. Commercial Loan Analysis: This feature analyzes a proposed buy of property or a business and provides profit or loss projections. It also provides a comparison between the proposed purchase and the savings of the debt service at 6% interest. The net profit-loss is compared to savings over the time of the proposed loan term and by year. The summary also provides Capitol Gains by year and by loan duration. It is a complete guide for analyzing comercial investments.

6. Systematic Savings Spreadsheet : Prints out sinking fund accumulation (something thay Yuppies need to think about ) .

7. Quick Saving Calc: Same as <6> but gives screen info for input time.

8. Fixed Investment Speadsheet: This is for money mart and other fixed investment when guaranteed interest is known.

9. Cale with Secondary Menu, explaining.

Interest: See which is self

- Notes for Key In Guidance

The Listing is prepared for DUAL use of Oliger and LKDOS, or for individual use of either DOS.

The first group of program lines “builds the main menu". After the menu is built, it is SAVED as a_ screen to disk. After keying in lines 8000 through 8024 you should RUN the program and check out the appearance of the Menu. If O.K. then remove the REM of either line #8022 or 8024 (for LKDOS or Oliger DOS). Then RUN the program again, and this time type CONTINUE ENTER to SAVE the Menu Screen. Once that is done the lines 8000 through 8026 should be DELETED.

Once the Menu is SAVED, the program actually begins at line #9038. The earlier DEF FN () lines are ignored except when FN() is used in a program line.

PRINTER / INTERFACE INITIALIZATION

When the program first runs, line #9038 operates to exercise the SET PRINTER routine. This routine is Lines 9342 through 9356 and bears sane explaining.

First, lets look at line #9350. This is a “Check Printer Status" routine. You may need to change the figure "237" for your TS-2068. Try this: With the Printer ON, But OFF LINE, and the Camputer initialized for your DOS, type: PRINT IN 127 ENTER. If you get anything BUT 237, then EDIT line #9350 and insert that number instead of 237. You can do this even before you key in the listing and make a pen and ink change in the listing.

Next, CHECKING your PRINTER COMMANDS: Line #9348 has a "Style Selection" menu to set a print style. The variable "ps=" is set to three possible styles of print: ps=l=pica, ps=2=elite, ps=3=micron. It is likely that you will need to change the <3> selection from micron to CONDENSED in line 9348.

Then in line #9348, the first groups of commands are to "SET LETTER QUALITY", which for my printer is <OuT 127,27: OUT 127,120: OUT 127,1>. Check your own printer manual and substitute the proper command codes to SET LETTER QUALITY.

Then in Line #9349, the maximum line length variable "Ix" is set "for the print style elected". If you have changed from micron to CONDENSED for the small print style, erase "120" and substitute "136",

Then in line #9338 we Command the printer to SET THE STYLE of Print as elected: ps=1=PICA, ps=2=ELITE, ps=3=micron or Condensed. We begin the SET COMMANDS with <OUT 127 Commands>. You should compare your Printer Manual Commands (for each of the 3 styles) to those used in the program line. Substitute the correct commands: I use

for Pica: <OUT 127,27: OUT 127,80>. For ELITE: <OUT 127,27: OUT 127,77>. For Micron: <OUT 127,27: OUT 127,103>. Edit and Substitute your own correct command numbers for setting these styles of print. ‘

Then the last three commands of Line #9349 are <OUT 127,27:0UT 127,120: OUT 127,1>, to set LETTER QUALITY. Check your own printer's commands to SET LETTER Quality and substitute.

The Printer and Interface section, line numbers #9342-9356, can be extracted and used for your other programs to "Initialize the Interface and Provide a Menu for changing Print Styles". It works for either Oliger Dos and LKDOS, or both.

OLIGER DOS camands, using the slash bar "/" after load or save cammands will not ENTER if the Oliger DOS is not active. To solve this, key in the program line and then back up to the line number and insert REM. Then the line will ENTER.

Other than explained above, the program has no tricks and is easy to key'in and operate. '

The Amortization Spreadsheet takes about one minute for the program to

build the SS. The calculation ' of Amortization is a "“calculus' of variations of curves" math problem

having insufficient finite information to compute the values. The calculation begins with a "Guess at the mortgage payment" and proceeds to rua "trial spreadsheet". The first spreadsheet is always WRONG, and the "Guess" is up-dated until the actual payment is as correct as is possible. At that time the program jumps to the Print Out routine. It should be interesting for you math connoisseurs to check out my (amateur) method of solving this problem. Kids today think that Mathematics is where General Lee Surrendered, and calculus is what makes them have to go to the dentist. It would behoove us all to stock up on Math Programs, as the Mathematician is now an endangered specie. Enjoy! -BJ_

TS-2068 Super Calc For Oliger and LKDOS

Donated to Public Domain By: Bill Jones

The Main Menu

TS-2068 SUPER CALC

[1] Calculator Mode {2] Loan Cost Spread Sheet {3] Amortization Sp Sheet [4] Loan Pmt Inquiry

{5] Commer Loan Analysis

[6] Systematic Saving SSHT (7] Quick Saving Calc [8] Fixed Investment SSHT

[9] Cale With Interest [0] Operate View Calc (:] Operate Hybiscus

Touch Selection

‘The Secondary Menu

<1l> Monthly Interest on X Amount <2> Annual Interest on X

<3> Cumulative Annual Int on X <4> Cumulative Monthly Int on X <5> Depreciate at X Int, Y time

<6> Mark DOWN by X %

<7> Mark UP by X %

q to Quit

The LLISTING 8000 BORDER VAL "1": PAPER VAL "1": INK VAL "7": CLS 8002 PRINT INK VAL "2" “AT VAL "21" VAL "0"; " INK

VAL "5": FOR n=VAL "1" TO VAL "20": PR

INT AT n,VAL “O";" “SAT n,VAL "31s": NEXT n 8004 INK VAL "5": PRINT AT VAL "1", VAL nye "ap VAL "20",VAL "L'";""

" 8006 INK VAL "2": FOR n=VAL "2" TO VAL "19": PRINT AT n,VAL "1";" ";AT n,VAL "

30";" ": NEXT n

8008 INK VAL "2": PRINT AT VAL "0",VAL

nove SAT VAL (VAL "31's" "SAT VAL "21" VAL ' 1 VAL "21",VAL "31':" "

8010 INK VAL " PRINT AT VAL "1", VAL "Uap VAL "1", VAL "30's" "SAT VAL "20" VAL eatin "sap VAL "20", VAL "303"

": INK VI 8012 PRINT AT VAL "2", VAL "3"; INVERSE VAL "1"; INK VAL ""

"SAT VAL +VAL 7 INK VAL nsts' INK VAL "7"7AT VAL "3",VAL "4" : TS-2068 SUPER CALC "; INVERSE VAL "ORT VAL "3", VA ; ;AT VAL "3",VAL “ SAT VAL "2", VAL [2";"" "CAT VAL"

;""; INK VAL

2" VAL "29";" “: AT VAL "4" VAL "2"; INK VAL "5"; " 8014 PRINT AT VAL "6",VAL "3"; INVERSE VAL "1"; "{1] Calculator Mode ee NVERSE VAL "0"

8016 PRINT AT VAL "7",VAL "3";"[2] Loan Cost Spread Sheet"; INVERSE VAL "1";AT . "[3] Amortization Sp S heet "; INVERSE VAL "O";AT VAL "9",VAL

"3":"[4] Loan Pmt Inquiry"; INVERSE VAL "LAT VAL "11",VAL "3";"[5] Commer Lo an Analysis ";AT VAL "12",VAL "3"; INV ERSE VAL "0";"[6] Systematic Saving SSH T"; INVERSE VAL "O";AT VAL "13",VAL "3" ; INVERSE VAL "L";"[7] Quick Saving Cal - "

8018 PRINT AT VAL "14",VAL "3"; INVERSE VAL "O";"[8] Fixed Investment SSHT ";

INVERSE VAL "1";AT VAL "16",VAL "3"; "{9 ] Calc With Interest "; INVERSE VAL "O";AT VAL "17", VAL "3";"{0] Operate Vi ew Calc "> INVERSE VAL "L";AT VAL " 18", VAL "3";"[:] Operate Hybiscus

"; INVERSE VAL "O";AT VAL "20",VAL "6"; PAPER VAL "5"; INK VAL ‘ “; INK VA L "O";" Touch Selection "; INK VAL "2" } INVERSE VAL "1";" "; INVERSE VAL "0"; PAPER VAL "1": INK VAL "7 "

8020 INK VAL "7": STOP

8022 REM (LKDOS) RANDOMIZE USR VAL "100 ": SAVE "cal.C2"SCREENS : STOP

8024 SAVE /"cal.C2"SCREENS : STOP

8026 REM ** After constructing the Menu

; remove REM for DOS you have and SA

VE. ** DELETE lines thru Li: a

* Program ins with Line # 9038

9016 DEF FN h()=c*i

9018 DEF FN 1()=b5+b5*xb/100

9020 DEF FN m()=b5-b5*xb/100

9022 DEF FN n()=b5+xa

9024 DEF FN o()=b5-xa

9026 DEF FN v()=((xpmt-p2)/t2/-a2 AND x

pmt<p2 AND int>.149)+((p2-xpmt)/t2/10 A

ND xpmt>p2 AND int>.149)+((xpmt-p2)/t2/

al AND xpmt<p2 AND int<.15)+((p2-xpmt)/

t2/4 AND xpmt>p2 AND int<.15)

9028 DEF FN a()=tad-LEN STRS INT x

9030 DEF FN i()=INT (100*(p*i/12+.005))

/100

9032 DEF FN p()=pmt-FN i()

9034 DEF FN r()=p-(pmt-i2)

9036 DEF FN x()=prin-(prin-p)

9038 GO SUB VAL "9342"

9040 REM LKDOS BORDER VAL "1": PAPER VA

L "1": INK VAL "7": CLS : RANDOMIZE USR

VAL "100": LOAD "cal .C2"SCREENS

9041 BORDER VAL "1": PAPER VAL "1": INK

VAL "7": CLS : LET tad=24: LOAD /"cal.

C2" SCREENS

9042 PAUSE VAL "0": LET z=CODE INKEYS-V AL "48": GO TO (2<VAL "0" OR z>VAL "10"

AVAL "9042"+(z=VAL "1"')*VAL '"9360"+( z=

VAL "2")*vAL "9254"+(z=VAL ''3")*VAL "90

48"+(z=VAL "4")*VAL "9192"+(z=VAL '"5")*

VAL '9130"+(z=VAL "6")*VAL "9108"+(z=VA

L "7")*VAL '9172"+(2=VAL "8")*VAL 9142

"+(Z=VAL *VAL ''9540"+(z=VAL "0")*VA

L "9238"+(z=VAL ''10")*VAL "9240"

9044 REM Estimated Amortization

9048 CLS : GO SUB VAL "9348": CLS : PRI

NT AT VAL "6",VAL "1";"Loan Amortizatio

n Spreadsheet": INPUT "Enter Total Purc

hase Price $";tpp: INPUT "Enter Down Pa

yment $";dp: LET prinx=tpp-dp: INPUT "E

nter Points, 0 if none";pts: LET point=

(pts/VAL "100")*prinx: LET prin=prinx+p

oint: LET p2=prin

9050 INPUT "Input Interest rate % "si:

LET int=i/VAL "100": LET di=int*prin/VA

L "12": INPUT "Time in years?";time: LE

T t2=time*VAL "12": IF pts>VAL "0" THEN

GO SUB VAL "9236"

: PRINT #VAL "0"; INVERSE VAL

Calculating Spreadsheet . . ."

9054 LET al=-VAL "4.5": LET al=al+(i-VA

L "5")*VAL ".12": IF time>VAL "30" THEN

LET al=-VAL "9": IF time>VAL "30" THEN

LET al=-VAL "11"

9056 LET a2=(-VAL "20" AND time<VAL ''20

v1")+(-VAL "25" AND time>VAL "20" AND t

ime<VAL ''30.1')+(-VAL "35" AND time>VAL

"30" AND time<VAL "35.1")+(-VAL "70" A

“ND time>VAL "35" AND time<VAL ‘

IF i>VAL ".15" AND time>VAL " .1s" THEN

LET a2=a2*-VAL "1"+time-VAL "15": IF ti me>VAL "28" AND int>VAL '".15" THEN LET

a2=a2*VAL "2": IF time>VAL "33" AND int >VAL ".17" THEN LET a2=a2*VAL "2"

9058 LET p2=prin: LET di=int/VAL "12":

LET xpmt=INT (VAL "1000"*(prin*int/VAL

"12"4VAL "1"/time))/VAL "1000"

9060 PRINT AT VAL "10",VAL "0";"Calcula ting Amortization for:"''"S";prin;" at

";i;"% for ";time;" Years."''"Loan Poin ts are ";pts''"Wait for calculations.

9062 LET a=VAL "O": LET b-VAL "0": LET c=VAL "0"

9064 FOR y=1 TO t2-1: GO SUB 9088

9066 GO SUB 9086

9068 NEXT y

9070 LET x5=xpmt: LET p2=INT (100*p2+.5 )/100: LET x6=ABS (p2-xpmt): IF x6<.01* (t2+t2/1.6) THEN GO TO 9082

9072 LET x7=ABS (p2-xpmt): IF time>24 A

ND time<30 AND x7<t2/18 OR time>29.9 AN

D time<35 AND x7<t2/4 OR time>34.9 AND x7<t2/3 THEN GO TO 9082

9074 LET x8=ABS (p2-xpmt): IF time>30 A

ND x8<t2/10 OR time>34 AND x8<t2/1.5 OR time>37 AND x8<t2 THEN GO TO 9082

9076 LET xpmt=INT (100*(xpmt+FN v())+.5 )/100: IF xpmt=x5 AND ABS (p2-xpmt )<t2/ 20 THEN GO TO 9082

9078 LET a=0: LET b=0: LET c=0: LET p2=

prin: IF x5=xpmt THEN LET xpmt=(xpmt+.0 1 AND xpmt<p2)+(xpmt-.01 AND xpmt>p2) 9080 GO TO 9062

9082 LET p2=prin: LET a=0: LET b=0: LET c=0: LPRINT TAB 8; iment szation Schedu le for $";prinx;" at ";i;"% Interest fo r ";time;" Years"! "TAB. VAL "27" ;"Mortga

ge Points= ";pts''TAB VAL '20";"Regular Monthly Payment= $";xpmt'': IF pts>VAL "O" THEN PRINT TAB VAL "8"';"Note: ";pt s;" Mortgage Points makes the Beginning Mortgage Princpal=$";pri 9084 LPRINT TAB VAL "8";"Pmt #";TAB VAL

Details"'': FOR y=VAL "1" TO t2-

GO SUB VAL ''9088": LET b=bta:

GO SUB VAL "9094": NEXT y: GO TO VAL "9 100"

9086 LET b=bta: LET pmt=xpmt-a: LET p2=

p2-pmt: LET a=0: LET c=ctpmt: RETURN 9088 LET a=0: LET a=atint*p2/12: GO SUB 9090: RETURN

9090 IF xpmt<a THEN LET xpmt=a*l.008: L ET p2=prin: LET a=0: LET b=0: LET c=0:

GO TO 9062

9092 RETURN t

9094 LET p2=p2ta: LET pmt=xpmt-a: LET p

2=p2-xpmt: LPRINT TAB VAL “8"";"#":y; TAB VAL "13";"Int=";TAB VAL "28";"S"; INT ( VAL "1O0"*at+VAL ".5")/VAL "100";TAB VAL "40"; "Tot Int=";TAB VAL "52" VAL "LOO"*b+VAL ".5')/VAL "100 =VAL "0" 9096 LET c=ctpmt: LPRINT TAB VAL "13";" Pmt to Prin=";TAB VAL "28";"S";INT (VAL "1O0"*pmt+VAL '.5")/VAL "100";TAB VAL "40"; "Prin Bal=";TAB VAL "52";"S";INT ( VAL "100"*p2+VAL ".5")/VAL, "100" 9098 RETURN 9100 GO SUB VAL "9088": LET pmt=p2: LET p2=p2+a: LET b=bta: LET c=ct+pmt: LPRIN T TAB VAL "8";"Final Payment=";TAB VAL "2g" :"S"; INT (VAL "100"*p2+VAL ".5")/VA TAB VAL "8";"#";y;TAB VAL "13" ‘AB VAL "28";"S"; INT (VAL "100" 5")/VAL "100"; TAB VAL "40"; "To t Int=";TAB VAL "52! ";INT (VAL "100"

INT (VAL "1LO0"*pmt+VAL "'.5" )/VAL "100";TAB VAL "40";"Prin Bal=";TA B VAL "54" ;"ont?

9101 LPRINT TAB VAL ''30";"Summary"™' "TAB VAL "5";"Principle= Siprin;" // Time= “stime;" Yrs // Interest=";i;"% // Regu lar Pmt=$"sINT (xpmt*VAL "1OO"4VAL ".5" )/VAL "1LOO"'TAB VAL "6";"Final Pmt= $"; INT (VAL "100"*p2+VAL ".5")/VAL "'100";" // Tot Int= $";INT (VAL "100"*b)/VAL " 100";" // Tot Loan Cost= $";INT (VAL " 100"*(btc))/VAL “100""TAB VAL "6";"Tota 1 Contract Cost (Pmts + Down Pmt= $";IN T (VAL "100"*(btctdp))/VAL "100"'"

9102 LPRINT TAB VAL "6";"The Loan Cast Per $1000 is $";INT (VAL "100"*INT (VAL “100"*(btc))/VAL "100"/(prinx/VAL "100 0")/t2)/VAL "100"'': IF pts>VAL "0" THE N LPRINT TAB VAL "6";"NOTE: The ";pts;" Mortgage Points makes the actual APR I nterest approx: ";pts/VAL "5"+i;"%"'TAB VAL "6";"and increases the Total Cost of the Mortgage by approx $";pts*VAL " 1"*(prinx/VAL "1000")*t2''"'TAB VAL "6";" The effect of Points increases as Mortg age Time Increases."

9104 OUT VAL "127", VAL "12": GO TO VAL "9040"

9106 REM ** Savings

9108 CLS : LET gg=VAL "0": PRINT AT VAL "10",VAL "O"';"Computing SAVINGS at var ious Rates and TIME": INPUT "Enter B eginning Savings to be added to (0 if none) $":beg: INPUT "Enter Amount to S ave Monthly $";c: INPUT "Enter Inter est Rate “;i: INPUT “Enter time in Yrs or .5 fraction";time: LET int=i/VAL "12 00": LET v=beg

9110 LET y=VAL "1": LET b=VAL "0": LET a=VAL "0": GO SUB VAL "9348" 9112 PRINT "Calculating Savings of $";c ‘Per Month / At ":i;"% Int For ";time; "yrs": LPRINT TAB VAL "6";"Monthly Sum mary for Saving $";c;" Per Month At “ji 7"% For ";time;" Years'''' 9114 FOR n=VAL "1" TO time 9116 LPRINT TAB VAL "6";"Year #";n'" 9118 FOR y=y TO y+VAL "11" 9120 LET a=v*int: LET b=bta: LET v=vtc+ a: LET v=INT (v*VAL "1OO"+VAL ''.5")/VAL "100": LPRINT TAB VAL "6";"Month #";y; TAB VAL "16";"Cur Int= INT (VAL "100" }TAB VAL "34"; "To OO"+VAL ".5")/VAL "100";":";TAB VAL "53";" Tot Save= $"; vii 9122 NEXT y: NEXT n 9124 IF gg=VAL "1" THEN LET gg=VAL "0": RETURN 9126 OUT VAL "127",VAL "12": GO TO VAL "9040" 9128 REM Investments 9130 CLS : PRINT INVERSE VAL "1"; "RULES FOR COMMERCIAL PROPERTY"; INVERSE VAL “o";''"1, Be aware that the PRICE AND TERMS ARE NEGOTIABLE."''"2. The Appr aised value should provide the sec urity needed for a 15 Year Loan of 95% of the TOTAL Selling Price. IF NOT, BEWARE!"'' 9132 PRINT "3. LOAN INTEREST should be not over 2% "Above PRIME RATE" ‘WITHOUT POINTS." ELSE, LOOK FO R ANOTHER DEAL." 9134 PRINT ''4. Most confuse the purpos e of a Comercial Property, which is "; INVERSE VAL "L";"10 PRODUCE PRO FITS"; INVERSE VAL "O";" - AND"'TAB VAL "3"; "NOT TO SPECULATE FOR RESALE." 9136 PRINT ''5. THE PRIME RULE is that the INCOME must PAY the DEBT SERVICE, -PLUS- COSTS -PLUS- A MON THLY PROFIT - "; INVERSE VAL A "; INVERSE VAL "'0"'TAB VAL ; INV ERSE VAL "1";"10 to 15 Year Mortgage Te rm."; INVERSE VAL "O"' TAB VAL "3";"IE NOT THEN NO DEAL!" 9138 PRINT '"Otherwise, you'll be bette x off with PURE SAVINGS, and you wont h ave to work at all!": PRINT #VAL "0";"E nter": PAUSE VAL "0": CLS : PRINT AT VA L "10",VAL "0'';"Do you Know the LOAN MO NTHLY PAYMENT and Interest factors?"''" If NOT, Lets Start by Using the Main Me nu to get an AmortizationSpreadsheet .""' ‘Then Return to this Section via Menu. ": INPUT "<1> Get S~SHT <2> Continue"; x

: IF x=VAL "1" THEN GO TO VAL ''9040" 9140 CLS : PRINT AT VAL "8",VAL "0";"Co mparative Savings of Monthly Payment A mounts." 9142 INPUT "Enter the MONTHLY PAYMENT o f£ theProposed Contract $";m: INPUT "Ent er Down Payment $";dp: INPUT "Enter Yea rs or .5 Year FractionsYrs: ";time: LET i=VAL "6": LET int=i/VAL "1200": LET a : LET b=VAL "0": LET v=VAL "0": LET AL "1": LET gg=VAL "1": PRINT # Camputing Comparative Savings 6%": GO SUB VAL "9176" 9144 CLS : PRINT AT VAL "2", VAL "0";"Th e Monthly Debt service, if it were SAVE D at 6% interest would be worth "; INVE RSE VAL "1";"$";v; INVERSE VAL "0";" in ";time;" Yrs."'': BEEP VAL ".2",VAL "1 8": INPUT "Enter the TIME that you beli eve that you will spend Daily on thi S project.";td: BEEP VAL ".2",VAL "20": INPUT "Enter an Hour Value of your tim e";th 9145 LET plc=VAL "52"*VAL "S"*th*td: LE T plet=INT (plc*time): LET vt=INT VAL " 100"*(v+pl ct +VAL ".5")/VAL "100": PRINT "If you spend ";td;" hours per day''"w orking on this project, and your tim e is worth $";th;" per hr,"'"then your labor cost, added to the potential sav ings is: "' FLASH VAL "1";"S";vt; FLASH VAL "oO" 9146 PRINT ''"'Please make a note this F igure."'"It can be used by you to decid e if your time and risk is worth more or less than the possible gain fran th e purchase of incomeproducing property. "

9148 PRINT #VAL "0";"ENTER": PAUSE VAL "Oo": CLS : PRINT AT VAL "8",VAL "0"';"CO ST V/S INCOME ANALYSIS": BEEP VAL ".2", VAL "20": INPUT "Enter Your Estimated H IRED LABORCOST PER WEEK (Include SSI an ad Workman Comp)";low: LET lcx=VAL "52" *low: 9150 INPUT "Enter Annual Insurance Cost “;inx: INPUT "Enter Annual Propert y Tax ";tax: INPUT "Enter Local Busines s tax";btx 9152 INPUT "Enter Estimated Weekly Cost of consumables";conw: LET conx=conw*V AL "52": INPUT "Enter Estimated Monthly Cost of Replacements (Furnature, etc) ";furm: LET furx=furm*VAL "12": INPUT "Input est MONTHLY cost of Cont- ract Service (cleaning, laundry,yard work, e tc)";outm: LET outx=outm*VAL "12": INPU T "Input Monthly Utilities total (Pho ne, gas, elect, garbage, etc)";utlm: LE T utlx=utlm*VAL "12"

9154 INPUT "Enter Monthly Debt Service $";xpmt: LET pmtx=xpmt*VAL "12": I NPUT "Input Estimated Monthly Gross i ncome from all Sources (Rents, leases, etc) (deduct expected vacancies or lo sses)";inem: LET incx=incm*VAL "12": IN PUT "Enter a year total of ALL other pr ojected expenses not covered ";otx 9156 LET expx=plctlcxtinxttax+btx+conx+ furxtoutxtut] x+pmtxtotx: LET expt=expx* time: LET incxt=incx*time: LET nincx=IN T VAL "100"*(incx*VAL ".61"+VAL ".5")/V AL "100": LET nincxt=time*nincx 9158 PRINT "Your Annual Cost is ";expx' ‘"Your Annual Gross income is “sine x''"Projected Net income is ";("POSITIV E" AND incx>expx)+("Negative" AND incx <expx);"" ";"S";ABS (incx-expx);" Per Ye

9160 LET diff=ABS (expx-incx)/VAL "12": IF expx>incx THEN PRINT ''"You will ne

ed to spend "; INVERSE VAL "1";"$";INT

(VAL "100'*diff+VAL ".5")/VAL "100"; IN

VERSE VAL "'0"'"EACH MONTH to make up th

e diff- erence."

9162 IF expx>incx THEN PRINT '"'The only justifiable purpose forcontinuing this plan would be a need for TAX LOSS of $

") INT (VAL ''100"*(expx-incx)+VAL '.5!")

/VAL "100"''per Year for ";time;" Years . "EVAL "O"; "Enter": PAUSE VAL "0": GO ‘TO VAL "9040"

9164 CLS : LET prin=printdp: LET eqd=IN

T (prin-VAL ".0267"*prin): PRINT '' INV

ERSE VAL "L";time;" Yr SUMMARY"; INVERS

E VAL "0"''"Depreciated Equity= $";eqd;

9166 LET earnx=INT (incx-expx)*VAL ".71 “: LET earnt=earnx*VAL "15": PRINT '"Ne t ";time;" Yr Earnings= $";earnt’ "Equi ty + Earning= $";INT (eqdtearnt)' Dis posable Earnings Per Year="'"$";earnx' time;" Yr Capitol Gain= $";INT eqd-dp'' 9168 LET tott=earnttegd-dp: LET camp=AB S INT (vt-tott): PRINT INVERSE VAL "1"; "Camparison Saving V/S Investing"; INVE RSE VAL "O"''"Equil ";time;" Yr Saving= $";INT v''"Plus your labor of $";plct' ‘Total Equil Save=";TAB VAL "18";"$";v t''"saving at 6% is $";comp;(" Less." A ND vt<tott)+(" More." AND vt>tott)!'"T his is "; INVERSE VAL "1";"$";INT (co mp/time); INVERSE VAL "'0";" Per Year'''' "Favoring ";("Saving." AND vt>tott)+("B uying." AND vt<tott)'' INVERSE VAL "1"! "IF Your Bus Factors remain True"; INVE RSE VAL "0" 9170 PRINT #VAL "0";"View Again? <1> Ye s <2> No": PAUSE VAL "0": CLS : LET z=C ODE INKEYS-VAL "48": GO TO (z<2)*VAL "9

164"+(z2>1)*VAL "9040" 9172 CLS : PRINT AT VAL ystematic Savings Plan": LET gg=VAL : LET a=VAL "O": LET v=VAL "O": LET mV AL "0"

9174 INPUT "Starting Savings to be Adde

d To (0 if None) $";beg: LET v=beg: INP UT "Input Amount to Save Monthly "om : INPUT "Input Interest Rate";i: LET in

t=i/VAL "1200": ars ";time 9176 FOR n=VAL "1" TO time*VAL "12" 9178 LET a=v*int: LET b=bta: LET v=vtmt a: LET v=INT (v*VAL "100"+VAL ".5'')/VAL “y00"

9180 NEXT n

9182 IF gg=VAL "1" THEN LET gg=VAL "0": RETURN

9184 CLS : PRINT AT VAL "1O",VAL "0";"S aving $";m;" For ";time;" Yrs at ";i;"% "provides a saving of $";v: PRINT #V AL "0";"Enter": PAUSE Vi : CLS : GO TO VAL "9040"

9186 STOP

9188 CLS : PRINT AT VAL "4",VAL "16";"C alculator Mode"''"<1> Single Add, Sub,

Mult, Div."

9190 STOP

9192 BORDER VAL "0": PAPER VAL "0": INK VAL "7": CLS : PRINT AT VAL "6",VAL "0 ": "Mortgage Inquiry By Payment Nbr" 9194 INPUT “Beginning Loan Principle $" ;prin: INPUT "Input Points (0 if none)" jpts: LET p=print((prin*pts)/VAL '"100") : LET p2=p

9196 INPUT "Input Rate of Interest %'';i 1: LET i=il/VAL "100"

9198 INPUT "Input Monthly Payment $";pm t

INPUT “Input Time in Ye

9200 INPUT "Key in the Payment # to see the accumulated payments";m

9202 LET px=VAL “O": LET int=VAL "0": L

ET tab=-VAL "26"

9204 FOR n=VAL "1" TO m

9206 LET i2=FN i()

9208 LET int=int+i2

9210 LET p=FN r() -

9212 LET px=pxtFN p()

9214 NEXT n

9216 PRINT ‘MORTGAGE STATUS AFTER PMT

#"; INVERSE VAL "1";M; INVERSE VAL "0" 9218 PRINT '"Mortgage Points are ";pts: IF pts>VAL "0" THEN PRINT '"Beginning

Prin With Points is"'"S";p2

$220 LET x=prin: PRINT '"Beginning Prin

="(TAB FN a();"$";prin'' 9222 LET x=FN x(): PRINT "Principle Bal ="VTAB FN a();"S'GFN x()'" 9224 LET x=int: PRINT "Interest Paid

io

=";TAR FN a();"$";int''

9226 LET x=px: PRINT "Tot Paid to Prin =";TAB FN a();"S";INT (VAL "100"*(prin- p+VAL '.005"))/VAL "100"

9228 PRINT INVERSE VAL "1";"ENTER"; INV

ERSE VAL "0": PAUSE VAL : GO TO VAL "9040"

9234 PRINT #VAL "0";"Enter": PAUSE VAL "oO": GO TO VAL "9040"

9236 BEEP VAL ".3",VAL "20": PRINT '' I

NVERSE VAL “1";"Points Actually RAISES the APR Interest Rate to Approx: "sit pts/VAL "4";"%"'"By Increasing the Prin ciple."; INVERSE VAL "0"''"You should n egotiate for a"; INVERSE VAL "1";"ZERO POINTS"; INVERSE VAL "0";" Contract "; INVERSE VAL "1";"Lower than ";it+pts/VA

L "4" ;"") INVERSE VAL "0"'"And Compare vente: sy wre New Principal (Points Added) is: ; INVERSE VAL " prin; I

NVERSE VAL os PRINT #VAL "0"; "ENTER": PAUSE VAL "0"': RETURN

9238 STOP : RANDOMIZE USR VAL "100": LO AD "V-CALC.B6"

9239 STOP : LOAD /"V-CALC.B6"

9240 STOP : REM RANDOMIZE USR VAL "100"

: LOAD "Daisy.B6" GO TO fm

9241 STOP : REM LOAD /"Daisy.B6" GO TO

fm

9242 CLS : PRINT AT VAL "8",VAL "O";"In

vestment Gain at APR Interest"'"Campoun

ded Monthly"''

9244 INPUT "Enter Amount to Invest $";p

rin: LET v=prin: INPUT "Enter Annual In

terest Rate %";i: LET int=i/VAL "100":

INPUT "Time of Plan, (yrs or Half yr)

Yrs ";time: LET t2=time *VAL "12": LPRI

NT TAB VAL "8";"Investment of $";prin;" At ";i;"% For ";time;" Years"''

9246 FOR n=VAL "1" TO t2 2

9248 LET a=INT (VAL “100"*v*int/VAL "12

")/VAL "100": LET v=v+a: LPRINT TAB VAL "g"; "Month #";n;" Int= $";a;TAB VAL "3

5";"Appreciated Prin=";v''

9250 NEXT n

9252 OUT VAL "127", VAL "12":

9940"

9254 REM ** Mortgage Cost per M

9256 LET ps=VAL "3": GO SUB VAL "9348": LET x=VAL "27": LET xl=VAL "9": LPRINT TAB VAL "38'';"MORTGAGE LOAN COST BY $1

000 and TIME DURATON''''; TAB VAL "8"; "T

able of Loan Cost Per $1000.00, by Rate of Interest and Number of Mortgage Yea

rs." 'TAB VAL "8";"For Monthly Payment: Multiply Cost by Number of 1000's."''

TAB VAL "8";"For Total Mortgage Cost:

Multiply Cost times Nbr of 1000's times nbr of monthly pmts .""'

GO TO VAL

9258 LPRINT TAB VAL "8";"For Total Inte rest cost: Subtract Beginning Principle fram Total Mortgage Cost.'"''': LPRINT

TAB VAL "8";"Percent";TAB VAL '45";"Yea rs of Pay Off / Cost Per $1000''': LPRI NT TAB x+VAL "2" Yr"; TAB xt+xl+VAL "2 183" TRB XtVAL "2"+x14VAL "2"; "4"; TAB

SHVAL "2"4xL*VAL "3's "5" STAB xtVAL "2"+ xl*VAL "4";"10";TAB x+VAL "2"+x1*VAL "5 "OU15"; TAB X+VAL “2"+xl*VAL "6";"20"; TA B xtVAL "2"+x1*VAL "7";"25";TAB x+VAL " 2"+xl*VAL "8";"'30";TAB x+VAL ''2"+x1*VAL mgnengsne

9260 LET a=VAL "5": LET b=VAL '"'.5": LET kex

9262 RESTORE VAL "9280": FOR n=VAL "1"

TO VAL "31"

9264 LPRINT TAB VAL "8";a;TAB VAL "12"; "$";"]- S per M=";: LET a=atb

9266 FOR y=VAL "1" TO VAL "10" 9268 READ z

9270 LPRINT TAB k;z;: LET k=ktxl 9272 NEXT y: LPRINT : LET k=x

9274 NEXT n

9276 LPRINT ''TAB VAL "'8";"The table is for estimates. Use the Amortization e lective for a spreadsheet of a specific Loan.""'TAB VAL "8";"Interpolations can be made between data points for estima tions." "TAB VAL "8";"WORKING EXAMPLE: $10,000 Loan at 10% for 20 Years:'' 9277 LPRINT TAB VAL "8";"Use table line for 10%. Use Colum for 20 Yrs. Cost is 9.65 per Thousand."'TAB VAL "8"';"Mu ltiply 9.65 times 10 (thousands)= $96.5 0 Monthly Payment.'''TAB VAL "8";"Multip ly $96.50 times 240 payments= $23160.00 Total Cost" TAB VAL "8";"Subtract $231 60.00 - $10000= $13160.00 Interest cost

9278 OUT VAL "127",VAL "12": GO TO VAL "9940"

9280 DATA VAL '43.872",VAL "29.971", VAL "23.03",VAL "18.36",VAL "10.71",VAL "7 -65",VAL "6.45", VAL "5.79", VAL "5.38",V AL "5.10"

9282 DATA VAL '44.096",VAL '30.196",VAL "23.257",VAL "18.65",VAL "10.51",VAL " 7.96",VAL "6.77", VAL "6.12",VAL "5.72", VAL "5.45"

9284 DATA VAL '44.32",VAL '30.421",VAL "23,484", VAL '18.94",VAL "10.81",VAL "8 27" VAL "7.09",VAL "6.45",VAL "6.06",V AL "5.80"

9286 DATA VAL ''44.544", VAL "30.646",VAL "23.711", VAL "19.23",VAL "11.11",VAL " 8.58",VAL "7.41",VAL "6.78",VAL "6.40", VAL "6.15"

i

9288 DATA VAL "44.768",VAL /VAL "23.938", VAL "19.52",VAL "11.41", VAL " 8.89",VAL "7.73",VAL '"7.11",VAL "6.74", VAL "6.50" 9290 DATA VAL '44.992",VAL "31.096", VAL "24.165",VAL "19.81",VAL "11.71",VAL " 9.20", VAL "8.05",VAL 7.44", VAL "7.08", VAL "6.85" 9292 DATA VAL '45.216",VAL "31.321!,VAL '24,392",VAL "20.10", VAL "12.01",VAL " 9.51",VAL "8.37",VAL "7.77", VAL "7.42", VAL "7.20" 9294 DATA VAL "45.44", VAL "31.546", VAL "24.619",VAL "20.39",VAL "12.31",VAL "9 -82",VAL "8.69",VAL "8.10", VAL "7.76",V AL "7.55" 9296 DATA VAL "24.846", VAL 10.13", VAL "9.0. “VAL "7.90" 9298 DATA VAL "45,898",VAL "31.996", VAL "25.073" ,VAL "20.97", VAL "12.91",VAL " 10.44", VAL "9.33",VAL "8.76",VAL "8.44" /VAL "8.25" 9300 DATA VAL "25.30", VAL 0.75",VAL "9.65" ,VAL VAL "8.60" 9302 DATA VAL '46.336",VAL "32.446", VAL "25.529",VAL "21.55",VAL "13.51",VAL " 11.05", VAL "9.97",VAL "9.42",VAL "9.12" /VAL "8.95" 9304 DATA VAL "46.56",VAL "32.671",VAL "25.754", VAL "21.84",VAL "13.81",VAL "1 1.37",VAL "10.29", VAL "9.75",VAL "9.46" VAL "9.30" 9306 DATA VAL '46.784",VAL "32.896", VAL "25.981", VAL "22.13",VAL "14.11",VAL " 11.68",VAL "10.61",VAL "10.08", VAL "9.8 O",VAL "9.65" 9308 DATA VAL ''47.008",VAL "33.121", VAL "26.208", VAL "22.42", VAL "14.41", VAL " 11.99", VAL "10.93",VAL "10.41",VAL "10. 14",VAL "10.00" 9310 DATA VAL ''47.232",VAL "33.346",VAL "26.435",VAL "22.91",VAL "14.71",VAL " 12.30",VAL "11.25",VAL "10.74",VAL "10. 48", VAL "10.35" 9312 DATA VAL ''47.456",VAL "33.571", VAL "26.662",VAL ''23.00",VAL "15.01",VAL " 12.61",VAL "11.57",VAL "11.07",VAL "10. 82", VAL "10.70" 9314 DATA VAL "47.68", VAL "33.796", VAL "26.889",VAL "23.29",VAL "15.31",VAL "1 2.92", VAL "11.89",VAL "11.40",VAL "11.1 6",VAL "11.05" 9316 DATA VAL "47.904",VAL "34.021", VAL "27.116",VAL "23.58", VAL "15.61",VAL "

’

"45.664", VAL "31.771", VAL "20.68", VAL "12.61",VAL " 1",VAL "8.43",VAL "8.10"

"46.111"VAL "32.221", VAL "21.26",VAL "13.21",VAL "1 "9,09", VAL "8.78",

13.23",VAL "12.21", VAL "11.73",VAL "11. 50", VAL "11,40" 9318 DATA VAL "48.128",VAL "34.346",VAL "27.343", VAL "23.87",VAL "15.91",VAL " 13.54",VAL "12.53", VAL "12.06",VAL "ll. 84",VAL "11.75" 9320 DATA VAL "48.352", VAL '34.771",VAL "27.57" VAL "24.16",VAL "16.21",VAL "1 3.85", VAL "12.85", VAL "12.39",VAL "12.1 8", VAL "12.10" 9322 DATA VAL "48.576",VAL "34.696",VAL "27.797" VAL "24.45",VAL "16.51",VAL " 14.15", VAL "13.17",VAL "12.72",VAL "12. 52", VAL "12.45" 9324 DATA VAL "48.8", VAL "34.921",VAL " 28.024",VAL "24.74",VAL "16.81",VAL "14 .46" VAL "13.49", VAL "13.05", VAL "12.86 "VAL "12.90" 9326 DATA VAL "49.024", VAL "35.146",VAL "28.244", VAL "25.03",VAL "17.11",VAL " 14.78", VAL "13.81",VAL "13.38",VAL "13. 20",VAL "13.15" 9328 DATA VAL "49.248",VAL "35.371",VAL "28.471" ,VAL "25.32", VAL "17.41",VAL " 15,.09",VAL "14.13",VAL "13.71",VAL "13. 54",VAL "13.50" 9330 DATA VAL "49.472",VAL "35.576", VAL "28.698", VAL "25.61",VAL "17.71",VAL " 15.40", VAL "14.45",VAL "14.04",VAL "13. 88", VAL "13.85" 9332 DATA VAL "49.696",VAL "35.871", VAL "28.925",VAL "25.90",VAL "18.01",VAL " 15.71", VAL "14.77",VAL "14.37",VAL "14. 22",VAL "14.20" 9334 DATA VAL "49.92",VAL "36.046", VAL "29.152", VAL "26.19",VAL "18.31",VAL “1 6.02",VAL "15.09",VAL "14.70",VAL "14.5 6", VAL "14.55" 9336 DATA VAL "50.144",VAL "36.371", VAL "29.379",VAL "26.48", VAL "18.61",VAL " 16.33",VAL "15.41",VAL "15.03",VAL. "14. 90", VAL "14.90" 9338 DATA VAL "50.368",VAL "36.496",VAL "29.606", VAL "26.77",VAL "18.91",VAL " 16.64",VAL "15.73",VAL "15.36",VAL "15. 24",VAL "15.25" 9340 DATA VAL "'50.592",VAL "36.721",VAL "29.833",VAL "27.06",VAL "19.21",VAL " 16.95", VAL "16.05", VAL "15.69", VAL "15. 58", VAL "15.60" 9341 REM ** Intfc and Printer

Control 9342 BORDER NOT PI: PAPER NOT PI: INK V AL "7": CLS : LET pg=NOT NOT PI: LET nn

=NOT PI: PRINT AT VAL "7", VAL "4"; "Touc h:"' "TAB VAL '"4";"<1> For TS-2040 Print er'''TAB VAL ''4";"<2> For Dot Matrix’'' TAB VAL "4";"<3> For Daisy Wheel';AT VA

" NDOMIZE USR VAL "100": OPEN #VAL

te

L "18",VAL "7"; INVERSE Vi "1" "PRINTE R MUST BE ON"; INVERSE VAL "0": PAUSE V LET z=CODE INKEYS-VAL "48": LET pr=2-VAL "1": IF z<VAL "1" OR z>VAL "3 "THEN GO TO VAL "9342"

9343 INPUT "Type DOS?: 1. Oliger 2. LKD os";dos: CLS : PRINT AT 5,0;"If£ Both LK DOS and OLIGER DOS areResident:"''"l. Y ou Cannot use ANY NMI"'TAB 3;"Function. "199 For Oliger DOS, Switch OFF"'TAB

3;"the LKDOS Enable Switch."''"3. For

LKDOS Switch OFF the"'TAB 3;"Oliger Boa rd Enable Switch." ''4. DO NOT Enable B ut ONE DOS"'TAB 3;"Printer Code."': PRIN T #0;"ENTER": PAUSE 0: CLS : IF dos=1 T HEN GO TO 9354

9344 IF pr=VAL "0" THEN RANDOMIZE USR V AL "100": OPEN #VAL ''7","LP": RANDOMIZE USR VAL "100": POKE VAL "16092",VAL "0 ": GO TO VAL "9352"

9346 CLS : RANDOMIZE USR VAL "100": OPE N #VAL "3","lp": PRINT AT VAL "10",VAL

"3". "ELECP Type CPI:"" TAB VAL "3":"[1J Berco - Oliger'’'’'TAB VAL "3";"[2] Tasm an CPI'''TAB VAL "3";"[3] A & J CPI": P AUSE VAL "0": LET CODE INKEYS-VAL ''49 ": PRINT #VAL "0";"Printer Need Line Fe ed? <y> <n>": PAUSE NOT PI: LET wS=INKE YS: LET b=(VAL "10" AND wS="y" OR wS="¥ ")+(NOT PI AND wS<>"y" AND w$<>"'¥y"):

d": RANDOMIZE USR VAL "100": POKE VAL " 16096",a: RANDOMIZE USR VAL "100": POKE VAL '"16090",VAL "138": RANDOMIZE USR V AL "100": POKE VAL "16092",VAL "0": RAN DOMIZE USR VAL "100": POKE VAL "16094", NOT PI: LPRINT : RANDOMIZE USR VAL "100 ": POKE VAL "16092",b

9348 CLS : LET m=VAL "9350": OUT VAL “1 27", VAL "27": GO SUB m: OUT VAL "127",V AL "120": GO SUB m: OUT VAL "127",VAL " 1": PRINT AT VAL "LO", VAL ;"SET PRIN TER and Elect:"''TAB VAL "3";"[1] Pica

LO Cpi'''TAB VAL "3'';"[2] Elite 12 Cpi” ‘'TAB VAL "3";"[3] Micron 15 Cpi': PAUS E VAL "0": LET ps=CODE INKEYS-VAL "48" 9349 LET 1x=(VAL "80" AND ps=VAL "1")+( VAL "96" AND ps=VAL "2")+(VAL "120" AND ps=VAL "3"): LET qq=lx/VAL "2": OUT VA L "127",VAL "27": GO SUB m: OUT VAL "12 7", (VAL "80" AND ps=VAL "1")+(VAL "77"

AND ps=VAL "2")+(VAL "103" AND ps=VAL " 3"): GO SUB m: OUT VAL "127", VAL "27":

GO SUB m: OUT VAL "127",VAL "120": GOS UB m: OUT VAL "127",VAL "1": GO TO VAL

"9352"

9350 IF IN VAL "127"<>VAL "237" THEN GO TO VAL "9350"

9352 RETURN 9354 IF pr=0 THEN LET /p=t: GO TO 9352 9356 LET /p=o: POKE 23324,10: GO TO 934 8 9360 CLS : PRINT TAB 6;"Business Math C alc"''"Rules:"''"1. Enter math sign (+ ~ / *)"'TAB 3;"a. Function continues un til TAB 6;"q For QUIT is entered."''"'2 . Each Entry is uses the LAST’'TAB 3;"T OTAL for the NEXT CALC." 9362 PRINT "3. Inputs can be math: form la."'TAB 3;"As: 4/2, 6*8, SQR 16, etc." ven wenn B 11; INVERSE 1;"Work Pad"; INVERSE 0 9363 LET q=9el2: LET a5=0: PRINT #0;AT 0,0;"Enter Function (+, -, /, *)": GOS UB 9500: IF z=113 THEN GO TO 9040 9364 LET f£5=z: IF 2<42 OR z>47 THEN GO TO 9363 9366 IF z=44 OR z=46 THEN GO TO 9363 9368 LET cx=0: LET xa=0: LET xb=0: LET cc=0:: PRINT AT 16,0;"Use Constant? <y> Yes <2> no": PAUSE 0: IF INKEYS="y" TH EN LET cx=1: GO SUB 9510: PRINT AT 18,0 We TR “cost OR cc=3 THEN INPUT "Enter Constan t # ";xa 9369 IF cx=1 AND cc=2 OR cc=4 THEN INPU T "Enter Per Cent"; xb 9370 REM IF cx=1 AND cc=1 OR cc=4 THEN INPUT "Enter #";xa 9372 PRINT AT 16,0;"

": IF cx=l1 THEN PRINT AT 1 5,0;"Const=";(xa AND cc=1)+(xa AND cc=3 )+(xb AND cc=2)+(xb AND cc=4);(" " AND ec=1)+(" " AND co=3)+("%" AND cc=2)+("% "AND cc=4)

9376 PRINT INVERSE 1;AT 19,0; ("Add" AND 2=43)+("Subtract" AND £5=45)+("Multipl y" AND £5=42)+("Divide" AND £5=47)

9380 INPUT “First Nbr? ";a5: PRINT AT 2 0,0;a5;TAB 14;CHRS £5

9384 IF cx=l THEN LET a6=a5: PRINT AT 1 6,0;a6;TAB 14;CHRS £5 9400 INPUT "Nbr?";b5: O TO 9360

9410 IF cx=1 THEN LET b6=(FN n() AND cc =1)+(FN 1() AND cc=2)+(FN o() AND cco=3) +(FN m() AND cc=4)

9440 LET a5=(a5tb5 AND f£5=43)+(a5-b5 AN D £5=45)+(a5*bS AND £5=42)+(a5/b5 AND f 5=47): PRINT AT 20,15;b5: PRINT AT 21,1 S;"="Fa5

9450 IF cx=1 THEN LET a6=(a6+b6 AND £5= 43)+(a6-b6 AND £5=45)+(a6*b6 AND £5=42) +(a6/b6 AND £5=47): PRINT AT 16,17;b6:

PRINT AT 17,14; 7aé

9480 INPUT "Nbr?";b5: IF b5=9e12 THEN G O TO 9360

IF b5=9el2 THEN G

13

9482 IF cx=] THEN LET b6é=(FN n() AND cc =1)+(FN 1() AND cc=2)+(FN o() AND cc=3) +(FN m() AND cc=4)

9488 PRINT AT 16,0;" "AT 16,15;" a Vey fe "SAT 20,0;"

"SAT 20,15;" "SAT 21,15 A "SAT 20,0;a5: IF cx= 1 THEN PRINT AT 16,0:a6 9492 GO TO 9440 9499 STOP 9500 PAUSE 0: LET z=CODE INKEYS: PRINT #0; AT 0,0;"

: RETURN

9510 “PRINT AT 15,0;"Constant Choices "erl] Increment Input with

# "2. Increment Input with %'' "3. Decrement Input with #"'"4. Decreme nt Input with %"' INVERSE 1;"Then ";("a dd" AND £5=43)+("Subtract" AND £5=45)+( "Multiply" AND £5=42)+("Divide" AND £5= 47): INPUT "Enter Choice";cc: 9512 GO SUB 9530 9514 PRINT AT 15,0;"You are given Three Variables touse for Alternate Inputs a ,b,c"' "They can be + or - or Decimal These can greatly increase your Calcula tion functions.": BEEP .2, 20: INPUT "In put Three Values “for a,b,c" "ae b, sal 9530 LET a$="

": PRINT AT 15,0;a$'a$'a$" as" a$'a

$

9532 RETURN

9540 LET q=9el2: CLS : PRINT AT 4, 8;"IN TEREST CALC'''''<1> Monthly Interest on

X Amount" 2> Annual Interest on x""' "<3> Cumulative Annual Int on x""''"«4>

Cumulative Monthly Int on x"''"<5> Depr eciate at X Int, Y time''’'"<6> Mark DOW N by X %'''"<7> Mark UP by X %"''TAB 10 } INVERSE 1;"q to Quit"; INVERSE 0: PAU SE 0: LET z=CODE INKEYS-48: IF z=65 THE N GO TO 9040

9542 GO TO (z<l OR 2>7)*9540+(z=1)*9548 +(2=2)*9556+(2=3)*9562+(z=4)*9570+(z=5) *9578+(2z>5)*9586

9548 CLS : PRINT AT 10,0;"Monthly Inter est on X'"''TAB 10; INVERSE 1;"q to Quit "; INVERSE 0''

9550 BEEP .2,24: INPUT "Principle? $";p : IF p=9el2 THEN GO TO 9540

9552 INPUT "APR Interest Rate? %";int:

LET i=int/100: PRINT "$";p;TAB 8;"X (1/ 12) of"; int;"& =$";FN i(): GO TO 9550

9554 INPUT "APR Interest Rate? %";i: LE T int=i/L00: PRINT "$";p;TAB 12;'(1/12) of"; X;"% =";FN i(): GO TO 9550

9556 CLS : PRINT AT 10,0;"Annual Intere st on X'''' INVERSE 1;"q to Quit"; INVER

SE O'' 9558 BEEP .2,24: INPUT "Enter Principal $";p: IF p=9el2 THEN GO TO 9540 9560 INPUT "Enter Interest Rate %";int LET i=int/100 : LET an=INT (100*ixp+.5 )/100: PRINT "$";p;TAB 10;"X ";int;" %= $";an: PRINT #0; INVERSE 1;"Enter": PA USE 0: GO TO 9558 9562 CLS : PRINT AT 10,0;"Cumulative An nual Interest on x"'' INVERSE 1;"q to Q uit"; INVERSE 0'* 9564 BEEP .2,24: INPUT “Enter Principal $";p: IF p=9el2 THEN GO TO 9540 9566 LET a=0: LET b=0: LET c=p: INPUT " Enter Annual Interest Rate %";int: LET i=int/100: INPUT "Enter Nbr of Years "; time: FOR n=l TO time: LET a=FN h(): LE T beatb: LET c=pt+b: PRINT "Year # ";n;T AB 12;"Int= $"; = $";b'"Incr eased Prin= $";c 9568 NEXT n: PRINT #0; INVERSE 1;"ENTER "> INVERSE 0: PAUSE 0: GO TO 9540 9570 CLS : LET tad=26: PRINT AT 6,0;"Cu mulative Interest Monthly"'': BEEP .2,2 4: INPUT "Enter Principal $";p: INPUT " Enter Time in Months ";m: INPUT "Enter Rate of Interest %";int: LET i=int/100 9572 LET a=0: LET b=0: LET c=p: FOR n=l TO m: LET a=INT (1OO*FN h()/12+.5)/100 : LET b=bt+a: LET c=ptb

t";TAB 15;"=

a();b": LET x=c: PRINT "Incr Prin": TAB 15;"= $";TAB FN a();c"'

9576 NEXT n: PRINT #0; INVERSE 1;"ENTER '"y INVERSE 0: PAUSE 0: GO TO 9540

9578 CLS : PRINT AT 6,0;"Depreaciation over Time''': BEEP .2,24: ane "Enter Prin to Depreciate Enter Total Time-Yrs ";t: INPUT “Enter

Annual Depreciating Rate % ";int: LET

i=int/100

9580 LET a=0: LET b=0: LET c=p: LET x=p : PRINT “Start Principal";TAB 18;"$";TA B FN a();p'': FOR n=l TO t: LET a=INT ( 100*FN h()+.5)/100: LET b=bta: LET c=c— a

9582 LET x=b: PRINT "Yr #":n;" Accum De p=";TAB 18;"S";TAB FN a():b': LET x=c: PRINT "Depreciated Prin=";TAB 18;"S";T AB EN a();c""

9584 NEXT n: PRINT #0; INVERSE 1;"ENTER "; INVERSE 0: PAUSE 0: GO TO 9540

9586 CLS : PRINT ar 6,0;"Mark ";("UP "

AND z>6)+("'DOWN "' AND 2<17): s" by x 3i''

INVERSE 1;"g to Quit''' INVERSE 0

9588 INPUT "Enter Price ";c: IF c=9el2

THEN GO TO 9540 9590 LET tad=26: INPUT "Enter %";int: L ET izint/100: LET y=INT (100*FN h())/10 0: LET y=(y AND z<7)+(y*-1 AND z>6): PR INT c;TAB 10;"- ";int ;TAB 17;"=";TA B 20;"$";: LET x=c-y: PRINT TAB FN a(); x 9592 GO_TO 9588 9800 LPRINT TAB 8;"TS-2068 Super Calc" "TAB 7;"For Oliger and LKDOS"''TAB 3;"D onated to Public Domain By:";TAB 11;"Bi 11 Jones"''TAB 9;"The Main Menu" 9810 GO SUB 9342: POKE 23323,39: LOAD / “cal .C2"SCREENS$ 9900 FOR n=1 TO 22: FOR y=l TO 32: LPRI NT SCREENS (n-l,y-l);: NEXT y: LPRINT : NEXT n

CThy §uTo 9810 han rtvsTeay Pepa

QL Hacker's Journal Supporting All QL Programmer's

" cs 4773 W, Braddock Rd. #3 Timothy Swenson, Editor A jexandria, VA 22311 (103) 820-6657

tswenson@dgis.dtic.dla.mil

EMSoft division

Estate Management Services P.O. Box 8763 Boston, MA 02114-8763

(617) 889-0830

FORMAT PUBLICATIONS. 34, Bourton Road, Gloucester,

GLA OLE,

England.

: Tel: 0452 412572 * :

Mr F.Davis, P.O.Box 1095, Peru, Indiana, 46970 U.S.A. 2nd September 1991.

Dear Frank,

I have been given your name and address by Bill Jones in connection with the UPDATE magazine for the TS2068 computer. He was unable to provide your phone number at the time so I am forced to resort to the slow method of using the mail.

I am Managing Editor of FORMAT, a magazine for serious users of the Sinclair Spectrum and the SAM Coupé computers. FORMAT has been published monthly since 1987, it tries to cover all aspects of the Spectrum and SAM Coupé market - EXCEPT games reviews. Our readership is now over 4500, and still growing fast.

We are looking to establish links with overseas user groups with similar areas of interest with a view to pooling information and sharing articles and program material. I am enclosing a copy of a resent issue which I hope you will find of interest. I hope you feel, as I do, that our magazines/clubs will benefit from closer ties.

We look forward to hearing from you in the near future, if like me you prefer the phone our number is Gloucester (0452) 412572 and our Fax number is (0452) 380890, or I will wait patiently for a reply by mail.

Yours sincerely,

OES

Robert P. Brenchley, Managing Editor.

BYTE POWER Super Special!!! All BYTE POWER titles at 50% off...

Now:

12 BYTE POWER Magazines (Back issues) .............. $27.50 6 BYTE POWER Magazines (Back issues) .............. $16.00 1 BYTE POWER Magazine (Back issue) .................... $3.00

1* Class Pack (6 back issues in vinyl album) ...... $20.00 Mega Pack (12 back issues in 2 vinyl albums)...... $31.50 Issues Available...

August '86, September '86, October '86, November ‘86, December-January ‘87, February ‘87, Spring '87, Fall '87, February '88, May '88, Fall '88, Winter '89

BYTE POWER 1* Class Fonts I ..0 4 ccssseecseseseee $10.00 2+FAST (Fast Load for TS2068) $10.00 ~ The Print Factory .........ccsccccsesseees $12.50 vThe Companion Volume 1 ............. $12.50 Best of Business and Utilities.............. $10.00 Best of Arcade Game............scssssssscssescecsseccsecessarsccearee $10.00 Best of Entertainment, Strategy & Board Games ........ $10.00

For those with remaining issues of BYTE POWER Magazine, you may use them as credit towards the purchase of any of the above packages...

Please add $3.00 for Shipping & Handling. U.S. Funds only...

BYTE POWER 1748 Meadowview Avenue Pickering, Ontario, Canada L1V 3G8 16

[ WHEN THEY BUILT THE TIMEX 2668 COMPUTER THEY THREW AWAY THE MOLD

That is true in more ways than one. It was an embarassment to BIG BLUE, a knotty personnel problem for TIMEX, and a disapointment to Mr. Sinclair.

Probably its greatest drawback was that it was ahead of its time. No other computer was so powerful and unbelievably cheap! If it had been built in Europe, instead of by an American corporation, the customer ' might have been served as a first priority -~ on the proven principle that a good product will make money, not necessarily a good promotion.

It broke with Microsoft's chip and programming philosophy by using a time proven CPU,the Z8@. This CPU has its problems, but nothing like the clumsy and limited memory addressing scheme of the 8086 family. Even now, with 88286, 80386, 88486 ad infinitum, the questionable philosophy remains to confound the user, and increase cost.

Like any good tool, a CPU should not be loaded down with features that few will ever use. On the other hand, nearly universally used items like parallel, serial, and synchonous ports have a place ~~ as in the 2180 series from ZILOG. The SCLD is the companion of the Z8@ CPU in the TS2668 to provide special functions not appropriate for a CPU. It had one brilliant architectural innovation, the BE signal.

That single feature meant unlimited memory expansion without limiting in any way how it could be implemented. Realization that this was true gave the competition a migrain, and TIMEX fears that they could not control the peripheral market. 1t was just too EASY to support!

Pirst of all, the TS2668 architecture was designed to host any operating system. Spectrum ROMs hardly scratch the surface. For one reason or another the operating system was crippled so bank switching couldn't be used, the joystick ports were made useless for any other purpose by omitting required connections, and the units produced were dumped on the market. At the same time, a snow-job campaign about problems with programming, and lack of teamwork was launched to keep the real reasons (and the amazing capabilities of the healthy computer) from reaching the public.

Those who bought the snow-job looked for tricks, and ways to exploit the existing mess. Few recognized that the only mess was the sabotaged operating system. Those who proposed fixing it, were looked on as being a little -- strange? After all, if TIMEX couldn't do it, what chance did you have?

Times change. Now, it is not unusual for an amateur to program his own EPROMs and even PLAs. Operating systems no longer hold the programmer in awe. Lets FIX those marvelous TS2668s that never got their place in the sun.

The diagram for the TS2968's local memory shows how important the SCLD functions are. The timing chart for video data fetching has never been published before. Tests have proven that the SCLD has four T states to service each byte pair, but uses only three. The odd T state is made available to the Z89 CPU, allowing applications like DOS, which cannot stand extended delays. What a beautiful machine! NEW ROMS! NEW ROMS!

17

LOCAL MEMORY

SCLD LUMP _DECODE}*—~ 14, A1S } i CHUNK DECODE a3 4 |

PORT DECODE k-— a@ - A?, TORO

j MODE SELECT SCLD_ADDRESS BUSS _| * og

YIDEO B= f { PROCESSING

—=—-—_ —— BDIR + |

i aoe AREA #2 1280! rom SCLD BC—> CK | ian ALFILE2 768 BCL = [| SOUND CHIP | | | DFILE2 6144 BDIR | BCL | DATA BUSS | Hi 2 | | 8 6 TRI-STATE (NOT SELECTED) : Anos i: ed [CHUNKS 8.192! @ 1.1) OUTPUT (PORT FS RD) | | tq aoe LUMP [AREA #1 1280! 1 | 8 INPUT (PORT F5 WR) fal | ORS 3 ALFILEL 768 11 | ADDRESS (PORT F4 WR ONLY) i 4 i; ——DRaMWE= 1 sEeetceeectee area tee a ee! SS ————" While the sound chip is deselected, the SCLD RONCS LUMP s DLFILEL 6144} Puts a status byte on the data bus during 1/0 bed Laie read time. This makes it possible for an y LROS a 8 | | (CHUNK2) 8192 secernal buss master to synchronize when using EXROM DOCK HOME BANK #255 Stopping the buffered clock signal also BANK BANK Signals contention. A machine code 1/0 routine \ . repeatedly reading a nonexistent port will give

#254 #0 a stoboscopic scan of SCLD status.

The SCLD must access a pair of bytes every 1,134 us (4 T states of 283.33 ns

MEMORY READ CYCLE MEMORY WRITE CYCLE

: 1 i me Pres ye | ea dt Te | B | each) vhen busy, At all times, it runs | sens. { | 1 i the address multiplexing for the CPU. g f . N { f a ae f 7 When busy, the SCLD multiplexes its Dos {f \ a,

own generated addresses, using RASL to access two related bytes with CAS1 done twice. The accessed bytes depend on the video node. MODE byte 1 bute 2 8 D_LFILEL A_FILEL ‘Ins f 1 DLFILE2 = A_FILEZ pens neeabisee Sed oo Slasetsn lane cteeseensseteateeeseN ae =eee, 2 DLFILEL D_FILE2 6 DLFILEL D_FILE2

Mode 2 uses D_FILE2 to provide an attribute bute for every pixel bute. This advanced color mode requires highly advanced programming techniques.

Mode 6 uses a predefined attribute for the entire screen, It outputs both bytes as pixel data at twice the speed, doubling the screen resolution, and allowing 64 or 8@ characters to appear on each screen line.

\__—/t mo operation 3 —___/ ADDR _¥ AQ-2_¥ AB-15 i ae-7_% AB-15 x

EEL PPS ee, Se ‘

RAST L SCLD OPERATION 3 ‘ ADDR—~B-7X 8-15 (A 8-15 (BM4S}+—48-7( 0-15 (AY 8-15

a

USING THE LARKEN SEQUENTIAL/RANDOM s FILING SYSTEM TO PRODUCE A TS2068 ROM DISASSEMBLY

Recently, I decided to develop a disassembly of the code contained in the TS2Z068 ROM. The procedure required the use of the Larken Sequential/Random filing system which is a software product available from Larry Kenny. The LKSR code allows for the saving and loading of as much data as can be held by one disk} whereas the Version 3 EPROM system is limited to 21 tracks per file name. Armed with both sustems, I proceeded as follows?

STEP 1 LOAD DISASSEMBLER. OPEN SEQUENTIAL FILE VIA LKDOS.

My procedure for capturing the ROM consisted of first using the Larken Version 3 EPROM RND/SEQ commands to read the output from a disassembler onto a disk.

For a disassembler, I chose Monitor (aka Spectramon) with its deficiencies but with the advantage of sending a line feed every 32 characters. This character (13) provided a separator as required when using the Larken LBASE system. Monitor is a version of Spectramon which appeared in Personal Software back in 1983; I had converted it to TS2048 and mended a few errors in the mnemonics code, then compiled it using Timachine to make it run acceptably fast. (HOT Z is a very guod disassembler but it sends no separator at the end of each disassembled line} it did not therefore fill the bill for this particular application.)

Having loaded Monitor; I then broke to BASIC and did <RANDOMIZE USR 100: OPEN #5,"ROM1 OUT"> to a selected drive with a fresh disk inserted; the drive turns as the file is opened. I returned to Monitor and started the readout at OOOOH, setting the limit at 3CFF. The SAVE went very well with the drive whirring every little while as a track was filled} that is up to 21 tracks. At that point, the computer gave me a “DISK FULL” error report. I tried various tricks to get more than 21 tracks to load into one file name on the disk, but to no avail. (I later confirmed: by telephone with Larry Kenny that 21 tracks is indeed the limit using the LKDOS EPROM. )

I continued on saving sections of code until I had finished the Job? in four sections of about 20 tracks each. Each section

required a different file name + OUT} ie, “ROMZ OUT","ROM3 OUT" and "“ROM4 QUT". This ended the use of the LKDOS EPROM commands.

STEP 2 READ SEQUENTIAL FILE INTO LBASE VIA LKSR COMMANDS.

Now, I started to read these four files into LBASE (my 512 byte version); this employs the special Larken Seq/Rnd (LKSR) code imbedded in a REM line at the start of LBASE. This code must be purchased from Larry Kenny} he also provides a rudimentary form of LEASE which I developed into my version.

To do this, I MERGEd a special line 8030 contained on the disk as lbase.BM. Entering <GO TO 8000> started reading and saving 16 lines (512 bytes) into each record; as each file was read, the additional records were added onto the end of the previous data. |

19

There was now no longer a problem exceeding 21 tracks.

When all was done, I loaded the complete single file into LBASE and scanned the results particularly around the "join® areas between the files. I found that I had missed two bytes in one instance and quite a few in one other case. I don’t know why. Further examination revealed that the SAVE via the EPROM had indeed caught all the bytes} those that went missing seemed to have done so during the loading into LBASE. So my routine in line 8030 is suspects however, I did not try to do anything with it as I could not see what I could do.

I got around it by writing some additional BASIC in LBASE to read and save records from a start number to an end number; using the TAR command and a simple FOR...NEXT loop. I read and saved all the records up to an including the one just before the missing two bytes. I then loaded this portion into LBASE proper “GO TO 1» and did an ADD to put the missing bytes into their own 512 byte record; next I started again with the next portion from dust after the missing two bytes up to where I had missed quite a few. 1 repeated the same procedure, adding manually the code for missing butes.

This area turned out toa be the "constants" table and the "calculator" table which I typed in as DATA. I knew what the missing bytes were by having a copy of the disassembly of that area done with Monitor. Compressing the DATA into fewer lines left several records with redundant DATA which I erased line by line and simply marked them by entering "Blank Record".

There is a routine in my LBASE to copy a file and skip some records; this was a rather tedious job with close to 600 records and only a handful of blank records to erase, but it had to be done so I went ahead.

STEP 3 EDIT THE TEXT.

Now I had the rough ROM disassembly in LBASE format as apposed ta LKDOS EPROM format. It now needed some considerable editing because there were still numerous tables and floating point calculator instructions that had to be deciphered manually. Fortunately, I fad a copy of a Spectrum ROM Guide to help me locate and decode the tables and fp instructions. Most of these followed the Z80 instruction RST 28H (from two to many bytes) which turns on the fp calculator; as well as some single byte error codes following RST OSH. Some disassemblers identify these bytes as DEFR but Monitor does not. In any case, locating RST OSH and RST 28H always identified the following bytes as DEFRs.

During this process, I had-to use some short forms to conserve space on individual lines and these were for the fp instructions. Here are a few examples with some brief notes!

DEFR CODE MEANING SOME SHORT FORMS

38H fp exit fp ex fpex fpx

(this is the byte that turns off the fp calculator) O4H multiply mult mul C3H store 3 store3 stor3 sta

20

(store 3 puts a result into Memory area 3 of 4)

31H cOPY cPy cy (this really makes a duplicate of a result) O1H exchange exch exc (a becomes b and b becomes a in Memory) E2H get 2 get= gt2 (fetches the byte stored in Memory 2) OOH do true Jo tru jtru jtr

(jump relative if the result is true (1)§ followed by a displacement byte, say +4) Toni Baker wrote a series of articles for ZX Computing in 1986 which gave very good coverage of the Floating Point Calculator and if you are interested in this subject, you should have that series.

SUMMING UP

Finally; I had all the tables and the fp instructions done} what you would see on the disk as the file "ROM" is the result, It is quite conceivable that there are some errors in my work. Using LBASE, it is easy to correct them and I’11 do that as they are discovered.

My intention in doing this exercise was to build the ROM Guide to be able to use it mainly via the screen, yet to make copies as necessary to do a closer analysis of a particular area of code. ‘ E

Making a complete hard copy was not my intention but it could be done. There would be some gaps wherever there were blank lines on the screen. Use <PRINT USR 100: LPRINT “name" to make the hard copy.

The code now uses up 55 tracks for over 273 kilobytes, ie, almost 280,000 bytes. It is difficult to imagine how all this data could be captured, edited, searched and saved to disk with the limited memory of the TS2068. I don’t have many requirements for storing such a lot of data but this example shows that if can be done using the Larken LBASE code and the enhanced BASIC that I have developed and used

I have provided a copy of the disassembly on disk to UPDATE MAGAZINE; it may be read or printed using the Larken LKDOS PRINT or LPRINT commands, but this is rather tedious and it would be better to access it using the LBASE program. To repeat, you must purchase the copyrighted code from Larry Kenny and then use my LEASE.

HHFEND ERK

21

Components

TS-2068 Computer $85.00----Excellent condition. Has flip switch to select RGB Monitor, Composite Monitor, or Television.

___$150.00----A nice crisp 14" RGB Color Monitor with hook-up cable.

Oliger 4 port _$40.00----Has RGB Monitor Interface and 4 expansion slots.

expansion buss

RGB Mani to:

Oliger DOS _ $160.00----2 Board DOS system. V2-52 EPROM which provides System Dual DOS, the capability of operating both Oliger

DOS and Larken DOS, either as Single DOS or Combined DOS. Also copies disks of either format in same or opposite format.

Larken DOS___———s—« $65. 00----LKDOS Cartridge provides LKDOS when used with one

Dock Cartridge or two of the Oliger disk interface boards.

Larken 256K __$120.00----256K Ram Disk and Extra Memory. Chips installed.

RAM DISK Operates either as RAM DISK or Extra Memory for Programming.

Quad Disk Drives $300.00----2 DSDD 40 track and 2 DSDD 80 track drives in four drive Beige cabinet with HD Power supply.

Oliger Centronics $30.00----Interface for Printers.

Printer Interface

64K Printer Buff $125.00----An intelligent printer buffer that allows Data Buffer Hold or Combine and output to one or two printers

A/B Switch __ $10.00----The A/B switch allows input to the above buffer from one or two computers and output from the

buffer to one or two printers. The text data fram two softwares or two computers can be combined into one document for print out. Z/SIO Interface _$90.00----An intelligent RS-232 Serial interface. The Principle use is for Telecomputing with: Avantex Modem $100.00----Telecomputing Modem. Connects to phone line. 200/1200 baud : 2

Zebra OS-64 Cart __$30.00----Provides 64 Colum Screen and 64 Colum programming system.

32K_NVM Cart $60,00----Dock Cartridge that provides 32K battery held Extra Memory. Usable in Dock or XROM Banks.

Total Used Value: $1365.00 SALE PRICE= $750.00 with all cabling. Also includes an entire library of software mostly for LKDOS and Oliger DOS, plus

many books and manuals.

OPTIONAL: Panasonic KXP-1124 Printer: $225.00. All software set up for use with this excellent 24 pin printer. (Cost $380.00 and is in New condition).

CALL TO RESERVE: Bill Jones, Tel: 904 871 4513

nm nm

Looking For

Productse

If so, look no further! We have the LARGEST stock of h/w & s/w for the T/S line of computers ANYWHERE IN THE WORLD!

For a catalog and price list call or write:

AMG ENTERPRISES

1419 1/2 7TH STREET OREGON CITY, OR 97045 503/655-7484 NOON-10PM PT T-S FAX: 503/655-4116 VISA/MC/CK/MO - $3.50 (REFUNDABLE) (STATE COMPUTER MODEL FOR PRICE LIST)

DESK-TOP PUBLISHING?

Why the question mark?

While discussing this subject, there is often confusion between methods and results. In actuality, only the results are published. The methods are a means to that end, and are important insofar as ease of use is concerned.

RESULTS

Results appear first on a dot matrix printer having both built-in fonts and various graphic modes. Unless you really stretch your printer's capabilities, you do not EVER go backwards. Attempting to do so requires special techniques to compensate for paper tension and backlash. Reserve this for cases where you want to use the printer as a plotter, perhaps to fill in a predefined blank area on your document.

Aside from using your printer as a plotter, you can work with its built-in fonts, or use any of its graphic modes.

When using built-in fonts, operation is still dot matrix, but the internal graphic program for fonts does tricks that are difficult to duplicate using its user graphic modes. Because ALL operations are dot matrix it is easy for the printer to know exactly where it is with respect to a standard page format. (This is not always true when using plotter type instructions.) One example of internal tricks is "double strike". The printer makes a second pass with the paper advanced 1/2 the pin spacing (1/72"), or 1/144". This trick is automatically utilized any time near- letter-quality (NLQ) fonts are being processed.

A second trick is using dot positions in between those that are described in the manual. "BOLD" is accomplished usually, but not always by printing intermediate dots. The exceptions provide special "BOLD" fonts in NLQ format. NLQ operation also uses these intermediate dots at the expense of reduced printing speed.

The DOT MATRIX GRID:

There are two major classes of dot matrix 8 or 9 pin printers. The first class includes the IBM Proprinter and Star, among some others. (The GORILLA BANANA and OLIVETTI PR230@ are in classes by themselves.) These printers have a Smallest” paper feed of 1/144".

The second class includes EPSON and true compatibles -- even some Star models. These have a smallest line feed of 1/216" as specified, but also have a line feed of 1/144" in order to do double strike characters. Internally EPSON deals with paper advances of multiples of 1/432", but there are no user instructions which make use of this resolution.

The new generation of 24 pin printers gains speed by making essentially three passes into one. For internal operation, this makes NLQ font processing much more efficient. A small price is paid, however, in compatibility with older graphic modes.

Horizontally, you might think that there are 960 dots. In quad-density graphics, some of these dots are printed at inter- mediate positions, so 192% dot positions are available. Actually there are a lot more positions available than that, about 5006 in fact. If you doubt this, compare font horizontal dimensions and compute the least common denominator.

24

The count of horizontal and vertical elementary steps is what the printer uses to keep track of its position on the predefined page, width and length.

EPSON GRAPHIC MODES

With the advent of the EPSON, with its page location cursor memory, it became possible to intermix various graphic modes, and even font operation in a single page line. The necessary printer instructions were provided, but it was left up to the user to figure out what to do with them. This support vacuum meant that only gifted programmers were able to write printer drivers, and most applications were designed to match PC, XT, and other more professional applications. 24 pin printers cater to this application market by providing emulations for CGA, HERCULES, EGA, and some VGA video modes. EPSON 9-pin printers provide only one graphic mode of this type. It is graphic mode #5 which prints a true 1:1 aspect ratio (square) dot pattern. For the TS2068, it is the only mode which reproduces the screen exactly for dumps and selected screen window mappings.

The WIDJUP Co. has prepared an EPSON printer driver and an EDITOR to make it easier for the user to compose his own documents to his own specifications. This includes ALL windowing operations needed to format a full page. Using this facility in a higher level program allows these functions to occur invisible to the user, who can then forget everything but his publication, page.’

FILLING THE VACUUM ,

The WIDJUP EDITOR "GRAPHISON" allows you to divide the printed page into single lines, groups of lines, and segments of single lines. When a single line is subdivided, the pieces are designated "L" for left end, "M" for one or more middle pieces, "R" for right end, and "C" for a complete line with both ends. Each of these pieces define a window on the document page. Each window requires a corresponding set of printer commands plus mapping this window somewhere on the screen.

Using graphic programs, these mapped printer windows can be filled with whatever your heart desires. If immediate printing is not desired, SCREENS files can be stored to disk, including a flag section identifying which printer command set(s) apply. A single screen can have several windows mapped to it, so efficient storage can be achieved. LARKEN has been working on a similar method.

With the WIDJUP approach, existing graphic programs can be used to create SCREENS files. CAD#3 uses this method to create exquisitely detailed printer circuit board masters --a very special type of full-page document.

Whereas data files cannot be contained in limited memory,: you can store printer command sequences and the commands themselves for several pages if wanted.

Fortunately for TS2068 users, its video generator (SCLD) is compatible with 8-pin printer graphics. Eight vertical dots on the screen correspond to printer pins. What this means to you is that 8x8, 8x16, 16x16 bit mapped fonts are most easily handled.

Graphically generated fonts are less easily employed because each character must be divided among several window maps. This means that parts of large characters appear on different screens. This is where a good compositing program can be useful.

2s

PHOTOGRAPHIC PRINTER WINDOWS

The concept of "PIXEL" is well understood as the smallest element in a black/white image. With audacity, I use and propose the usage of the term "GIXEL" for the smallest element for gray scale dot matrix reproduction.

There have been some rather clumsy techniques recently published to take advantage of the Ontario club's design for a video image capture board. GRAPHISON and a WIDJUP grey scale graphics generator are sufficient to create any picture you want from a sequential file of gray scale integers in CHR$ form, or as stored in a memory block.

For highest EPSON resolution and size, each video scan line would have to be sampled 240 times. Groups of four scan lines are needed to integrate gray value over a 4x4 area instead of a dash shaped image fragment. This gives 4x4 "GIXEL"s in 17 shades of gray. Not all shades need be used, and more shades would not improve the average picture much. This gray scale utility is also used to print a colored screen dump sideways in shades of gray corresponding to colors. PIXELs become GIXELS. The 256x176 pixel screen image becomes a 704x1024 dot printer image.

SUMMARY

Available desk-top publishing programs suffer from a common problem. Instead of creating general purpose printer drivers, and taking advantage of high resolution video modes, the first workable solution was siezed upon, creating all kinds of incompatibilities. T52068 advanced video modes have been just about delegated to history by programmers who insist on violating the rules for remapping memory. DOS systems similarly create mayhem with bank switching rules. Excuses have replaced fixes.

All is not lost. Most existing programs can write to SCREENS files. Video capture boards can be compatibly programmed. If high resolution screens cannot presently be used, the availability of a video capture board should encourage its use.

A big help is being able to see what can be done. To merely criticize, without offering better things, is cruel. Please see the graphic samples submitted with this article.

3 Bill Pedersen, The WIDJUP Co.

f PIDATE| 4] MAGATINE 5,

rae

26

36 15 14

12 11

13

FEES EH Be

=

10 9

erns

erns a 7

Gixel patterns selected for minimum texture, Nominal for dot matrix,

27

8

a

Note: Newsprint uses a variable size dot on a triangular matrix.

MECHANICAL AFFINITY GARAGE SALE

The following are now available from Mechanical Affinity for your Sinclair home or business computer. All items -listed are available in quantity. Orders may be placed by check or money erder to either Paul Holmgren,5231 Wilton Wood Ct., Indianapolis In, 46254 317-291-6002 , ....or to Frank Davis, 513 East Main St., Peru, In 46970 317-473-8031. Do not make the check out to Mechanical Affinity. All Prices include Postage already! BEST WISHES FOR THE UPCOMING HOLIDAY SEASON AND HAPPY COMPUTING. TO OBTAIN OUR NEW EXPANDED CATALOG WITH NEW ITEMS, PLEASE SEND A LARGE SELF ADDRESSED STAMPED ENVELOPE TO EITHER OF THE ABOVE ADDRESSES. All funds are in U.S. dollars, and include postage except where noted.

BOOKS

SYNCWARE NEWS Vol. 1 $8 All volume 1 issues bound in one book

TOURING THE TS2068 ROM OPERATING SYSTEM by WIDJUP $12

QL TECHNICAL GUIDE $15

QL SERVICE MANUAL $12 extras & new items

Replacement or backup power supply for the QL, no serious user should be without one (personal opinion). $15

Micro Drive Cartridges 4 for $15

MDV labels, 3 sheets for $1.25. For the QL.

QL replacement membranes for keyboard $15.

Disk Drives, half height 3 1/2 and 5 1/4. Order from Paul at $55

@ for 3 1/2 or 5 1/4, or $165 for dual 3 1/2'’s w/ case & power.

Panasonic KX-3131 Daisy Wheel Printer, with extra ribbons and print wheels for $115, includes P. & H. Parallel Interface.

Towa Daisy Wheel Printer with extra ribbons and print wheels; parallel interface, QUME compatible for ribbons and print wheels. For only $115, includes P. & H.

5 1/4" DSDD or DSQ@D disks with Tyvek sleeves-- 100 for $18.00 delivered free.

Cumana Disk Interface with toolkit, handles up to 4 drives, no extra memory for $75. For QL only.

IBM Keyboards, 101 keys PC-AT types, for $15 each.

LOTUS 1-2-3, new never used fullpackage with registration papers for only $75. For IBM or Compatible or QL IBM Emulator. Commodore 1520 Color Plotter Printer with John McMichael Board

that allows this to be used on TS2068 with Oliger motherboard. Includes software, all for only $100. Rotronics Wafadrive, two 128K stringy floppy drives, parallel and serial printer ports, Spectrum mode only, with cables, for $90. ' A NEW GOLD CARD FOR THE QL. THIS ALLOWS YOU TO HAVE 2 MEG OF MEMORY, 16 MEGAHERTZ SPEED. upto 4 times the present speed of your QL, AND USE UPTO THREE DRIVES INCLUDING THE 1.4 AND NEW 3.2 MEG DRIVES. HAS FULL TK2 AND EVEN INCLUDES THE CODE FOR OPERATING ‘A WINCHESTER HARD DRIVE (hard drive interface and hard drive not included). All of this for only $500 plus $10 for insurance and handling. We take care of any import duty. Prepayment and please allow extra time for shipping. Full Trump Card, with TK2, and capable of 2 drives, giving you a full memory of 896K. All for only $225, insured. Add on for QL Trump Card to allow you to use upto 4 drives and latest operating system upgrade for only $40.

a)

The Sinclair Desktop Publishing Journal —

volume 2 issue 3 Summer 19°91 ; ERaitea By Mike FelierskKi

Happy Summer to All Our Readers! From the Editor

As editor of the Sinclair Desktop Publishing Journal | would like to wish all our readers a happy summer. Summer usually means lawn work, picnics and vacations. It also means that the ald TS2068/Spectrurn may be shelved or at rninimur, sit idle and collect dust.

‘Well, | beieive there are all types of summer uses for your Sinclair, be it 1000, 2068, QL or 788 This issue of the SDPJ will explore sorne of the "Summer"

Desktop Publishing uses, but DTP is not the -S=SSieee=e eee only area. Take for instance Bulletin i

This I ssue...| NEWDTP IDEAS |

DISCOVERIES

dialing up BBSs) Maybe you have taken a week or two off fram work to paint the house.That afternoon heat is not only bad for you but it is also bad for the paint, so why not convert a few icon files from cassette to disk?

THE COMPANION NEW GRAPHICS PIX-FX REVIEW

And while we are on the subject of home repairs, don’t forget the various "Home Improvement" programs available as well as “Auto Analyzer" for all of that repair work! Finally, you can use your Sinclair as an education suppliment for the kids while school is out.

In all, it seems a shame that most computers sit idle during the summer months. Like anyone else | enjoy being outdoors as much as possible while the weather is warm and pleasent. But that does not mean that computers have no place in our lives during the summer months--they just may be used to supplitnent suminer activities.

Mike Felerski, Editor.

The Companion Arrives at the SDPJI Orfrice

It arrived on a Monday. That was very good. Monday was not a happy day at work. My wife was out of town, and the house seemed very empty. Such a small package of four cassette tapes could not have been more welcome. Yes, Byte Power's Print Factory Corpanion had found its way to the humble office of the Sinclair Desktop Publishing Journal!

(See The Companion on page 3)

29

Llarkem Pileurs Swornrer Kit =Spectrum Solution

Product: Spectrum Emulator System: TS2068

Required: Larken DOS Cartridge Cost: Approx. $12

Bob Swoger is well known in Larken DOS circles for his LogiCall DOS shell program which provides easy (often single key) access to Larken DOS commands. What is little known about Bob is that he can provide Larken DOS cartridge owners Spectrum emulation add-on kits for the Larken DOS cartridge. i

The kit consists of a 14 pin gate chip, a 28 pin Spectrum emulation ROM and socket and the necessary wire to add the parts to your existing Larken DOS cartridge,

The socket is soldered to the 8K RAM chip on the cartridge, and the gate chip is soldered to the center 14 pin chip. A jumper wire is then run from the gate chip to the ROS Enable solder hole on the cartridge, and from the gate chip to the 28 pin socket. Finally, the Spectrum ROM is placed into the socket and then the cartridge is inserted into the TCC (Timex Command Cartridge) port.

Now, in order to operate your TS2068 as a Spectrum, you hold down the "K" key as you power up your 2068 It you are already powered up, your can execute an OUT 244,3 command which will {reset your computer and) put you in the Spectrum operating systern,

(See Emulator on page 3)

Sinclair Desktop Publishing Journal

Summer 1991 Page 2

Summertime DITPp

As 1 mentioned on the front page of this issue, summertime is not well associated with computer play.

Let's face it, most everyone prefers to be out doors during the summer, especially if you live in the north east.

Besides, even if you prefer to stay indoors, there are always a million things which will have to be done around the outside of the house. So, whether or not you are an indoor or outdoor summer person, this Summer Idea section of this issue of the SDPJ should apply to everyone! 1 know when many people think of desktop publishing, all that comes to mind is the "N” word--newsletter. This is where | think most people miss the mark. We already know that software packages like Byte Power’s The Print Factory provide programs tocreate “Desktop Published” labels, but let’s toss some more ideas around.

As spring begins so does spring cleaning. And what could be more North American than a garage sale! Garage sales are a haven for signs, posters and banners These are usually created using pieces of leftover cardboard and an El Marko. But this year, why not create signs using First Edition, or Zebra/RMG Poster Maker. Some of those 48 paint fonts ought to catch peoples eyes’. And the best part of it is that all you have to do is create one copy, and photocopy the rest.or print each one out on colored papers. Then at the sight of the sale itself, a giant banner could be created using Byte Power's or Zebra/BMG's Banner designer programs. Maybe, by using desktop publishing to create your signs, people might believe that you have some pretty good junk to sell!

The Discoveries section of the Journal presents thoses little surprises that people find when "playing around" with software products. This issue passes on information from Dennis Clinton of Tujunga CA regarding conversion of Byte Power's First Class Fonts Il for use with TS2068/Spectrum disk systems.

The Winter 1991 issue of the SDPJ, it was noted that the First Class Fonts lH program was un-breakable (due to what was later discovered as an ON ERROR RESET command}. Dennis points out: "Fortunately, that is not so: There is a way to BREAK into the BASIC for modifications, or what ever" (ie. conversion of the program to disk 1/0.

Dennis goes on to explain how this is accomplished:

Spring is also the time when many a Sinclair user gathers up his/her tools of the earth and begins the great task of gardening. Most gardeners 1 know take the time after planting to stake out each row of flowers or vegetables with a small sign indicating what was painted there. Usually these planting flags are created using the empty seed packets.but why not create some of your own using desktop publishing, Why, you could even layout your garden plans the winter before using a combination of garphics and DTP programs.

As summer moves into full swing, a variety of activities begin to flourush. Desktop publishing could be used to design posters showing the way to the company or family picnic. Even maps and instructions to graduations could be desktop published. Summer sports is another area for summer desktop publishing. The immediatly thought is that baseball, softball ar soccer playing schedules and lineup cards could be fabricated. You could even create concession stand menus (which many league parks could really use)!

Now, if you are more of an indoor summer person, you could placate young children on summer break by playing "Picture Bingo”. Picture Bingo cards can be made using Byte Power’s First Edition and the various graphic images {or converted Zebra Icons) available. Flash cards could also be made.

And finally, those early evenings are a great time to organize that big old box of recipes, so why not DTP them? But what ever you do this or next summer don't forget that desktop publishing isn't just for newsletters and cold winter nights!

‘First, select the "File" option at the Main Menu. The select the “Quit” option. In response to the ‘are you sure’ query, press any key, (other than "N"}, then BREAK. “A PAUSE 120" delay provides enough time. Then, to return to the program, RUN.”

Dennis states in his letter that he discovered this “purely by chance”. When | first saw Dennis’ letter 1 tried his suggestion for BREAKing the program and it worked straight off. I then proceded to modify the BASIC so that the program would SAVE, LOAD and CAT via my Larken Disk interface. It works like a charm.

Hats-Off to Dennis Clinton for his excellent First Class Fonts ll discovery. If you have a desktop publishing "Discovery" please drop us a letter or postcard describing your Discovery to

The Sinclair Desktop Publishing Journal c/o Mike Felerski 1284 Brushwood Avenue Cincinnati, OH 45224

Sinclair Desktop Publishing Journal

Summer 1991 Page 3

PiIxX-FX: Not

Another Graphics Program!

Product: Graphics Manipulator System: TS2068 Yo: Cassette & Disk Vers Cost: Approx. $17.50

So, if it is not another

TS2068/Spectrum SCREENS graphics program, what is it? Well, the author describes it as) “a unique callection of SCREENS manipulation utilities designed to help (you) create your won special picture effects from one or several SCREEN$s".

PIX-FX allows the user to take a standard TS2068/Spectrum SCREENS

SCREENS as well as transfer it to, another SCREEN$ in a “Cut ’N Paste” manner. The program will also “render a 3-dimensional perspective view of any SCREENS..". There is also a utility called the “Planet Maker” which which "folds" a SCREENS around a spear of any sizef*

Now that we know what it is, how do we use all of these utilities? Well, it is simple because all of the utilities are contained in PIX-FX and are accessed via pull-down menus (this author's favorite way operate} There are four pull-down menus which are arranged in, more or less, a tree structure: The PIX-FX (Main) Menu, the Help Menu, the SCREENS Storage Menu, and the LOAD/MOVE Pic Menu.

The Help Menu provides information on the program itself, its conventions,

how to use the Planet Maker and Prespective utilities and the other features as mentioned above. SCREENS Storage speaks for itself. It provides for viewing, SAVing, LOADing, and TS2040 CORYing of the final SCREENS. 1

Finally, there is the LOAD/MOVE Pic Menu, It handles the copying, LOADing and Swapping of the Final Screen (FS) and the Working Screen (WS) in memory. It acts as a sort of mini-RAM Disk memory manager of the two SCREEN$s. For instance, if you wish to LOAD a SCREENS into the Working Storage area, you select the SCREENS Storage Menu, then select the LOAD/Move SCREENS option, after which you will be presented with the LOAD/MOVE Menu. Here you can select where you wish the SCREENS

(See PIX-FX on page 4)

graphic and magnify, reduce a specified “window area of the Emulator

(from front page)

What you are thinking now is: “What does this have to de with Desktop Publishing?’ | will tell you. After two years of borrowing my wife's Rainbow Interface (a Spectrum Emulator and back-plane twister board) | finally decided that I needed some sort of “ROM" switch for the times when |

The Cormapessaiqcosn (from front page)

The Companion is a package of Super Large Screen sets, Graphic Design Files, ‘Super (font) Sets, Letter Perfect fants, Double Height fonts and standard size graphic SCREEN$s for use with Byte Power's Print Factory suite of desktop publishing programs. The Companion even includes a special Gorilla Banana Aerco and Tasman printer driver!

The Super Large Screen sets are pictures “that can be used with The Press in your documents’. These screens are usually larger than the normal 32 characters by 24 line screens. Some of the Super Screens are 80 characters wide by 50 lines high (characters based on 8x8 pixels). Each Super Screen is made up of several standard screens placed side by side to create the full size Super

wanted to work with Word-Master (remember, Word-Master is a Spectrum program} Thanks to Larry Kenny and Bob Swoger for making our computer lives a little easier.

For more information on the addition of a ROS ROM (ie. Spectrum OS, OS64, etc.) see the last two pages of your Larken Disk Owners Manual or contact Bob Swoger or Larry Kenny:

Screen,

The Graphic Design Files include 22 Figures, 7 special Office, 17 Nature, 19 Religion and 71 General graphic designs to compliment the Graphic Design Files which come with the original Print Factory programs.

The Super Sets are eleven additional “Super Size" fonts which are LOADed into the Print Factory programs just like the Graphic Design Files. Thirteen were included with the Print Factory suite and these additional eleven include bolds, scripts, and extra fancy Super Set fonts. The largest font is a whoping 56 Point!

The Letter Perfect fonts are, of course, for use with only the Letter Perfect program. The fonts included are a Bold, a Bold 2, a Tall and an Avanti font. There are also Double Height fonts for use with The Press program. '

Bob Swoger

Gator Software

613 Parkside Circle Streamwood, IL 60107-1647

Larry Kenny

Larken Electronics

BR 2

Navan, ONT K4B~-IH9 Canada

Included are Brush, LCD, Script, Garita and five others.

Legend,

Finally there are 60 standard SCREENS files which range from TV screen snaps to artwork and cartoons. There is also a 450 byte Gorilla Banana printer driver, The print driver loads at‘ memory location 64000 and allows the Gorilla Banana printer to emulate 8 pin printers so that the Gorilla can work with all of the Print Factory programs.

Basically, if you do not own The Companion, now is the time to buy it.

Just for the Super Sets, Graphic Design Files and Super Screens alone The Companion is worth its price. The Double Height fonts and Letter Perfect fonts are very nice to have as well.

SCREEN$s are always a tough sell but several of the 60 are excellent with most of the remaining being average.

ancl Desktop Pubhshing Journal

Summer 1991 Page 4

New Prinrat Factory Graphics Now Awallabie

Since you are reading the Sinclair Desktop Publishing Journal, then you must be an Update reader (if not, then it must be a bootleg copy--so get your Update subscription TODAY!) So I am sure you have already seen the ads for John McMichael’s collections of Print Factory graphics.but did you know he now offers a third graphics collection? That is right, three individual collections!

In a recent letter published in July-August SINC-LINK (the Toronto Users Group newsletter), Geurge Cary of Coloma, CA states "For an investment of $26.95 for the three disks" (of graphic callections), “you get about 445 graphics of various sizes which LOAD inte any of the Print Factory programs” George also states that, "If you buy (collections) £1 & £2 at $17.95 (US), you can buy £3 for $7 - all ppd."

What does this mean? continues_and therefore, the SDPJ will be around in 1992. a "Graphics" issue this fall!

It shows that desktop publishing support Look for

Dealer Spotlight Ed Grey Enterprises PO, Box 2186 Inglewood, CA 90305 Voice: (213) 759-7406 BBS. (213) 971-6260 (8/N/1)

Byte Power 1748 Meadowview Avenue Pickering, ONT LIV 368 Canada

John McMichael 1710 Palmer Drive Laramie, WY 82070

RMG Enterprises 1419 1/2 7th Street Oregon City, OR 97045 (S03) 655-7484

L

PIxX-Fx (from page 3)

things: First, enlarge it height wise, and second, give it some

to be LOADed to (FS or WS) or MOVEd to. The Final Screen and Working Screen can even be Swapped, which can be an extreamly useful feature. In

perspective. The original masthead is really a SCREENS which was created using Word-Masters Headliner program. Typeliner then doubles the size of the masthead SCREEN$ to

all, - produce what SCREENS/File 1 ' you see an the manipulation is front page of As mentioned, So, I took the the original qt original

version comes 7 masthead

with SCREENS SCREENS file LOADing and and doubled the SAVing via =" height of the

cassette in BASIC. Included are instructions on conerting the BASIC code to LOAD and SAVE to alternate {ie Disks, Wafers, etc.) storage devices. There are also disk versions of PIX-FX available for a slightly higher price over the original package.

As an example of what can be done as a PIX-FX beginner, my first real project was to take the SDPJ masthead and do two

area of the SCREEN$ which contained the letters themselves {see lefthand figure) Next, I used the Perspective utility to give the letters of the masthead that "Going Out into Space” look. 1 wanted to see how much was really lost or distorted during a Perspective operation. The result. is the SCREEN$ which appears on the righthand side.

was

Although some resolution

lost due to using one utility after another on the same screen, the end result was not bad at all. As a matter of fact, the two figures on this page are un-retouched (keep in mind they have also been converted by Typeliner to be placed on this page)

There are only a couple of quirks to the program which can be annoying. Although the TS2068 Left

pull-down menu options, the joystick cannot be used to control cursor positioning for

Craclai Deskin isha f=”

working window areas. The other strange operation of the prograrn is its need to go to the LOAD/Move Menu at the beginning of each operation as a “just in case you forgot" feature for setting up the SCREEN$s.

To say that PIX-FX is just another SCREENS utility is almost 100% off course. PIX-FX provides SCREEN$ manipulations which are near impossible to find in any other graphics program. It is a “Must Have". (For further information, contact Ed. Grey Enterprises at the address listed above)

Wihe Making Of tEniss Escsuse... All four pages of this issue were created using Ward-Master for text editing, Typeliner (a Word-Master utility) to format each page. PIX-FX was used to create the figures on page 4 and Quick-Screen (from Print Factory) and The Companion to create the “In This Issue" box on the front page. The article headers, IDEAS & DISCOVERIES were created using Pixel-Print

(honest!)

32

LETS READ T/S 2068 JLO DISKS WITH YOUR QL

Well, here it is. You can read Timex 2068 Oliger disks with a QL with nothing more then a disk interface and ToolKit II. This is made easy due to the simplicity of the methods used to store information on the 2068 JLO system. At this time and present configuration a "basic" read is all this set of procedures does. Working out a set of "conversions" for the way Sinclair Basic is stored becomes fairly easy once you can get a file into the QL.

Now for the PROCedure explanations.

DEF PROC QL, this let me "see" the structure of a QL disk. Working with ASCII (text) files made it somewhat easy to study the methods used to store files and how they are distributed on the side, track, and sectors of a QL disk. I was able to develop a "memory map" of a QL disk this way.

DEF PROC INN, this was used in part with the PROC QL to help control my peeking about the QL disks. 1 typed INN, answered the prompts, then typed in QL.

DEF PROC OPN, this asks you which drive to look at. Opens a RAM disk file, and "OPENs" the target disk. So far, in all the experimentation with this utility I have NOT harmed a 2068 disk at all. But it is best to work on a copy of your disk.

DEF PROC TIM, this is meaty. It will read a sector of the 2068 disk and print it to the screen. It then asks if you want to transfer the Material to the ram disk file, if so, then COPY the 10 sector block of “data" to the ram disk.

DEF PROC DISK_IT, does the actual copying of the track. Since I use the program "EDITOR SE" I use line 520 to print to the ram file the source track, side, and sector I was currently reading. It may be deleted if you wish.

DEF PROC AA & PDET, these just print information to the QL screen.

DEF PROC CLO, as far as the QL and my TRUMP card are concerned, this PROC was necessary. When you are done copying a file to the ram disk, it needs to be closed. The TRUMP card needs to see that the disk is "closed" the 2068 does not care.

DEF PROC REST, sets the drive heads to track, side, and sector 0, or "Parks" the drive heads if you need it.

These are the steps I use. So far, I am toying around with text files from MSCRIPT and TASWORD, and data files from PRO-FILE. For 2068 disks I type OPN (enter), then type TIM (enter), get the file(s) I am interested in, then CLO (enter).

Copy the ram file to a QL disk. Then load QUILL of EDITOR to work on the file to clean up and stray unwanted contents. This method "gets" all of a track (5120 bytes). So the file will have some "garbage" following any useable data to the end of the file. Usually just spaces or some such.

Experiment, use, enjoy, or just fool around with this. I believe that this can work on AERCO and LARKIN disks once you understand how they write to the disks. If you try this, you need to experiment with the FOR/NEXT loops in the PROC TIM.

100 110 120 130 140 150 160 170 180 190 200 210 220 230 240 250 260 270 280 290 300 310 320 330 340 350 360 370 380 390 400 410 420 430 440 450 460 470 480 490 500 510 520 530 540 550 560 570

DEFine PROCedure rest : GET #4\257,a$ : a$=’’ : END DEF ine DEF ine PROCedure opn

CLS : INPUT \\\‘Which drive 2? ( 1/2 ) ‘3dr

OPEN_NEW #3,ram]_2068 files : OPEN #4,’flp’&dr&’_*d2d’ END DEF ine

DEF ine PROCedure clo : CLOSE #3 : CLOSE #4 : END DEFine

DEF ine PROCedure aa : PRINT a$ : END DEFine

DEFine PROCedure ql

LOCal track , side , sector

inn

FOR track = 0 to trk-1

FOR side = 0 tol

FOR sector = 1 to 9

REMark rest

pdet

GET #4\sector+s ide+256+track*65536,a$ : aa

IF pause$=="y" THEN : PAUSE(-1) END FOR sector : END FOR side : END FOR track END DEF ine

DEF ine PROCedure tim REMark JLO DOS uses track 0, sectors 1-10 for CAT and LOADER software inn FOR track = 0 10 trk-1 FOR side = 0 10 1 FOR sector = 1 T0 2 REM rest pdet GET #4\sector+s ide+256+track*65536,a$ ; aa END FOR sector CLS #0 : PRINT #0 : INPUT #0,"Relocate this side and track ? ";ans$ IF ans$==’y’ THEN : disk_it END IF : CLS #0 CLS _: END FOR side : END FOR track END DEF ine

DEF ine PROCedure disk_it

FOR sector = 1 10 10

GET #4\sector+s idet256+track*65536, a$

PRINT #3,’sector ‘;sector, ‘track ‘;track,;’side ’;side\a$ END FOR sector

END DEFine

DEF ine PROCedure pdet : PRINT ‘sector ‘;sector,’track ’;track,;’side ’;side : END DEF ine

580 :

590 600 610 620 630 640 650

DEF ine PROCedure inn CLS : CSIZE 1,1 DIM(pause$(1) : INPUT \"PAUSE ? ";pause$ INPUT \ ’40 or 80 Tracks? ‘;trk IF trk <> 40 AND trk <> 80 THEN : GO TO 610 END IF CLS : CSIZE 0,0 END DEF ine

Ed Grey Enterprises P.O. Box 2186. INGLEwooD, CA 9030S

Info >> 213-759-7406 << Order SEASON'S GREETINGS

We ar Eo Grev ENTERPRISES WANT TO WISH ALL OF YOU, AND YOUR FAMILIES, THE VERY BEST AND SAFEST oF HouDAy Seasons, PLease REMEMBER THAT ALCOHOL ano GASOLINE oo nor mm Ler’s au Hope For PEACE in 1992,

JLO Disk I/F w/ SAFE Basic ......CALL

Tam prRoup to announce THAT Eo Grev EnteRPRISES I5 NOW A oIsTRIBUTOR FOR THE JLO (OurcerR) Disk InterFace For THE T/S2068, I+ CONTROLS UF TO FOUR 5.25" ano/or 3.5" OIsk DRIVES, AND IT LEAVES THE CARTRIDGE PORT FREE FOR YOUR SPECTRUM EMULATOR OR OTHER EPROM THe JLO Orsk I/F, AS welt AS ALL THE OTHER OLIGER HARDWARE, TS AVAILABLE AB BARE BOARDS (NO PARTS), KITS (BOARDS AND PARTS), OR FULLY ASSEMBLED AND TESTED, Turis 15 tHe EASIES O USE ano tHe EASTEST orsk system For THE C068, EULL SUPPORT ror JLO users 1S A REALITY, AND IT WILL CONTINUE. ALSO ASK ABOUT DISK DRIVES, CASES AND CABLES,

Seikosha SP-1000AS Printer ......879.00

THrs SERIAL PRINTER IS PERFECT FOR USE WITH THE QL, 285, oR ANY OTHER comeuTeR GiNcLUDING IBM comPaTIBLeS) wITH @ SERIAL PORT. BoTH IBM

ano EPSON coves ARE ComPATIELe WITH THE SFOLOOOAS. 100/24 ces (oRaFT/NLO).

EMEX 2400EC Modems w/ MNP4 — $89.00

300/1200/2400 Baup, 100% Haves compariste, incLUDES MNP Level 4 ERROR CORRECTION FOR ERROR FREE FILE TRANSFERS, Staroaro RS-232 connector

SPECTERM-64 (TS-4.1) .......... $12.50

THe BEST movem sortware For tHe T/S2068. 64 coLuMN oIsPLar, XMODEM, @ND FULL SIZE PRINTER DRIVER PRE INCLUDED, CompatiaLe with COBO of Haves (comPatiele? mopems, AVAILABLE CN TAPE OR POPULAR DISK FORMATS.

Catalogs, Information, and Other Things .

CA must ano B2S% y FOR A

Timex, aro/om CP/M catecos SUPPORT THE BUSINESSES THAT SUPPORT YOU!

Call The Grey Hatter BBS & RCP/M 213-971-6260

CABLE COLUMN By Bill Cable

ARCHIVE SERIES PART 6: FIND,SSEARCH,CONTINUE COMMANDS

I continue my coverage of ARCHIVE with some of fun commands that allow us to find things in a database. Before getting into that ] want to present an updated version of a chart giving some time comparisons between QLs and PCs. Some may remember this chart from the April 1990 issue of UPDATE. | recently had a chance to time a QL equipped with a Gold Card and thought others might find the comparisons interesting.

The chart was made by running my ARCHIVE program. DBEasy, on both the QL and PC and timing the various tasks. The PC and QL versions of DBEasy are written in the respective OL and PC versions of the ARCHIVE language and the code is very similar. This should not be considered the last word in comparisons because there are some differences in the software. Still it is nice to have numeric comparisons. The numbers are time in seconds.

DBEay QL PC XT+ AT AT QLGOLD Task 7Mhz 4Mhz 8Mhz 10Mhz 20Mhz 16Mhz Load Up 69 94 ST 48 10 22 Find "xxx" 15 17 1 9 2 4

Step 10 58 50 19 12) 8 20 records

Display 17 20 7 #5 2 4

New Page

Sumon 13. 9 4 2 I 2 population

Order by 13 18 9 7 1 6 country _ =

Locate 4 4 2 2 1 1 ‘SWEDEN’

Select “BUROPE’

19

Note that the QL/Gold Card is about 4 times faster than a regular QL. Also a QL/Gold Card is pretty comparable and sometimes faster than a 10Mhz AT machine. The Gold Card makes the QL a very respectable computer by current standards of processor power and many think QDOS is still the best operating system around. Before the Gold Card. it

36

was easier to abandon the QL for a PC. Now it is much harder to decide. There are strong arguments both ways as Al Keng brought up last issue. Some like myself will work in both worlds. | don’t have my own Gold Card yet but will get one as soon as finances allow.

FINDING THINGS IN A DATABASE

Locating needed information in a database is extremely important. The main reason we structure our information in database form is so we can find it again quickly on demand. ARCHIVE provides two means of ‘slow’ searching for information - FIND and SEARCH. To use either one we specify the command with a condition or value to match on and ARCHIVE will start at the beginning of the database testing record by record until a match is made or the end of the file is reached. The match becomes the current record. We are also provided with an associated command, CONTINUE, which will start up the last FIND or SEARCH (whichever was most recent) from the next record after the current record (not the beginning). It is a way to continue a SEARCH or FIND after a match so the next match can be found. There is also a numeric function provided, FOUND(), which is 1 or 0 depending on whether the most recent FIND, SEARCH, or CONTINUE had a successful match.

PREPARATION In the description below | will underline what you should enter to participate in the examples. In preparation start up ARCHIVE and access the supplied GAZET_DBF with the LOOK command and display it. look “flgazet"<ENTER> = {}=device, mdv1_, etc displaysENTER>

FIND COMMAND The find command is a very simple and very thorough way to find text in a database. Its drawbacks are its speed and its indiscriminate nature. Since it must compare all text in the database when trying to make a match, it takes time. If the database is small then find works very well. If the database is large and what you are looking for is near the end then it could take some time before the FIND makes a match. The FIND command is not case sensitive (ignores upper and lower case differences). It does not work on numeric fields. It has the form :

find (text in quotes or text variable)}<ENTER> Try these examples with the GAZET database :

find “london"<ENTER>

find <ENTER> ARCHIVE puts quotes parissENTER>

let a$="south"<ENTER> 7 find a$<ENTER> use variable for text continue<ENTER> find next “south”

find "xxx" ><ENTER> — something not there

print foundO<ENTER> see found()=0 display<ENTER> restore database display

SEARCH COMMAND The SEARCH command is a little more complex to use than the FIND command but can be more specific and maybe faster. It is still a slow way to find things in a large database. The SEARCH command cares about upper and Jower case in text but case sensitivity can be suppressed if desired. The SEARCH command has the following form: search (numeric expression)<ENTER> When a search is initiated ARCHIVE goes to the beginning of the file and checks record by record until the numeric expression is true (nonzero) and stops or until it reaches the end of the database. The numeric expression is usually a logical expression (evaluating to zero or nonzero) involving one or more fields of the database. Because complex logical expressions can be used in the SEARCH command it is a very important database tool. Try the examples below.

search continent$="africa"<ENTER> fails print foundQ<ENTER> equals 0 africa not upper case

display<ENTER> restore database display search continent$="AFRICA"<ENTER> — now works print foundO<ENTER> equals 1 verifies success display<ENTER> restore screen

search continent$="AFRICA" and pop>20<ENTER> continue <ENTER> find next one <F5><ENTER> save on typing <F5><ENTER> look for more

As you can see we can fairly rapidly find all countries in

africa which have a population of more than 20 million.

SEARCH unlike FIND also works with numeric fields. search pop>S0 and pop<70<ENTER>

1 would recommend becoming familiar with the ARCHIVE functions as they allow much more flexibility with the SEARCH command and many other commands. Look up each function used below in your ARCHIVE manual to learn more about it. If you see an unfamiliar expressing followed by something in parenthesis then you have found an ARCHIVE function. ARCHIVE does not allow user defined functions so the only ones that exist are listed at

the end of the ARCHIVE section of your QL manual. ARCHIVE functions evaluate either to a text value (string) or a numeric value. Numeric values can be used as logical type where zero is false and nonzero is true. Below | illustrate some common uses for functions within the SEARCH command,

Suppress case sensitivity

search lower{continem$.="africh”“sENTERe

‘ search Search for text within field

while f ORR nce ile<ENTE Use string splicing

search continent$(1)="A"<ENTER> Note that if a record had no entry for the continent$ field we would get an error since continent{(1) does not exist for that record. This would find any empty continent$ fields:

search continent$=""<ENTER> or

search len(continent$)=0<ENTER>

CONTINUE COMMAND

As mentioned above the CONTINUE command allows for continuing on after a SEARCH or FIND match so the next match can be found. If for some reason you change your current record after something was found and then did a CONTINUE, ARCHIVE will begin the CONTINUE on the record following your current record (not the record found). You can repeat continue as many times as desired to work your way through the database. After you reach the last match your current record will not change because the CONTINUE could not make any more matches. You have no direct evidence of a SEARCH, FIND, or CONTINUE failure except that the current record doesn’t change. The value of the FOUND() function always indicates the outcome by its value if you check it. FOUND(=0 then failure or FOUND()=1 success.

Next time fast finds with ORDER and LOCATE. Until then Happy Archiving!

BREAK INTO DATABASE COMPUTING WITH DBEasy DBEasy is my ARCHIVE front-end program for painless database work ,

Featured in a 4 page review by Bryan Davies in the May 91 QL World Only $21.95 ppd in the US & Canada or $24.50 ppd elsewhere

A $99.00 SPECIAL FOR THOSE WHO WORK WITH BOTH QLs AND PCs PSION’s PC-FOUR ; QUILL, ABACUS, EASEL, ARCHIVE for the PC with manual and tutor disk Plus both the QL and PC versions of my DBEasy program included free on 5.25" or 3.5"

Order from : Wood and Wind Computing, RR3 Box 92, Cornish, NH 03745 603-675-2218

EEC LTD 18-21 MISBOURNE HOUSE, CHILTERN HILL. CHALPONT ST PETER, BUCKS. SL9 9UE. TEL 0753 888866. FAX 0753 887149.

JUNE 1993 QOL COMPUTER PRICE LIST. PRICES INCLUDE 17.5% VAT.

Sinclair QL COMPUTERS QL_JM COMPLETE Kit FULLY TESTED AND WITH 6 MONTHS WARRANTY. 2.35 S/WARE; QUILL- WORD PROCESSOR, ABACUS- SPREAD SHEET, ARCHIVE- RECORDS, & EASEL~- BUSINESS GRAPHICS. USER GUIDE. ONE YEAR'S QUANTA M/SHIP (400+ Library Programs, most FREE

Help, Newsletters, Meetings). QUANTA MEMBERS CAN OBTAIN A £5 DISCOUNT 125. * The JM QL can run all Programs available for the QL System * QL_JS COMPLETE KIT AS DESCRIBED ABOVE BUT WITH A JS_ROM 150. JM BACKUP Q& COMPRISING THE QL COMPUTER & POWER SUPPLY ONLY 90.

JS BACKUP Qt THE QL COMPUTER, & POWER SUPPLY, BUT WITH A JS_ROM 115.

ACCESSORIES & SPARES

PHILIPS 141n EGA COLOUR MONITOR £220. QL POWER SUPPLY UNIT SINCLAIR 14in CGA COLOUR MONITOR £120. CENTRONICS PRINTER I/FACE QL PSION SOFTWARE 2.35 WALLET £20, or SEPARATE PROGRAMS each JOYSTICKS with QL LEAD ... .. £12. DISK DRIVE TO I/FACE LEAD TV ox NETWORK LEADS... . oe £3. LEAD FOR TWO DRIVES KEYBOARD MEMBRANE & Instructions £9.50. SERIAL PRINTER LEAD. . . QL TOP & BOTTOM CASE (including Keys only) .........464. I¢cs- ZX 8301 or Z2X8302 £9. 8049 (IPC) £6. MC 1377 £5. MC68006 UNIVERSAL DISK DRIVE. 3.5 imb, CASED WITH BUILT-IN POWER SUPPLY

: TWO DISK DRIVES £ EPSON _SMD-480L 3.5 imb DISK DRIVE UNIT with FRONT BEZEL. .. .

TANDATA MODEMS Q-MOD, & Q-CONNECT, £15ea. Q-CALL £25. or SET PC_KEYBOARD INTERFACE FOR QL INTERNAL FITTING. . . .... 2... CASE & LEAD FOR EXTERNAL I/F FITTING. (Recommended)

Pc_ KEYBOARD EPSON AT TYPE, 102 KEYS WITH STD CONNECTER (Swedish with UK overlay) AS ABOVE WITH UK KEYS

MOUSE for QL £19. QIMI MOUSE INTERFACE £52. or BOTH £70.

oo. oo.

60. oo.

£12. £27. £12. £12. £14. £12.

£6. £12. £75. 140. £39. £40. £75. £17. £25. £35.

MANNESMANN MT81_ CENTRONICS D/MATRIX PRINTER. 130cps, 24cps NLQ. £130.

SOFTWARE HOME FINANCE £18. QL GAMES CARTRIDGE £9. QL BRIDGE II £6. TASPRINT STYLE-WRITER & TASPRINT SCREEN COPIER, Both for £6.

Q_LIBERATOR SuperBASIC COMPILER (Disk) £60. Q_LIBERATOR BUDGET

VERSION (for MDV) £30. QLOAD SuperBASIC QUICKLOADER with QREF PROGRAMMING UTILITY (for MDV) £15. FILE TRANSFER UTILITIES (Between QL, PC, & others).

DiscOVER £20. Multi-DiscOVER £30. TexTIDY £15. BUSINESS SOFTWARE (Suitable for standard QLs). SMALL TRADERS PACK £24.95. INVOICER £19.95. GENERAL LEDGER £19.95. SET OF THREE £50. QL MAIL MERGER £14.95. FILER PACK £14.95. Also STOCK ACCOUNTING

£39.95 (For Expanded Qls). HOME BANKER PLUS £19.35.

MICRODRIVE CARTRIDGES

CARTRIDGES NEW. ..... . e.g WALLETS of FOUR for £12.00 PLASTIC STORAGE BOX INCLUDING 20 CARTRIDGES . . » . . £55.00 * UNUSED PROGRAM CARTRIDGES ...... WALLETS of POUR for £9.00 * (NEED FORMATTING) THREE WALLETS for £24.00

PRICES INCLUDE 17.5% VAT. TERMS CWO, ACCESS or VISA. MINIMUM ORDER £10. CARRIAGE £8.00 FOR PRINTERS, QLs & D/DRIVES (OVERSEAS £20.00). OTHER ITEMS £3.00 (OVERSEAS £6.00)

PRODUCTS SUBJECT TO AVAILABILITY AT TIME OF ORDER, & 30-DAYS WARRANTY

UNLESS STATED. SOME ITEMS MAYBE RECONDITIONED & TESTED.

(THIS LEAFLET WAS PRISTED WITH A QL_& QUILL AND A MANHESMANH NTB1)

vice Q May 1

K Compute

Prices do not include snipping and handling charges. : Shipping charges will vary depending upon weight, distance and method. 1 will snip vi the cheapest method unless you specify otherwise.

The minimum hanaiing charge tor shipping is $2.00. There may also be @ surcharge for repairing modifisd equipment. The minimum surcharge is Oo,

Definition of modified equipment: Any Circuitry changes on the inside of the equipment case that involved the addition of components, wires, integrated circuits, or hardware. Customers who send in computer equipment that has had modifications done to it, which change the manufacturer’s Original design, are subject to paying a surcharge.

'

jibe repaired for $5.90 each + parts & shipping:

k Ram Pack Any MEMOTECH Module ZEBRA TALKER MIRACLE Centronics

Bz he following ite. TS- 1000 ZX-81

j 2. The following it $10.00 each + parts & shipping: TS~ 1500 aS nose ZX°BO Any BYTE=BACK Module

TS-2040 2-310 AERCO 2068 Centronics

w

The following items wili be repaired tor $15.00 ea + parts. & shipping: TS-2068 SPECTRUM A&J Microdrive LARKEN 2068 FDI CUMANA FDI LARKEN 1000 FDL CST FDI

MIRACLE 512K $.&. shipping:

will be repaired for

tb par.

ROTRONICS Wafadrive

5. The following

items will be repai for. Ee SINCLAIR QL AERCO 1000 Centronics AERCO 2068 FDI TRUMP CARD ZEBRA 2068 FOD System AERCO L000 FOE

For repairing add-on modules, printers, monitors, or other computerized equipment not listed above - write for a price quote for the items you want repaired. I als i ATARI. COMMODUR 0, TL, OSBORNE, TRS-80, , and [8M compatibles.

For modifying or upgrading any computer or add-on module - write for a price quote , Customers can expect a 4-6 week turnaround on most repair jobs. Upgrades and problem cases may take longer.

You will be notified of any unusual delays oF sive repair costs.

(over )

39

Tors

struct one nding ip compute

1. For repairs, please use a the problem you are encountering, intermittent. List any sottware or Also list any modification upgrades, information for doing eac

separ a

problem.

For please enclose or

source of

Sr You may include a check or mone You will be notified if a balance 1 4. Carefully pack and ship your eq parcel post. UPS is sometimes cheap DAN ELL R11, 8 CABOOL,

Phone (417) 469-4571 everyday 8:00 If there no answer, try another can’t always hear the phone. Please

1s

Pleqguapment:

ate sheet of paper to describe in detail no whether or not the problem is hardware that are associated with the that been done to your equipment the magazine article or other

is have specity h Uparade y order repair costs be refunded. UPS

a deposit for amounts the address especially with heavy

will below vi

Over to

due

juipment a or

items

er,

1oT) Ox 11? MO 65689

AM till 8:00 PM Central time. time. I’m busy building a log house and

VISA / MASTERCARD accepted with 4% (Charge customers must provide Acct

do not call after 8:00 PM Central time.

surcharge.

#, expiration date, and name on card.)

FOR SALE: A Super OL SYSTEM Components ______Used Value_ QL Canmputer $150.00

A very stable and reliable QL.

Notes

Latest

MGUK ROM with built in Speed Screen and

extra tools. Both Micro drives work perfectly.

Coleco Power Supply $85.00 The heavy duty power supply Modification by Dan Elliott provides rock stable operation.

Not a single power crash in past year:

Trump Card $250.00 Increases RAM to 896K. Disk Drive Interface. Has Tool Kits- V1.20 and Care Jump V2.11.

2 Disk Drives $150.00 Two 5 1/4" 80 track DSDD in Beige cabinet.

Magnevox 14" $200.00 Like New

RGB Color Monitor

Centronics Interface $30.00 Interface for printers

System Value= $865.00 SALE

PRICE= $650.00 $02 whole system.

Entire

e system is operating A-OK and ready

to ship with all cabling.

Includes software library of many titles too numerous to list costing over $800.

Call to reserve:

Bill Jones, Tel: 904 871 4513

IBM ARCHIVE to 288 DIARY: By Chris Fenn

Here is a small procedure that will let you EXPORT a file from PSION’s ARCHIVE Program that will then load into the 2838's builtin DIARY program. The procedure was written on the IBM clone I use at work, but it should work on the QL’s version of ARCHIVE as well. 2

This proc is intended to be used on data files that are dated, so when they are loaded into the 288's DIARY program each entry will fall into it's own date slot.

Part of my responsibility at work is to insure that work orders that come into the shop get completed in a timely fashion. We could have over 100 work orders active at any given time, all with varying due dates. Although | can achieve this on the desktop computer, sometimes it is very handy to be able to go into the production area armed with the info. in hand, and the 288's DIARY program makes it very easy to manipulate dated info. and create lists & reports.

You will have to customise the proc to suit your particular needs and deal with your own field names.

proc zadiary

reset

select status$="ACTIVE™

rem selects active workorders

first

spoolon “ZACTIVE.DIA® export

rem prints data to the text file ZACTIVE DIA on disk

while not eof() rem continue until the end of the file is reached let zdate$=date$(4 to 6)+date$( to 3)+date$(7 to 10) ‘ rem converts the DATE(2) format to the European format

iprint “%-+zdate$ rem this is what DIARY looks for to know where it goes iprint “CLIENT: *;client$ iprint “JOB* “;job$;- PO* “:po$;- PART* *;partno$ iprint “DESCRIPTION: “;desc$ iprint “SHIP “;shpqty;” PCS. OF ~;type$;” DUE “;duedate$ rem print the info. iprint next

41

endwhile spooloff:rem close file endproc

It does not matter if the entrys are not arranged in chronological order as DIARY will rearrange them.

FIELD variables=status$,date$,client$,job$,po$,partno$,desc$,shpqty, type$.duedate$ (date$ must be in date(2) format)

After the file is transfered to the 288 using the PC link program (or it’s QL counterpart), load it into PIPEDREAM first and resave it using the PLAIN TEXT option. It can now be loaded into DIARY but it might be a good idea to resave it from DIARY.

This is how the records look when converted & loaded into DIARY:

ACME SLOT MACHINES

JOB* 3375 PO* 4569 PART* RJW ILC-3

DESCRIPTION: YELLOW

SHIP 100 PCS. OF REEL GLASS DUE 08/23/1988 ;

OMA 88S 513-203-1754

Ed G Tey Enterprises : P Computertest *

QUALITY COMPUTER PADDUCTS = Dagon Micra Computer Asscctation, Tne.

Forth interest Group

Sales and Information: ; On Line Support: ! Dayton T/S Users Group (213) 759-7406 The Grey Matter BBS | Data Bus P.O, Box #2186 213-9716260 (CALAN) Inolewood, Ch 90008, GARY M. GANGER oa, Seeley ene . , lome Phone Hardware ¢ Software . 7 tew C zal fs le, Ohio Home Phong

42

The Qlold_s}LAW Project By Al Feng

Qabbage was once the vegetable of royalty. Somewhere along the way it became peasant food. Now, qabbage is classified as a health(y) food ...

Having said that via the maddingly silent QLatter of a SINCLAIR keyboard (no, I haven't gotten around to getting a Falkenberg keyboard interface, yet), when last we chatted I had lamented the tardiness (for me) of the GOLD CARD and its current high cost (in US terms) -- unintentionally, I'm sure, some of my previous words were expunged, making the opening paragraph a bit non-sensical ... So be it... Perhaps the editor thought the entire contents was non-sense, and so eliminated a few of the words to make it sound a bit off (I think there may be a pun here, but you decide).

The distribution by Sohail Bhatti's QLAW questionnaire has netted a yield of only a 2% response (according to Dennis Briggs, September 1991 QUANTA, page 16). Unfortunately, Dennis fails to indicate the total basis and/or geographic distribution for this value. Does this mean that out of perhaps 1,000 (minimum estimate of QL WORLD's distribution + additional mailings to User Groups), only 20 people mailed responses? Or, does number indicate subscription reponses? Is Dennis counting the insert which was included in the July 1991 QUANTA? That certainly ups the starting count somewhat. :

Well, no matter ...

At this point, the best hope that QL users have for continuation of the species is for MIRACLE to either wrest (i.e., "buy") patents and copyrights from AMSTRAD; or, for AMSTRAD, MIRACLE and QVIEW to form a partnership by which AMSTRAD takes advantage of MIRACLE's cumulative hardware technology, and QVIEW's firmware technology (i.e., MINERVA); and, the lesser two take advantage of AMSTRAD's distribution and production capabilities.

Why am I suggesting some form of detente? What exactly might the GOLD CARD mean to the QL user?

What I didn't know before (a lot ... about many subjects), but what I know about the GOLD CARD that I didn't know before (especially) was that it dumped the QL's operating system into what is referred to as SHADOW RAM. Using SHADOW RAM ‘is a common practice with high-speed PC's to move the firmware (maintained within slower EPROMs) into the computer's faster RAM.

What this means, is that the original QL has become little more than an I/O expansion card for the diminutively sized GOLD CARD.

Now, if AMSTRAD, MIRACLE, and QVIEW could get together, then a third generation QL could easily be made to fit into a case no larger than the original QL for not much more than the original QL. Again, feasibility of such speculation is contingent on AMSTRAD's distribution and production clout.

43

Unfortunately, neither QLAW (due to external apathy as evidenced by the apparently small response to the questionnaire) nor QUANTA (due to internal apathy on the part of QUANTA's half-hearted board) can provide the appropriate "third horse" for a successful troika that AMSTRAD can/must provide for the QL and QDOS to survive this decade as a viable computing platform.

Now, die-hard QL users should realize that I may yet get a GOLD CARD (someday) ... I'll get a GOLD CARD (sooner) if someone out there wants to give me about $300 for my MIRACLE 512K EXPANDERAM and DISK CARD interface. Otherwise, I'm afraid that the $500+ price is still too dear for the likes of me. And, my next $500 of computing-dollars will probably go toward a portable computer (so I can peck away at the keyboard away from an AC outlet) or an AT-class clone which will give me the effective speed of the GOLD CARD for another universe of out-of-the-box applications ...

«+. My pronouncements should not be taken as a "rat" surveying the deck of a sinking ship, but rather an advisement to those with significant financial interest as to where I [YOUR PAL, AL] would rather spend my future computing dollars. That is, it should be taken as advice to MIRACLE, et al, that they had better come to terms with AMSTRAD if they don't want to be last weekend's leftover QOLD_SLAW. a

Let's hope for a healthy future for the QL and its users ...

HAPPY TRAILS, AND COMPUTING, TO YOU!

COMMENTS FROM THE EDITOR Frank W. Davis

I have to say that I do resent the statement that some of the words were "expunged" from Al Fengs article of last issue. Not one word was left off of the DOC file sent to me on disk. As I have stated previously in the I.S.T.U.G. newsletter, of which I also edit, I do not want to get involved in ANY squabbles between any TS2068, QL or Z88 user, user group, club, dealer, etc. The purpose of this magazine is to publish articles that are of interest and educational to the user, not to foster ill feelings. We are willing to look at the opinions of all and hope to publish accurately to the best of the ability of the writers and of ourselves. I must also state that I do not agree that a consortium of AMSTRAD, MIRACLE AND QVIEW are the QL’s last hope. Last, but not least, I have a Gold Card and love the user power it allows me as a user, with the extra memory and speed.

44

NEWSREPORT ON THE COMPUTERFEST by E. P. Wannum

All of our readers will have noticed that Frank and Carol have been giving heavy support to the Computerfest at Dayton the end of August. As I attended the Fest I thought a few words would be appropriate. This is what your roving reporter and poet found. Speaking of poetry, are any of you interested in programs that will write poetry for you?

What can be said about the Dayton Computerfest? I am glad I attended, as it was my first experience with a show of this size and I was pleasantly surprised in most ways. Parking was easy and the exhibit hall was not too far off the beaten’ track. What I missed most that I had enjoyed at the Midwest Sinclair Shows of the past was having the show at the motel you were staying at. It is really nice when you want to take a break from a show just to walk down a hall to your room. Or to. invite someone back to your room to try out a new piece of hardware or software you just picked up. Pleasant memories of past shows! Fear not...this does not mean I did not enjoy Dayton, just reminiscing.

The official tally of all who went to the show was 15,414, according to the loudspeaker near the end of the second day. There was a large assortment of user groups there, the largest being the Commodore and Amiga user groups (they seem to out number the IBM user groups!). The number of Sinclair groups present was about equal to the number of Mac groups there, with a smattering of Radio Shack, Zenith and Atari. The vast majority ef professional tables were IBM hardware and software, along with those selling monitors, disks, drives, etc. that were useable on most any system. I even found a Chiropractor’ booth giving diagnoses and taking appointments. Too bad they were not giving adjustments; they would have made a small fortune.

Who was there? Well, there was Ruth Fegley, Audrey and Bob Curnutt and Dave Bennett from the CATS Group had a booth. They were even helping out Mark Stuber of Sharp’s by selling QL related items for him, so he could tend to his IBM compatible booth. He was taking orders for the new Gold Card for the QL at $599 each.

Neal Schultz and Bill Heberlein were there representing SMUG and operating a booth to sell assorted hardware and software. This is the first show I have seen them at without Dick Cultice. They always seemed like the three musketeers before, so I hope to see him again at the next show.

Bill Angel of ISTUG was there flea marketing used QL software and hardware. ISTUG also had a booth there and put out free samples of their newsletter, the International QL Report, EMSoft’s sales flyer, and flyers for QUANTA. Paul Holmgren’, the North American QUANTA Librarian was there. I have to really thank him for the service he has provided for me. The QL library they have is really great. For those interested in finding out more , then write him at 5231 Wilton Wood Court, Indianapolis, Indiana 46254.

Steve Spalding was there, selling a lot (and I mean a lot!) of Spectrum Software, all of it on tape. With him was a guy named Keith Watson of 41634 Amberly Drive, Mt. Clemens, Michigan 48044, who has developed an alternative DOS for the Aerco Disk Interface for the TS2068.

Bob Swoger and a guy named John (last name unknown) were there representing CATUG. I sure wished that Al Feng had been

45

there, as I have really admired the work he has done to develop QL software here in the States.

Carol Davis, Frank Davis and Paul Holmgren were there to represent Mechanical Affinity and sell TS2068, TS1000 and a_ lot of QL hardware and software. They seemed to be the busiest Sinclair booth at the show. They were also taking orders for the new GOLD CARD for the QL. They are still taking orders for them and | believe that the price is 8500 plus $10 for postage and handling. I think this is the cheapest U.S. price.

Carol and Frank Davis were also there selling new copies of The QL Survivors Guide, of which I recently got a copy. For a mere $5.00 (plus $2.00 P & H if by mail) I now know where to goa for all the known software, hardware, publications, users groups and repair facilities for the QL. Not just in the States, but around the world. They said they were working on the October issue of UPDATE Magazine. This is the first issue of the second year they have published the magazine, and the Sth total year for the magazine. When asked what they needed from their readers, Frank said," People need to renew their subscriptions, as all those who have not done so at this time are expired, and we also need more Z88 writers and hardware oriented articles." So folks, have you sent in your renewal...the first issue of the new subscription year is now in your hands. The Davis family has made a commitment to you, so make yours to them, by subscribing, getting friends to subscribe and by providing material to help your fellow computer user to get more out of his or her investment. We have had some fine writers, such as Bob Hartung, Peter Hale, Bill Cable, David Solly, Bob Mitchell, Al Feng, Paul Holmgren, Bill Woodward, Mike Felerski, Mike Fink, Dave Bennett, former Editor Bill Jones, Mort Binstock..-and I just know I have left out a few! Add your name to this list. Larry Crawford, Bill Ferrebee have some material promised for us for the next issue, and we may get a chance to hear back from Larry Kenny and Tim Stoddard (I have learned a lot from these two in the past).

Will there be another Sinclair sub-show in Dayton next year? Well I have looked at the various newsletters our user group gets and seen other write ups on the show. Some gave a very negative report, full of inaccurate information. One would have to wonder if they were there at all, except that I saw them. The way various people perceive the same event has always stumped the. philosophers of all ages. There was no_way to accurately tell how many of the people at the show were there who were Sinclair users, but I saw more than some newsletters reported, and these were people 1 knew by name! If it seems I am _ taking some people to task, allow me to assure you this is my last word on the subject. It just seems to me that when I hear of various user groups bickering over who has the best newsletter, or the content of another groups newsletter, or getting offended for being called a user group rather than a Club, or _ personal verbal (or written) attacks from one programmer to another....well. Let us all resolve to eliminate this pettiness from our lives, otherwise we stand to look as ridiculous as Senate hearing into Ethics. We have many more years of use of our computers, new programs, new hardware. The only way to kill this off, is by BEING OUR OWN WORST ENEMY.

Forgive me for preaching. Write to me or to the Davis family if you have any suggestions on how to improve the magazine, or you have articles to submit,or if you are in need of technical assistance.

46

The Z8& and Telecommunications by Dave Eennett

The Z&8 is particularly well suited for communicating to modems and other computers. A serial port which communicates up to 38,400 baud, a VT52 terminal program and a dedicated file transfer utility are included with the stock 288. The Z88 also weighs only 2 pounds and is easily transported right next to the device you want to communicate with.

My Z88 is mainly used to talk to a pocket modem and a QL. 288 files are archived on a QL disk, I also occasionally communicate with PCs at work and other 288s.

I have designed and built cables to communicate with the QL, PCs and other Z88s. 1 built the modem cable from recommended pinouts by Cambridge.

The QL cable is as follows: Z88 QL SER2 2 3 3 2 1-4 4 15: 5 6 6 T. (a V8, 8 {<9 9

I have tried several other designs for a Z88 - QL cable but have not found a cable that works as well for transfering files

What I use to transfer files are Q_Link for the QL and Z88COM for the Z88. Q_Link is a shareware terminal program from Harvey Taylor. It includes CRC and Checksum xmodem as well as many other features. Z88COM is a publicly available terminal program from Phil Wheeler. It extends the built-in VT52 with checksum xmodem and some other features. Phil also operates the 288 BES in Los Angeles.

I basically connect the computers with the cable and run terminal programs which utilize xmodem on each machine. You set up

47

One machine to send and one to receive, Then you start the transfer ian both machines at the same time,

You can transfer ascii files without xmodem by various means but I prefer to use xmodem. It provides error checking in the transfer so you know the files are transfered OK. You can also transfer any type of file even machine language.

Z88 to PC and 288 to 288 transfers work similarly. On the PC I prefer to use PROCOMM. It is a powerful program and extremely easy to use. I would like to see it made available for the QL. For Z88 to 288 transfers I am using Z868COM on both machines

The Z88 - PC and 288 - 288 cables are as follows

PC DB25

Z88 DBO

t

1

MONAMVSNW

There also is a variation on Z88COM called Link by Dave, Armstrong which turns the Z88 into a mini BBS. There are no message facilities but you can transfer files. All typing is done at a remote computer. The Z88 just sits there. It is similar to PROCOMMs Host Mode. It works well connected to a computer in the same room Modem facilities were removed from

this variation but you can connect to the modem and then switch to Link by hand. With this program you can transfer files with someone across town at a prearranged time. You could even transfer QL and 2068 files

There also is another program available for the Z86 called ZFU by Richard Haw. This is a utility which takes many files and archives them into one large file In the process it compresses the files so the resulting large file is much smaller. You can archive all the files in all the ram devices of the Z88 into one file and just backup that one file to your QL or whatever

The Z88 also works nicely with any Hayes compatible modem. Here are the official modem pinouts from Cambridge:

288 Modem

OMAIAWN

The Z88 includes a built-in VIS2 terminal emulator. It works quite nicely although you have to dial manually with Hayes AT commands. It is also easy to send and receive ascii files with just the built-in software. The built-in VT52 also connects quite nicely to a VAX mini computer once you tell the VAX you have a VT52 with 6 lines.

But I like Xmodem. A terminal program was developed in England which provides xmodem. The disadvantages of this program are its high cost and it also adds its own protocol in place of the VT52. The built-in VT52 works much better.

Fortunately Z88COM came out which provides xmodem but works in concert with the built-in VT52. Z68COM is also much cheaper. In most cases it is available for the cost of a download. Z88COM can also autodial and autologon to five systems, It has a message upload feature for sending text files. All in all it is a great

program. The latest I heard was that Cambridge just came out with a VT100 terminal program. I have not heard too much about this. The VT100 can display graphics from a remote IBM or VAX. It moves the cursor around your screen on command from the remote system. I am not too sure how well this will work on the 268 with its 8 line screen but it sounds interesting. The 288s portability and sheer connectivity to anything speaking RS232 make it a great little computer for telecommunications.

288 PIPEDREAM TIP

I have found that the <> R command in Pipedream is very powerful. Do some partial edit— ing of a paragraph. Now move your cursor to the top of the para- graph. Type <> R and the para- graph will appear the way you want it to. This was taken from the “HACKER”, the official news- letter of the Timex-Sinclair User Group of Las Vegas.

Z88 USER FINDS POWER SUPPLY

This tip comes from the above newsletter also, and is from one of their members by the name of Chris Fenn. He has come up with an alternative to the costly little AA batteries that seem to run down so fast and then have to be discarded. Radio Shack has come up with a heavy duty and rechargeable 6 Volt battery pack. It has 5 AMP hours If this is what you need then check it out. The part # is 23-185. The normal cost is $14.95, but has been found on sale at $9.88. This May be the answer to when you are on the go.

438

equsronen

. e ° Pte t eee, Se Veht- Ss eo ws wo wo LY vow | UU bo -s ow £ Logo 39. 9 FC BD LEN UR HO C e OI 2 cc te Sosy) Meo ~ vcccy tH OMNRKHOW my wHaveny 3 “acwe~ we o mau ‘ SCNOCHCUL Bnew crerererere) QO #9 9M CUBDOQ c>d~R0NHN oO aes ow EA CU 1 300mm wey fan ein wc - wR GevecAmMo CO MMOL CH Ax Ae 1 Ld Drew F owd UV & nO-s £ we Yvords ” TOOK NVOAUON ObnvGHD VYYC +O EX~YO YinoUveEyH U bP BEY Of CU EF RVHVUYH AED OH -CmCeNO Lv o ctetet “fF Ow esen ww Lene me ~HUeCOM> WG 1 ShHewsnee § | oMCCeAO~awuN UWan va UO HDOG AVE $V CHD OAwUSOGNO 1 UL 0 MnO I ACLOCM Eussve wamnvce UD VED WODCS6~yCcm CHOoWL feo fcovus wo vo | oc OMALMYIO CHAY HCudD o VEUE We me VI ZUCMHVEY WUHHHHD Law S-vary & fF LOYYU ve LoCHODEMoMOW Cc c ANOMNORO LCEWUewHanVUM wwe 35 fey VB PHsVOWsUICwWH Fo mULD CndVDd 3 Of\4 nDOOO ” POUINMVO AVCLERLAY BHD weraLOWy 1 wcabvcuanc § > snuvce-—- ocfuen CHE S, iashahehehated VECO engue vowsILLnCw AOO22 IeCMVOE Ydu 1 TH BL LOnadeY SUOURnUaaY e Se Radiaabatabored DB -2adur cc O ELC Hew Ono & UD and Zo>s0 €0 w¥C ARLNCH va wCwuccr> vo voonononooe Ceo \YONe>bectnaener eu TD a bso “Cc YOwN SAOUUAM ES YHONE VAC CUUn a OVD fo LHe VOCLT HOC yw BY20 FP -mvwy F CL VEO VHC mem IOCMAL a EBLEELSI Se we Wang woowucHan He Of+-¢d woCe | vowsy BeCe 83 LIC vO wD . VADHOOOMs Zune VU OL L Wnman Levpled sche | Con BYO OMe HUYGA UOw® 7 PRODVADPBVBSL-w 9 OXD Vw ~oxXe s eNewr Cou By a ee ed to ~ves wo caw 2eLe cA woodgadoadouLn SDVYND YOUMOM HY s9d wH¥O £XH > Lammramos oe 1 accmarucus oLowrus wy a wt g PS -nllacwavo SUCK OY JAW Yad fcvc ~ O scot wor cH-HBavNow xa w3 wy ¢ UCM LC YEDDA Hn ZHI ON XA Ole ny AVL CE HOnruce D Age Comanace c VOD Aer doe Cen OD oo aM 1 wYLoOCUMUMdOol X 4 £O UML «ach MUAD VOU cad DP DOV OD COHLMUEMHIVEYE HVYYD 1VTMH nm XO ob VORP MH UUTE GY eee ~u Ded COAMCOOceow em avo OW Cow TCU wWoROWCUI COUN YOM DHOL LC sUaue 3 VaUrOSSOa 3B C ZVNC an YMes Law BYDOW OnYl HO VH ~COaHWarMMOCRYED wd OLD AY BH ZORW Vow > MOT ~Co Oo ~OOCI w oweNnDdDaoK ~ c LOSI e ¢ L- ANO AMOK ONAON be Ofeu BYE yoOto e0L MVOLY C1 wOOMYBY-K Ch CY M0 Aeownwandw CHU Fy tet GCUEOWOUL MMH UZQOWMUCHOOIEEYUC™ 1 OLS ain CIEOOS ExVOZAUZOVM W YUDCON UX ° s SOLYELL LUND In KODL Ae MODNUCMeH PRON ALDLHONHUS GCM COM CHOWL BuBoruY - DU uwer KH ASEOD> CLUMLGL CHW On Lemme? PRY HTN weds Quer be - » ony v re 2u Sowers wo Bae Gwe an “« ant c a Bh bee 3% Ceres anew : ve % - coh owuow vo> vu ago ee \ 30 cv . Obl w+ wo we wa wv cave re 9 ed aon SLoLd a BOO vod 2nM >xOowL cum -AZ00 Dt cman Ov) . i — & ewuur wr Beh vem Vow noe ORE Lo agin) % am 2 4 wo D0 “Fr AVN C VenmUcee da CHccCaysn « t oy | = mm & cove av 2 o v SOR Cro Me Hiwunm ~an is ww — wee UH mmm Ye OM RN Dat “OD ovtu~re-oOWoNM~ LO aw ae is: 4 [= 5 — ~ a0ten 0 OV vu Baw CN ve Vago H3e =~ HLDMM Cc ) Ky Ei “So & Ys ware w al ue uit oon CHYVEOWS LROOY. We ond omy * an mw ar kb ovc 3°0 weed a Det MUN TCd>u V3Zarus-auey aor e| > eo igs AY —_—— YoI~v vo BOL ve Bel 1 HOnce> “Lw cage a> ke SB] wo a aT = = + on wane weld 7) pr elie 00 ve OLDY $LOCWVU enn as Ad 6 -” % i) Eee JD canon oo Len Lag an ON @ vowImMo © Bacevcrow lw El, 4 AY oG i oLerang. CN Ol Sou © AY comnd pooroe Smorvcy |G 8] 3D o o Ow Y > Coc “UBmnURMUuG Cus aw ar Oe vee at eeomty Vf Oo oH | O t 0 e iN i Va. oo HN oH ° aarcue wives vy emo [ee ol ZS om a or 8 Le mL UcH ne uel VN ot oe DVS BHGIZLOD Wavy Me a” Va Kw je3] (ee ed ee ee 0 8 nu ONY ca eemcomy Macc cHwr30n ars t 2s Fo 4s Es cmt VY cD OUOL mLM WL} #49 OND YAY HY) NUMC OHH DH VO © a4 N SS wt mF on 30 wRe ym MOL God cof“ £ E€DLAND secunne Duy ola ~ mom © cyvc to oF own own ny PXAOOLYO Ghende aceon cd be w =f D3B>"L >> au OvN ou De OW YL HOD UHOCs 1 mHDs ay i oy - mm FO = Ovow lwo an lao VO Yaw wOUMLCO MAUL GAL > 7 wy Ch. O putc wry Ole OCR Yon Ot Y OW HU wD “VOADEW™ Ww - Qh Tun . Mev Ac Mcv HOD Cc cu Kew vas ~~wwone a hak <ama-muc OF or & on 29 vxeuw Cw LCOMCDCD wc Ke HoewDexee TOR CON O TUR NUN Hav CLBcUvDERE «~dOncrOm s & = wNngKA LOWADLONRL OWL LEASH < = 3 asovve BOunoeusne Vranntara “A

PIY GIRIFES CO

£

FASOPRILTF ON

LFOR Cootarned 19 thrs arts led

LESEMLING

"XREF"’--A Review by Charles Dittell

A fascinating and useful program, this XREF, from PDQL~-written by Chas Dillon, author of "Notes on Psion’s QL Archive" (available through the

Quanta QL users” group), anda creative contributor of many QL software programs. The purpose of XREF is to enable Basic programmers to swiftly analyze, debug and improve their Basic programs. I received my program by

mail (from Sharpes, Inc.); one microdrive cartridge wrapped in foil, with no accompanying manual or information whatsoever! I inserted the cartridge in slot one, did a directory listing, and came up with an "xref doc" file, which I loaded into Quill and printed: lo!~-the instructions!

Using XREF is quite simple: load (but don™t run) your Basic program, then type "exec mdvl_xref_bin" (or if you ordered the floppy disc version, substitute "flp” for "mdv"); a series of questions appear, asking your program name, output of information to screen or printer (printer is suggested), location of program (mdv or flp>, and full report or "exceptions" (more on this later). After answering all questions, XREF examines your program line by line, and finally, sorts all variables and begins its printout.

The information you receive is 1) general statistics (total number of variable names, buffer size, and related information), 2) user defined variables (their name and line numbers where they appear, as well as codes for which line numbers on which they are dimensioned, assigned, etc., 3) number of times system commands were used, and «I believe) most importantly, 4) the "exceptions" report: a listing of variables (and associated information, including line numbers) where problems may exist. It is this last area where you might find variables defined but not used or used but (apparently) not defined.

XREF is especially useful for Basic programs of more than a hundred lines or so; I used it with an 1100-line inventory program, and got a 7-page printout, which included 3 variables I had assigned but never used--it was asnap to find the variables and delete them. It also pointed out that I had set the "mode" variable more often than necessary, and I had mis-used the "con" (console) variable!

Problems? Just a couple of insignificant ones--all references within Basic programs to "MDV1_", "MDV2_", “FLP (1_ or 2_)", "SCR", "con", or "ram’ are automatically considered possible problems. A conventionally printed manual would have been nice, too

The usefulness of XREF to beginning or advanced Basic programmers is without question. Hours of debugging time can be saved, and “tighter”, more effective programs can be produced. At $24.95 (from Sharpes), XREF is an incredible bargain

20

QL UPDATE ISSU DISKS

These disks contain at least one major piece of software written specifically for disk drive and are guaranteed to be worth the money. The rest of the disks are filled with various utility programs taken from the issues of UPDATE anda few surprises thrown in. Half of the money goes to the author and is meant to encourage new programming for the QL that makes use of the disk drive systems, and microdrives on both the expanded and unexpanded QL. Where possible we will give a version for each of these configurations. Some of the programs take advantage of TK2 by Tony Tebby. All are 20.00, except QLuster, which is $15.00;' includes P & H, add $1.00 CAN.Available as 3 1/2 or 5 1/4 disks. Add $5.00 for mailing to other countries. We accept personal checks, company checks, money orders as well as_ International Postal Money Orders, but no charge cards. If ordering on MDV, then please include one that is already formatted, so we will know it will run on your QL. Due to the expense of MDVs this is necessary. If two MDVs are required we will state so in the ad.

1) HARTUNG UTILITY ISSUE DISK- Several excellent programs such as stand alone data base, Address, and Q@SO files. All are in Superbasic. Lots of hints and tricks for programmers. Requires some knowledge of Superbasic or a yen to learn. Recently updated by Bob Hartung. Address file can be used as inventory program. It can print out labels. Both screen or paper printouts can be by Alpha sort, or be by last name.

2) CABLE ARCHIVE ISSUE DISK- Contains six Archive programs along with Doc files to get you going on making use of the Archive programming language. Also has Tasket, plus Doc file, to give you multi-tasking on your QL (much cheaper than QRAM or Taskmaster). Included is Arithmetic, a Superbasic program for math, along with math drills. This is for both the advanced and beginner user and greatly extends the use of Archive. To order on microdrive send two formatted microdrives, too much for one!

3) Q@LUSTER ISSUE DISK by Al Feng- Q1 utilities to unclutter your disks and microdrives. COPY, DELETE, FORMAT, PRINT, VIEW, plus extended use of some Tool Kit 2 commands. TK2 is required. These are TURBO compiled for speed. Multitasks and uses minimal key presses. Includes Fast-Disk and Vegemat2, a super clone making program. Also Snap Shot-a directory column or condensed printout program.

4) DOS EMULATOR COMPANION ISSUE DISK by Al Feng- Just released in Oct. issue. Makes better use of Solution, PC Conqueror, DisCover, XOVER, QLuster and scr_codes. If you are going to use the emulators, then check this out, you won’t regret this buy.

5) @LuMSi DOS by Al Feng- a MSDOS simulator and front’ end program for the QL, also includes other programs by AL Feng for file management and cloning of programs. A Great Learning Tool

UPDATE COMPUTER SYSTEMS invites you to submit software programs that may become Issue Disks. Please submit program on disk, with decumentation and article to accompany the program. We are here to get North American software available and known. We solicit programs, tips, reviews and utilities for future issues.

TS2068 UPDATE TISSUE DISKS

These dis contain at least one major piece of software written specifically for disk drive and are guaranteed to be worth the money. The rest of the disks are fiiled with various utility programs taken from the issues of UPDATE and a= few surprises thrown in. Half of the money goes to the author and is meant to encourage new programming for the TS2068 that makes use of the various disk drive systems. Presently we are offering disks for the Larken and Oliger Interfaces, but have programs available for the Aerco (just as soon as | hear that there is a demand to have available). All are $20.00 per disk (add $1.00 Canada) and include postage and handling. The programs have been Temporarily lowered in price to make them more widespread among the TS2066 Users! Both 3 1/2 and 5 1/4, 40 and 80 track available. Please add $5.00 for mailing to other countries. We accept personal checks, company checks, money orders as well as International Postal Money Crders. We do not have facilities for charge cards.

1) MITCHELL BUDGET DISK, with wide spreadsheet printer driver, MS-TAS and various other utilities. Available as either Larken or es Gliger format.

2) Bob Hartung DOSDEX UTILITY ISSUE DISK, -a complete disk management group of programs for the Oliger Interface only. This includes Multi-Manager for file handling. This collection has recently been updated.

3) MAIL MERGE ISSUF DISK, Oct 87 and Jan 88 issues of UPDATE utilities added to fill out this disk. Includes a tutor program for the Mail Merge program, List Looker, Purity, J-Utilities and Extra Memory Utilities.

4) MITCHELL VIEW CALC ISSUE DISK, forget the old slow VC for tape! The rest of the disk is filled with other utilities plus some Public Domain for fiilers. At this time for Larken format only. =

5) OLIGER DISK DRIVE BBS PROGRAN, this allows users of the Cliger interface to be able to operate a disk based bulletin board fro the TS2068. The disk is also filled with many other Oliger di reutines and tips on using the Oliger System. New by Paul Heor en. Can use upto four DSQD disk drives.

6)The HYBISCUS ENSEMBLE, consisting of two separate, but complimentary sets of programs. A) Daisy.B6 Ensemble, and B) Udbm.BG Ensemble. LKDOS only, $22 each or $36 for both. The best file and database available for Larken, by Bill Jones. The price remains the same on this one, no change. Wordprocessor included.

7) TS2068 Super Calc by Bill Jones. New this issue. Oliger, $15.

UPDATE COMPUTER SYSTEMS invites you to submit software programs that may become Issue Disks. Please submit program on disk, with documentation and article to accompany the program. We are here to get North American software available and known. We also solicit minor programs, tips and utilities for print in future issues of the magazine. Please do not submit unlistable programs or copy protected programs.