KEK ATA AAT ATAK EKA TARA AAA AA AA LAK ARA RAAT A AAT AAA ATTA

TIMEX SINCLAIR USERS GROUP MILE HIGH CHAPTER

EXEEKKEEKSERAAAATEKSEAE SASK ETESSREE ALATA AA STARA TESTE TATE ES C/O FRANK HOLLAND, 1423 S. PEARL ST., DENVER CO 80210, 733-8103 AUG. 1987. The meeting is on the 27th, at 7:30 PM, at my home.

XXX££ZkXxXEXXkExXxixixzxikxkritiXxxxxxtrtfrxixiiriirrxititixrixitirxixkx

Some of you may have noticed that the July newsletter didn’t got out. That was because I was in the hospital with a collapsed lung during the last of June. It really wasn't anything SERIDUS, it just took up valuable time that I could have devoted to something else (ANYthing else).

Anyway, the queue got backed up (job, yard work, love-life, studies, other clubs, etc) and the newsletter had to wait.

I still have a lot of club projects to catch up on, such as sorting out the exchange programs from Cleveland (and getting Howard the Duck back home), a MC program for Shane, and copying numerous club programs for Rod. I've accomplished 1/2 of each and the summer doldrums are upon us.

HOpPRTULEY z ENEP YEAR will ee back to normal (? ?NORMAL??)

According to the new E. ARTHUR BROWN catalog: A&J MICRODRIVE won?t be building any more units, and there are SUDpEREd to be only. 30 drives left in stock. : 5

We lost ‘Tom Beaman to the clutches of IBM so he is selling his Timex Sud i $175 or best offers.

TS1000 with add-on keuBGard. A&I microdrive (1 drive). AERCO centronics IDEO TAGES many programs. .., : SEM books, SYNC & SYNTAX magazines. v D z

1-772-2073 HOME (evenings) a 1-772-3933 WORK

Also, we lost Jeff Brothers to a Franklin Ace several months ago. Now he has donated all of his T/S library and equipment to the club. Some of the books will be kept for the permanent library and some will be for sale. The hardware will be for sale.

1'11 keep you informed about what there is.... as soon as he gets it all hauled over here and I can get it cataloged.

pn—--—————————-w—-————————Ó i dd

p—--."""-——————————————— ee rs es ee cree re es ee re oe omman ce ee re oomen dd

REPRINTED FROM "SUM" JAN °86

2068 POWER SUPPLY: MAKE IT COOLER & QUIETER — J. W. Dowell

I have discovered that programs SAVE’d to cassette tapes from the TS-2068 can have a very high noise/scratch background level making verification and loading a somewhat iffy proposition.

The best way to determine if you have this problem is to monitor the signal on the tape aurally during loading. The background noise can be heard before the loader and between the leader and the program. If this condition creates a problem for you, the following will provide a solution.

The TS-2068, when operated from a DC supply voltage of more than 13 volts, creates a superflous noise on the internal power distribution lines, probably from the action of the switching voltage regulator which supplies the regulated 5 volt supply. :' Somehow, this noise finds its way to the SPKR/TAPE output of the SCLD chip. For some unknown reason, if the DC supply voltage is less than 13 volts this noise disapears. I have found that a supply voltage of about 8 volts gives very good results. There are two drawbacks: At less than 15 volts you get NO COLOR output and the A&J Microdrive will not work.

Because I sometimes wish to use the Microdrive and the Cassette tape storage interchangeable, as in taking programs from the Microdrive and giving them long term storage on the cheaper cassettes, I developed a voltage reducer to put in the cord of the TS-2068 power unit so that I can change the supply "voltage from the normally used 15 volts to a lower 8 volts when I want to SAVE a program to cassette tape. The supply voltage can be changed back and forth without affecting any of the program or data stored in memory. p ORAE

Also, by operating the TS-2068 at a normal 15-16. volt level rather than the power unit?s output of about 21 volts, the heat dissapation in the TS-2068 is reduced considerbly. f

The schematic for the voltage reducer is ` self-explanatory.

Two words of caution, however. Although the regulating transistor, 2N3055 or similar, is capable of passing many amps of current, it must be well heat sinked as it dissipates about 5 watts wnen delivering the low voltage output. ' When cutting the cord of the power unit, verify the polarity of the leads when they are reconnected remembering that the outer contact of the concentric connector is positive and the inner contact is negative. `

CE DCN dA "Are 2N BOSE or EQUIV . . c € MEME

20 Volks

\npof ees

Cette THE RIGHT PRORORTI EINS. z

= -—Wes'Brzozowski, SINCUS Before: vesding ‘too far into this, go grab a newspaper or | some

other publication that has print laid out in narrow columns. Count

) the number of letters ànd-blank'spaces-on several lines. |: Chances o = are, you'll: find ERE each pine contanw a DIPFERENI. number of '' characters. IET Ex Ge a

This is ond with a —Q cal led Proportional | a m It

turns out that fat characters like"M take take up a whole lot more space than the tiny letter i; so` ‘each’ character. is "given only as much room:as it needs. Not: only is this much >` more pleasing to ‘the.

eye, it allows à surprising amount et extra text to be^ “Squeezed

into the same amount of space. EE ea

Dur. TSZO0G8s normally display 32 or 64 (ànd now 85) “columns of text, with' each character: ‘taking ‘up’ the- ‘Same width, no’ matter what its size. “It seems~-that “we 'should^ be“ able to: "improve “this somewhat. oa

Actually, tte job has: already "béen' done fór us. "In the Nov.

1985 issue of ‘YOUR SPECTRUM;' in--the, "article "Aft Out ^ of | Proportion", such”a program ‘ts given? Unfortunately; it “does have“ a number: or. defficiences. “I’ve corrected as many of ‘these ‘as “tare T practical (though thay can ‘stilt’ be^ annoying at times) "and > presented it" here for your use.” Note that the Spectrum program, and

my perversion of it here are radically differént in many” ‘ways. ‘If

you’ ve “got the ofa version; you? TL ‘still “have to completely’ retype — it for ‘the TS208B. | "Stilts they. do: "function somewhat alike» and ee ne

might find the text of' that articte' to be helpful-

For those" “who. have” ‘that original articles the ‘main i tévences ' are: 1) the code is modified to run on a TS2068,; 2? machine ‘code is’:

initially entered through DATA »statementsy,. eliminating the need for

a hex ‘toader, 3) the character fonts are “MUCH, ‘improved; and” you TET

don't have to type in the pixel’ patterns ‘for "each; ` because” my

program derives the patterns from the Timex patternss | already in. ROM, 4y the “code ‘works as in OVER ‘Or rather. ‘than ‘OVER i; so if ` “you * print over à space that already contains text, you won't get such `

an awful mess, and 5), the TAR, function is. also implemented, im Amer:

proportional mode. —— Wd aeuo ien This articie ‘Contains two, programs; "type. in. and 'RUN the "first

one. After a long wait, it vill SAVE, the true. ‘proportional’ printing >

EO S Tas

program to tape.. When, you reload. that. no. waiting — required». i

from here on) you’ i, be E E i P RM 2 ' It starts out with. a little "demonstration. bf proportional" Mod.

printing." This, redefines, the, LPRINT Command, so it. will conflict a

with your use of a printer.. I haven't founc. this to be "any "bother >

in the types of programs I've used it.. in. Still; if. there's"

sufficient interest, it shouldn't. be, too hard. to produce an. add-on . program that inserts. a "proportional print’. channels- and ` attaches. m

it to an unused. stream.. This, coul.d, al low.= your. , normal- printer. to work Cin its normal mode). in .conjection. with proportional printing." on the screen. In the mean time, if your printer supports a COPY function, that should. work with this program;, as is... a

In: any. ‘casey LPRINT now prints to.the screen. in. proportional" mode, and. PRINT: continues to work. Like it always. does; so you can, mix BOTH methods. in. your program at, once. .- However s.. both maintain"

M eoi oe

o we

their own separate screen.. locations, so you, can easily | print. to en

different. parts of the screen with each. . ni For, Proportional screen. positionings you can use. | LPRINT AT and LPRINT TAB commands. However, note that. the old AT and TAB... 11

Vig a = d. T is em SINCE dunce one. use screen nodrtions- char assume. all characters are 8 pixels. wide..This-would never do for proportional printing, so when

you use AT or, TAB with.LPRINT, you specify the.X.and.Y locations in...

PIXELS, not in characters. This-means you can.place.your characters.

anywhere you. want on the screen, right down to the pixel level. The BASIC program, from lines 3030 on give a reasonable demonstration of how it works. ..

up en

Paes T a E

The. YOUR SPECTRUM.. Na also. .included' "xa otont designer program, which is included here; „but this. is optional.. To move the.

cursor, use the.Q,.6,.0,.and.P keys. Use M .and .N to turn a pixel on or off. F keeps, the design; D “displays. a character y. .U, displays , the entire character set and 5S and J save and l oad. the character set. LOAD in a.SAVEd character set to the main. program , with LOAD ""-CODE 64208. Once loaded Linto the proportional ..print..program; ,. you can save the program, and, fonts. -together, and never .bother with the fonts again.

The. proportional printing, fonts require, -one new thing we never.

worried about. before; you have to specify, how- many pixel wide your

character. is.,.To do this, you. design, your. character.. to. touch.. the DN

right most border, of the B -8 character biock you're given. Then;..

in the top row of pixels, you set. each | pixel. that's l in .à valid.

column, for that character. Thus; if your. character is. _be. five. pixeis wider, simply, set, the right most PN pixels. in, he. top Yr Ow. Cthose won't be printed on “the, screen; don?t worry de , Don't. „forget,

to include one or, more pixels, for, the spacing . between characters! ..

In the "standard" character. ‘sets | I’ve „chosen to have only one pixel. width of space between characters, "and, A "blank. space" character is. 4 pixels wide. This. works. fairly nicely büt you san change ` it to suit your needs. a

, ? Won" t that ‘Took, nice in your next oA e aad ni say* ct teri

243 eU NOTES from Editors. 2 big “thanks ‘to wes, | “with “all Wes does, and. it

fi—c o [S CET

A, small. sample, of,” "proper tional" “printing is; Unc luded | “here. |

Ze t OP

nee = Slope

is e lot folks, Wes finds ti»e “to ` do projects for Asp. ‘Tine "Designs, a. x.

answer a lota eil, "rite programs," "ind tipe | for” Ta»ily end of

coarse his empioyer. ALL ‘of ” the TS- "Pa»ily "benefits z fro». the.

generosity of Wes,and all the others Who contribute their’ “valuable time and. talents. to their aser group ‘and neuslettérs and | BBSs. If

you like being. on the receiving end of “the efforts of" datos mes

do not contribute tine,” talent or sweat tó the efforts" of" _ «ser group, neusletter or BBS, there will soon be fewer or no ‘sources of. information. Several UGS and: zany BBSS have gaif over the” past.

year, several newsletters have reduce their number ‘or: issues ‘and na

replacerents are in sight. Wake up folks," smel t ut UE and', lend a hand before it is too late. i B EME TES

The proportional. printing program’ wi T be ‘Uptoaded to` "BUBBS' “under”

name of WESPPP. BAS. The font program may’ be't uploaded: "UBt' a “Vater

date. Data on BUBBS: 1€607)693-3359-7 days-24hours a day— "300 ‘baud on`

from Spm. to Sam weekdays, zs hours weekeriüs- free.’ ie ci ]

Xue ME : ass fne ens f E Ee Eee

On pages 7 thru 10 of '5bhis idend ae in earlier^: issües, “we are running a printout of the TS2068 ROM disassemb!y by: Wes Brzozowski. We are running extra copies’ of each’ page of the: RUM" ‘Disassembly .

that we may offer members at the conculsion of the -printout a

complete set. With this issue we have nine sheets or: | 18° pages "of printout. | Our extra copy run is set at. 50, it" wiil be made"

available on a first’: come ‘first serve- acc Suri pi minimial

donation requested to cover postage.

- o6

7169 LET sminz: LET daddrzdaadr 1170 FOR x=1 TO 8 '

1188 LET -5=0: LET rzPEEK daddr: LET daddr=daddr+i: IF rzO THEN G O TO 1228

1190 IF ABS tr/2-INT (r»2))5.1 T HEN GO TO 1210

1200 LET szs41: LET rsINT ir;z^, 1): GO TO 1196

1210 IF &$€4smin THEN LET sminss i220 NEXT x

1225 IF smin=@ THEN LET sminzi 1226 LET qzs2t(smin-1)-1: IF smin =1 THEN LET q=@

1230 POKE daddr-8,4

1240 NEXT c

1250 POKE 64286,15

1250 FOR jus4204 TO 64207: POKE

2000 BEEP 125, 1: BEEP .25,15: BE

EP .25,1: BEEP .25,15

2010 SAVE CHR$ 2534CHR£ 245+CHR$ B«"ING"«CHRS 235+"YOU" LINE 309

2828 SAVE CHRS BS2+CHRE 204«CHR£ ISE t THE = —-CHRS$ 175 CODE 64209, 2025 RANDOMIZE USR 64978

2238 GO SUB 8000

2248 STOP 7

S808 CLEAR 54198: LORD ""CODE

. S818 RANDOMIZE USR 54970

3828 GO SUB 8098

3838 LPRINT

` 80640 LPRINT “You can Dou NEU the

BASIC portion auay;"' S650 .LPRINT "This wilt Turn Off the proportionat Printing..." S058 LPRINT "But you can turn it On again, uith

3878 LPRINT TABS 697 “RANDOMIZE uS

R 64970"

39880 STOP

8008 CLS : PRINT “This is an exa mpte of the boringotd Printing. What etse could uUeuant^?"

8218 LPRINT AT 0,50;"Uell, we CO cnm wish for Proportional Printi

a820 LPRINT "LOOK hou neat it is , and how easy it is t0 read!" 8038 LPRINT "...Then, count how mang additional characters. ue can get on a tine.

8040 LPRINT 6856 LPRINT “REMEMBER... these th aracters are the SAME SIZE

as -the standard Timex character Set, Ontuthe Spacing between the m has been ia ae

. 8868 RETURN l

This is an example of the borings Canto Ating Uhat etse could we

Well, we COULD Wish for Proportional printing; ` Look how neat it is, and how easy it is to read =Then, count how additional characters We Can get on a Line,

REMEMBER...these e characters are the SAME SIZE as the standard Timex character set. Only thé spacing between them has been changed

Optional Font Designer Program

19 CLEAR 39999

20 LET ba=4a000 100 PRINT HT 2,2; “Ss 130 FOR f=3 TO 10: PRINT AT f,3 ; NOOOOOOOORN": NEXT . xo PRINT Or tier Scere 138 az z

202 OVER 1: PRINT AT a43,bs4; "Ni "i PAUSE 2: PRINT RT as3,b«4; N" : PAUSE 2: OVER ð " 210 LET aod SCONE ea ND a<? )-(INKEYSz"q" a» : 220 LET babs CINKEYS="p™ AND b«7 )-(INKEYSz"O" >

230 IF INKEYs="m" THEN PRINT RT a43, bee: INVERSE.1;"X"; PLOT b+ 168, (8-8) + f 240 IF INKEYs£z"n" THEN PRINT AT at3abté; TOn: PLOT INUERSE 1;b+1 69, (8-a) +1

250 IF INKEYSz"f" THEN GO TO 30

"260 IF INKEYse"d" THEN GO TO 48 270 IF INKEY$="u" THEN GO TO 58 7275 IF INKEYS="s" THEN GO TO 10 -Eae IF INKEYss"j" THEN GO TO 10

299 GO TO 200 309 INPUT “Which Character? "3C.

210 IF LEN c$<¢>1 THEN GO -TO 300 Set IF CODE cs«32 OR CODE cs>12 7 THEN GO TD 362

330 LET csCODE cs

940 FOR f=8 TO 7

350 POKE (c-S2) 28+f+ba,PEEK (1B 468+(f42553): NEXT f: RUN

«00 INPUT “Ohi Ch Character? “se

5 410 IF LEN c31 THEN GO TO 400 420 IF CODE cs<32 OR CODE cs»512 7 THEN GO TO 408 436 POKE 23505,8584: POKE 23607,1 55: PRINT AT 2,283 CS: POKE 23608 ,0: POKE 23607,6560. 446 FOR a=8 TÓ 7: FOR bzsO TO 7 €50 IF POINT (b41869,(8-a)24152)-2 1 THEN PRINT AT 84+3,b44; INVERSE

"X": GO TO 470 450 PRINT AT 843, "de: "Qv

678 NEXT |: AT LET bao: GO TO 228

500 FEINE” aT 15,0;: FOR fz32 TO

AES PTNT BRIGHT 2;CHRS fj“ ";

501 PRINT AT 15,0; “7: OVER 1: FOR fz32 TO 127: boke’ 23506.54: POKE 23507,2155: PRINT BRIGHT 1; CHRS fi: POKE 23606,0: POKE 2350. 7,60: PRINT " ux: NÉXT f: OVER 6 : POKE 23506,0: POKE 23507,6090

i E BEEP .1,1: PAUSE 0: PAUSE @

igos INPUT "File Name? “; f$: SAU E fSCODE 40090,768: RUN 1020 INPUT "File Name? ";f$: LOA D f$CODE 40000,7868: RUN

10 REM Program to perform Prop ortional Printing.

15 REM An upgraded version of an entry in “YOUR SPECTRUM", Nov

_ 20 REM Changes include - Modif ied for TS2058, Supports TAB, be tter fonts, and works as in OVER @,. instead of OVER i . 25 REM When you RUN this progr am, it will SAVE the actual Prop ortionatl Print program to tape 30 REM When THAT Program is ru n, all LPRINT statements will do

Proportional printing to the sc _

reen.

40 REM AT and TAB are supporte d, but they nou refer. to pixel P ositions, instead of character P oSitions.

50 REM It will also be possibl e to use PRINT, to do non-Propor tional printing on the screen. - 68 GO TO 585 à

780 REM Subroutine to decode th e following Hexadecimal DATA sta

75 READ ns: LET hisCODE ns(4): LET to=CODE_ns (2) $ 80 IF hi»57 THEN LET hishi-7 . 85 IF tooS7-THEN LET lozio-7

: 96 LET n=i6ehi+lo-6i6"

.'985..RETURN t e DATE ecl ae F as eo" F "A8" j "22" ^ "E myu c£ gmpge ege cr oe

110 intu. "Or" 5 "3a", "0

fU , eqs i ES e EL 3 "6g"

aée bata ires ue, "FO", OPE, eP. 15e DATA “Fin "FE", "26", "22", "0 160 Data Se ELE ebe", "PE", "1 19g Data "Fb","22","Fe","FE","C E Date "o5" a r17,7387, "Eg", "F 190° Bat “gén nce", MPE", "FE", "2 poe Data Moe” nna". "Se". "8R" WE gie DATA- “POT NPE", "CS". “FE” "E eee age te * 250 DATA "có" "Fi","RP","22","F 24e DATA "gb" ,"20","99","CD","2

E pate “có - 3 se 3e oe à os i2" 4 es ca oe ? oF 260 DATE. “FED "80", "38", "02", "3 - "SF m ose ie e"

272 DATA "ef" A oe ii "29", ^29" , "E

E "32" QUESO ISP 28 -

o eaw, "EE", "ei", "oT" ; "0

269 DATA Rite san", "EA" RE" "P 318 DATA nes P "CD" P "43", UE ; E 320 DATA “cór, "ga" ,"26","32","E `

22","ÉB

930 DATA "FE, 96", "08", "05", "2 34o DATA "2B","22","EE","FE","65 F” $ "SR", ABEL". "FE"

360 DATA "gó","28", BY. "Sb"

@ DATA "CB, 730"

oe uppge u oo ee

380 DATA “a?! "ao",

B" A "ED oe ; ""SB' j 390 DATA "FE" "1A" 2" E "CD oe i uc rdi " "Bg" 400 DATA "S3R","ED", ig"

4i@ Data "1A", "Ae", 420 DATA Taa" EB", 430 DATA "FE", "C1", ae cg "80", "ee", wea“ "80"

em? "WC

oe o D u at

458 DATA "FÉ","FE",

460 DATA "AB", "OR",

“epen apr

sae DATA non 799",

o a OET tri

m 3 ves. ; CFE”, D 7-

560 CATA "CB"; “OF”, E" OF”, “EE” 5 'ea

mm iy "SC", ae

so DATA “Fin "gr"

585 CLEAR 64199: PRINT AT 108i

Sig DATA "ei". oes, "AT"

530 DATA "S32","F6",

e" ."Mag'.- LII s4o DATA “AF” i "32" 3

sso pata "oé" "32",

a» FE er

"Bá",

"mE

"0, ; "SA" : "E

: "EE" "98",

"B80";

—

"ES",

"ER",

I ap one

S70 DATA "FE", "SB", "67","8B","2. Pr

"cB"

"Ce"

380 DATA "18","FR","mF","ap","g tigt, eB "F3", "Bit

name " "2 "SB" "C "ag" n "4.

"d Lamar: QUEE n vage, "p ene ae

os AF" , "93

“32° i "E "ee" A "e “EQ 3 "0

i 08^ i p Pa = Sas : "o epa", Rl "sa", "F,

PALL s. A "o

» "58" ; "E

"EE" J "3 "FEE" ? CDI ad

“This Will Take a While...":

NT ~e-Whu not take a break?” SSC REM zs2234343224254224RROGÓÓRG 61g FOR j=64978 TO 65356: GO SU

B 70: POKE jn: NEXT

700 REM Z3234254423424222232:4 444 728 REM NOU that the machine CO ee iS in, wetll derive the compr essed fonts from the stanzard Ti

mex. character set

1000 LET addrzPEEK 38064256 £PEE K 236507495648: FEL daddrf =542293

1010 FOR c=i TO 1020 LET smin=i6 1030 FOR x=1 TO 6G

1040 LET LsPEEK addr:

adres

LET addfza

1050 IF l«18 THEN LET s=16: GO T

oO 1898

i060 IF («32 THEN LET s=8: GO TO

1090 à AS IF (<64 THEN LET sz4:

ea TO -

9 4875 IF t<128 THEN LET sz2: GO T

o 109€ 1080 LET szi

1090 IF s<smin THEN LET sminss

1100 NEXT x

111€ LET addrzaddr-8

11290 FOR x=i TO 8

1138 POKE daddr, (PEEK addr) *smin LET daddre

1140 LET aadrzaddf +1:

daddr+i 4450 NEXT x