Home

Column One

1. o P O Box 347 _ PERMIT NO 18 Owings Mills Md 21117 DELIVER ge i GUUDIES for USI Users PEEK 65 The Unofficial OSI Users Journal P O Box 347 Owings Mills Md 21117 301 363 3268 1 Sams Photo Facts Manual Complete schematics scope waveforms and board photos All you need to be 1 or SII Wizard just 7 95 C4P Sams Photo Facts Manual Includes pinouts photos schematics for the 502 505 527 540 and 542 boards A bargain at 15 00 C2 C3 Sams Photo Facts Manual The facts you need to repair the larger OS computers Fat with 30 00 useful information but just OSI s Small Systems Journais The complete set July 1977 through April 1978 bound and reproduced by PEEK 65 Full set only 15 00 Terminal Extensions Package lets you program like the mini users do with direct cursor positioning mnemonics and a number formatting function much more powerful than a mere print using Requires 65U 50 00 RESEQ BASIC program resequencer plus much more Global changes tables of bad references GOSUBs amp GOTOs variables by line number resequences parts of programs or entire programs handles line 50000 trap Best debug tool I ve seen MACHINE LANGUAGE VERY FAST Requires 65U Manual amp samples only 5 00 Everything for 50 00 Sanders Machine Language Sort Merge for 0S 65U
2. Assembler plot subroutine to drive a DAC at CA 22 and use an Oscilloscope as plotter of software synthetised wave forms Real time I O handling Tasks to do in disk files Uses BSR station digital amp analog signals Now a few questions and to see if anybody around may answer them 1 With my polled keyboard it is very hard to use the 650 V1 3 EDITOR No cursor dis played You have to remember cursor key movements Some strange displays of the edit ing line occurs Any solu tion 2 The DQFLS 6562 WP word processor I bought was suppos ed to run under 65U but it is impossible to handle disk files When you choose EXEC from main menu you simply get out to the BASIC immediate mode losing your text 3 I typed in Rick Trethewey s HOOKS into BASIC almost everything works OK but the IF THEN ELSE enable I had to remove BEXEC s line 239 to get an error free boot Any idea Needless to say PEEK 65 is doing a good job All of enjoy it very much Keep on line My best wishes to all of you Roberto Frentzel Caracas 1041 Venezuela KK Roberto l From Rick Trethewey I assume we re speaking of the article I wrote about adding the Editor for video systems I never tried it with V1 3 although it works with both 1 2 and 1 44 In one of the Tech Notes there was patch to V1 2 that added true back spacing for video systems As I recall you lose the cursor when you ba
3. lengthy and very difficult to edit if they are written using the traditional method of One Thousand POKEs It should be possible to print graphics without having to resort to one POKE statement per graphic character If the graphics are stored in strings then several could be printed at once using a BASIC print at routine Under OS65D 3 3 this is particularly easy to do with the print at command PRINT amp X Y A good games program will be short and powerful with plenty of action graphics It should be quick to write and easy to debug The best games pro grams are usually variations on the traditional favorites and so Stop the Dwarvel is modeled on Hangman Please read on The most Many games tedious aspect of programs is the enormous number of POKE statements that have to be typed in An alternative meth od for producing graphics is explained here Another major problem for games writers is the pseudo random number gen erator in BASIC Ideally each new game should start with a different random number series and the same random numbers should not repeat The solu tions to both problems are scribed later area that is explored is well known simple and de Another major cur sor addressing as supported by DOS 3 3 A gt good variety of action graphics is implement ed MAKE A PLAN The first step to take when writing a program is to devise a plan For a games program t
4. 90 INPUT ENTER DEVICE THE AD FILE IS ON HDS 9 IF MD A AND MD B THEN BOTOIA 52 DV 2 PEEK 9832 IF DV 2 127 THEN DV 2 DV 2 128 4 34 DEV MDS 110 MNG ADS MP PASS 118 MNG MNG Q s 160 GPEN MNS MPS 1 REM OPEN AD FILE i70 INDEX 1 INPUT 41 N 130 INDEX i 5 INPUT 21 TY ein INDEX 9 INPUT 21 EODF G20 INDEX 1 20 INPUT 21 BODF 250 INDEX 1 31 INPUT 21 RL 260 INDEX 1 42 INPUT 21 NR3 EBE IF EQDF BODF ORNR 1 THENERRS FILE EMPTY 607040000 258 DIML 20 FP 2 REM CONTENTS amp POINTERS DINAS Z2 30 INDEX 1 53 N 1 NF 1 TT 0 FF 1 305 INPUTS T INPUTZI T 310 A IN T FPIN TT REM FIELD LABELS AND DESCRIPTIONS 328 IFINDEX 1 BODFTHEN3E2 338 NeN 1 sNF NF 13REM NF IS NUMBER OF FIELDS 340 TT TT T REM RECORD LENGTH 350 5070305 360 HNS CLASS MP PASS 361 BNS MNG O 362 IF CL ND THEN 6070500 365 OPEN MNS MPS 2 REM OPEN CLASSIFICATION DESC FILE 370 INDEX 2 3 INPUT 22 N 38Q INDEX 2 9 INPUT 22 EODF 2 385 INDEX 2 20 INPUT 2 BODF 2 390 INDEX 2 31 INPUT 22 RL 2 391 INDEX 2 53 051 CF 21s T7 CF 1 392 INPUTS T INPUT T 393 CSIC T CPL TT 394 IFINDEX 2 BODF 2 THENS 395 CCH CF OF 4 396 TT TT T REM RECORD LENGTH 397 60TO392 S REM PARAMETERS FETCH 01 TY 505 INPUT ENTER CLASSIFICATION NUMBER OR ALL CX 5 6 REM GOSUB BAGO IF THERE 15 A CLASS FILE 507 PRINT PROCESSING CLASSIFICATION
5. HS CHRG 241 IS CHRS 141 70 S HS 1 FS CHRS 32 GS CHRE 240 CS CHR 27 CHRS 20 80 P Good that s correct P2 Sorry that s wrong 90 P3 Press a letter key DW POKE 13024 32 400 PS You tried B before s FOR C2 TO S D s DW G NEXT 110 1 OWARVI s S 2 2 DWARV2 s YS 3 DWARVS T1 600 T2 11 2 120 NW 99 DIM RINW CS L XL L D 26 WS NW W126 P 26 130 FOR C 0 TO NW R C Cs NEXT Y PEEK 8996 Y RND Y TRAP 1470 140 150 28 s s PRINT 1 10 160 PRINT amp X 11 STOP the DWARVE amp X 12 7 170 180 REN READ SCR ADDR amp PICTURES 190 FOR C 1 TO L READ X C Y C NEXT FOR C 1 TO L READ Y FOR K 1 TO Y 200 READ C C C IC CHRS P NEXT PRINT C8 210 1390 REM SCREEN ADDRESSES 1400 DATA 27 0 27 1 30 1 31 2 31 3 31 4 31 5 31 6 31 7 31 8 1410 DATA 31 9 31 10 31 11 31 12 31 13 31 14 31 15 31 16 22 17 21 18 1420 DATA 20 19 19 20 19 21 31 17 34 18 32 19 31 20 31 2 25 2 26 3 1430 DATA 25 3 25 4 25 5 25 6 25 7 2558 255 25 10 25 11 25 12 1440 DATA 25 13 25 14 25 15 25 16 22 16 25 17 24 17 30 17 24 18 30 18 1450 DATA 24 19 30 1 26 5 25 16 1480 1470 REN PICTURE DATA 1480 DATA 5 150 150 150 150 150 1 175 2 177 156 1 156 1 156 1490 DATA 1 156 1 156 1 154 1 154 1 156 1
6. LDX LDA STAX STAX STAX STAX STAX STAX STAX STAX INX BNE RTS program call to the clear screen tine so this is replaced by a PRINT CHRS 3 plies to line 2635 ing at 2520 we E referencing SM prefaced by POK bef ore it i s GOSUB in 2589 The find same is rou a ap Continu another Like a Checking this INIT COUNTER 32 PUT ASCII BLANK IN A D CLEAR SCREEN PAGE D160 PAGE 1 D208 PAGE 2 D308 PAGE 3 D49 CLEAR COLOR PAGE D580 PAGE 1 D6 8 PAGE 2 D708 PAGE 3 INCREMENT COUNTER LOOP DO 256 TIMES subroutine we encounter SM 7600 in 25009 This seems to be some sort of storage for the maze and it too must be moved Like before I cheated and changed this to 25889 to have SM 1 00 This does not conflict with SR 1 089 because the storage using SR is at SR l 2 and 3 and the storage using SM is at SM PEEK 65 May 1985 13 In lines 9806 9805 we first see PEEKs from 11 and 12 Remember that this is the USR vector under ROM BASIC The address of the screen clear routine is being saved in A and B and a new USR calling address is being set The POKE 11 0 POKE 12 253 is probably the most often used routine in games This sub routine is in the monitor ROM and waits for a key to be pressed on the keyboard and returns the ASCII code for the key in location 531 In our case since w
7. s birthday D Y IF Y 1790THENY Y 1900 Elem FieDiGiay GOSUB 770 Z2eT sKiaJel PRINT PRINT What is the name of person two s INPUTXS PRINT PRINT What is birthday M D Y INPUTM D Y 370 375 PRINT 380 INPUT Printer ready Z 8AVE 385 PRINT CHR 29 CHR 31 390 PRINT C OMPATRBILITY ANALYYSI 400 1 _ _ 510 PRINT 420 PRINT Compatability analysis of W and X 450 PRINT 470 PRINTW was born on 3 M F11GOSUB9ISO 480 PRINTF1 51 It a grJiski 490 GOSUB 1070 500 PRINT 510 PRINT 530 PRINTX was born on MsE2 GOSUB 950 540 PRINT D23 3G2 It was a 3s Jiak2 350 GOSUB 1070 360 PRINT 370 PRINT 580 2 2 585 3 390 5 1 2 23 1 7 23 23 609 S3 ABS INT 27 28 INT 2 28 28 610 C3 ABS INT 2 33 INT 27 33 33 620 PS ABS 100 2 P3 100 23 630 SSABS 100 2453 100 28 640 CS ABS 100 2403 100 33 645 650 PRINT Physical cycle compatability 23 day is 660 PRINTINT P5 1000 1020 678 PRINT Emotional cycle compatability 28 day is 680 PRINT INT SS 1882 1000 x 690 PRINT Intelligent cycle compatability 33 day is 7 PRINT INT CS 1000 1000 x 710 PRINT lt 720 PRINT Average compatability is g 730 AS PS S5 CS5 3 740 PRINT INT AS 108 1 760 PR
8. 156 1 156 1 54 1 156 1 156 1500 DATA 1 156 1 156 1 156 9 161 51 151 151 851 151 151 151 151 1510 DATA 2 187 187 3 161 161 161 4 187 187 187 187 1520 DATA 12 161 161 61 161 128 128 128 128 128 128 128 128 1530 DATA 1 161 1 161 1 161 1 161 1 161 532 32 136 32 32 2 224 225 1540 1550 DATA 5 32 179 161 182 32 5 32 136 32 143 32 1560 DATA 5 32 232 32 232 32 5 227 136 34 143 228 1570 DATA 5 32 136 191 143 32 5 32 190 128 189 32 1580 DATA 5 32 32 149 32 32 5 147 177 161 175 146 1590 DATA 5 147 143 161 136 14 5 195 143 161 136 197 1600 DATA 5 32 176 151 178 32 5 32 152 32 53 32 1610 DATA 5 32 152 32 153 32 5 150 152 32 153 150 2 241 223 1620 DATA 6 32 32 32 32 32 32 1 218 1 216 1 149 1 149 1 149 1630 DATA 1 149 5 32 233 32 233 32 5 32 136 193 143 32 1540 1650 PRINT 112 12 19 42 18 1660 PRINT amp 4 0 Disk error Try Again 4 GOTO 290 1670 PRINT C 5 amp 4 0 8 FC Error or SN Error GOTO 240 INTRODUCING THE SYNPHOTHIZER BOARD i By D Petersen 3892 Nth 4th St Fresno CA 93726 The Synphothizer Board was de signed to bridge the gap in sound capabilities between the OSI and other popular systems Being based on the advanced SSI 263A speech snythesizer and the Texas Instruments SN 76489A sound generator the Synphothizer offers capabili ties rivaling or exceeding those built into other sys tems Provided o
9. 7 TOGGLE BYTE 0 1010 QO ONE BYTE 0 1020 ALI OO TWO BYTE 0 1030 ACOA 04 THREE BYTE 4 A040 i 3 1050 AKOB ADUTAG DISK LDA TOGGLE 1060 FOIC BEQ DIOFF 1070 AOLO BDO2ZCTO STA CoO2 1080 A013 EEO7AG INC TOGGLE 1090 A016 CEQGAO DELAY DEC ONE 1100 19 DOFEH BNE DELAY 1110 ADIB CEO9AO DEC TWO 1120 AOIE DOFS BNE DELAY 1130 AOZO CEGAAD DEC THREE 1140 A023 DOF1 BNE DELAY 1150 A025 A904 LDA 4 1160 A027 BDOAAD STA THREE 1170 ANZA DOOS BNE BK 1180 AQ2C 8DO2CO DIOFF STA 2 1190 AQ2ZF 7 DEC TOGGLE 1200 2 60 BK RTS This will probably be the final Wazzat column and so its contents are particularly exotic The exotica are found in the two listings explained later But first a couple of useful tips When a file is being created the disk operating system asks how many sectors are required and offers up to twelve But the PUT command ignores this and writes 11 This is crazy Eleven sectors of 256 bytes times 76 tracks equals 214 016 But if thirteen sec tors could be written then disk capacity would expand by 38 912 bytes to 252 928 To gain this 18 increase in disk capacity add this line to BEXEC 9 POKE 11241 13 REM 13 Sectors Yup it s that simple A check with SECDIR reveals that track headers are now being written with D thirteen sector tracks A test with DOS command EXAM also shows that a thirteenth sector of data is being written No
10. interest in MICRO and canceled my subscription Very quickly the OSI vendors withdrew their ads since the magazine was now aimed at an entirely different audience The copies of MICRO from October 1977 through Aug ust 1983 are stored on a shelf over my computer They are a treasure house of OSI inform ation second only to PEEK 65 As a postscript I happened to pick up the October 1984 copy of MICRO The difference be tween it and the August 1983 issue was striking The Oct ober 1984 issue had 68 pages and 16 advertisers while the August 1983 issue contained 144 pages and 91 advertisers MICRO ceased publication with that October 1984 magazine af ter a total of 76 issues In March 1985 it was announced that subscribers to MICRO will receive copies of Dr Dobbs Journal to balance out their remaining subscription Thus the end of an era The rise and decline of MICRO and OSI appear entwined both occurring in the same time frame However I believe this is part of a larger story of the micro computer industry in general In the mid 78 s industrious individuals start ed computer related businesses on a shoestring in garages and basements By the mid 88 s the business had grown to the point the original founder could no longer run it Ei ther he sold out or at least took a back seat and hired business managers Business decisions were then often made to change the product line or to concentrate on an expanded m
11. the reduction of wear on the disk and head A small minus is the increase in noise due to the head relay The disk eject and activity light are a bonus There is no really simple way to electronically control the motor without building up a board The board would need a _ retrig gerable monostable to start and stop the motor and some twin OSI inc p o box 21146 denver co 80221 phone 303 428 0222 Wangtek sets the industry s standard for excellence in 1 4 inch streamer technology because its tape drives are all created with an uncompromising dedication to the highest possible quality in design engineering and manufacturing These factors combine to give the Wangtek 5000 tape drive a level of performance and reliability that is unexcelled in today s marketplace The Wangtek 5000E is uniquely suited to meet the backup demands of today s smaller size higher capacity Winchester based computer systems it packs up to 60 MBytes of data storage in a compact half high form factor only 1 625 inches tall For added user convenience the drive accepts and automatically adjusts gains for either standard 45 MByte tape cartridges 450 foot cartridge or high capacity 60 MByte cartridges 600 foot cartridge WHAT S NEW AT D B I What s the answer The DMA 360 removable 5 Winchester It s exactly the same size as a 5 half height floppy drive but that s where the similarity stops The DMA 360 gives you
12. 1 BY GROOME OZO REM CHANGES HEREIN ARE RELEASED FOR ALL NON 2030 REM COMMERCIAL USES 2040 REM GOOD FOR YEARS 1800 AND LATER RESOURCE PROGRAM LISTING DEVIATIONS EXPLAINED SEE PEEK 65 ISSUES FEB amp MAR 1985 In the initial stages of pre paring the resource article for publication a copy of my Resource disk was used to reproduce the program listings in the interest of saving typing time Unfortunately when I submitted my disk for use I forgot that my program listings had the recommended listing additions as well as imbedded offset addresses for disk buffers and was renum bered In the Feb midway down in issue page 6 column 3 it was recommended that lines 686 698 958 and 960 be added to Resource Two Also lines 616 and 62 were to be added to Resource Four These additions were made in my copy of Resource and are in the published program listings The copy of the program list ings sent to PEEK 65 has garbage added to the end of Resource Four Since my copy program has never failed to produce a correct copy of the original I did not expect anything less this time In editing the article for errors after publication this error was found In the March issue page 9 under Resource 4 delete all lines after line 688 28 65 1985 Add the following lines 690 PRINT TAB 18 Z PAGE CROSS REF FILE ZF 769 PRINT TAB 16 Z PAGE EQUATE FILE ZES
13. 51156 IF YNS Y THEN RUN WAZZAT CORNER In BASIC By L 2 Jankowski Is there an easier way Yes MEDIA CONVERSION Otaio Rd 1 Timaru from BASIC Incorporate these New Zealand two lines into your programs 49154 C862 PI TAPE The best utility that enhances 9 TRACK 1600 B DOS 3 2 and DOS 3 3 is HOOKS 95 77 255 by R Trethewe ublished in PEEK 65 RSE It ig 5880 ZZ NOT Z2OR254 POKE 8 INCH FLOPPY possible to add one s own code 49154 77 1 FOR 1 TO 1208 to HOOKS One example is NEXT RETURN the disk stop start code list ed here The code was written For 1 MHz computer change to control a single 8 drive 1288 to 600 toggling it on and off with the command 2Z In fact To understand what is happen probably all four drives will ing try this program be de selected The listing supplies all the pieces re 95 72 255 quired for incorporating the OSI 650 5 1 4 INCH FLOPPY DBI FORMAT IOMEGA CARTRIDGE DBI FORMAT code into HOOKS If in 1088 GOSUB 5000 PRINT 22 MED DATA MIDWEST INC HOOKS change line 1296 to INPUT A GOTO 168 246 Grand JMP UPDATE St Louis MO 63122 5000 ZZ NOT ZZOR254 RETURN 314 965 4160 The program can be used as it stands Assemble it and call OFF dear the routine DISK i e CALL SAGOB If BASIC does not The program above uses Boolean Support CALL then use an Algebra here is similar X USR X call toggle example POKE
14. 71 PRINT TAB 1 PASS 4 COMPLETED 720 PRINT PRINT END All other correct program lines are Dana W Skipworth 2055 W 87 ST Cleveland OH 44102 READER PROFILE I have owned an OSI C8P DF CHALLENGER since 1988 It was bought at a New York dealer Polk s Aristocraft On the hardware side it has 48K RAM three 528 boards 505 CPU 540 CRT controller and the 542 polled keyboard The basic system has a dual 8 floppy a NEC JB 1281 green monitor a Zenith color moni tor and an old BASE2 printer Additional hardware is a 565 CA 14 VOICE I O board with VOTRAX a 572 CA 21 48 line I O a 570 CA 28 8 port I O board with battery back up clock a 575 CA 24 Proto typing board and a 574 CA 22 12 bit Analog I O board I also have the BSR based AC 12P Remote Control Starter On the software side I have OS 65D V3 2 OS65U V1 2 WP 2 word processor Plot Basic OS Vocalizer I DAC I and DAC II various MDMS under 65D Later through a local dealer now out of business I bought copies of UCSD PASCAL V 11 0 OS 65D V3 3 OS 65U V1 3 WP 3 never worked 65U DMS QFS sort in Assembler and SARGON II chess As you can see an almost full blown system It gives me a lot of fun and profit too I m Electrical Engineer graduated 26 years ago work ing in many fields Among them are instrumentation for Physics and for Astronomy at various universities design ing and supervising electronic
15. BDEMo which refused to load The dreaded Error 9 was reported But I was still able to easily load the pro gram from BASIC not by name but by track number Inter estingly initializing that track and saving the program back to it did not solve the problem But changing the program name to DEMO did Coincidence Here s the pro cedure to follow when con fronted with DOS error 9 create a new program file enter the DOS kernel EXIT in BASIC type load the number program by track save the program to the new program file and curse Murphy if it didn t work Now for the exotica For years I wondered what to make of USR X disk operations and finally found a use for them when writing an OS65U_ single disk copier Probably a simi lar use could be found under OS65D 3 2 and OS65D 3 3 Listing 1 demonstrates how the command could be used to load a BASIC program under DOS 3 2 but not 3 3 Is it true that long long ago in the middle seventies OSI 65D 1 8 users had to use this method to load Listing 1 will not work under DOS 3 3 because the USR X code does not add 0989 to all the links stored in the pro gram and its header Yes DOS 3 3 saves BASIC programs as if they were DOS 3 2 programs and then converts them back when loading The idea behind this no doubt is to add some port ability between the two disk operating systems Listing 2 is the heart stopper a self modifying BASIC
16. BOSA INPUTY2 DS REM DESCRIPTION BOGO RETURN 30080 REN 30901 1F CX 0 ALL THEN3 G05 30002 IF TY BETHENINDEX 1 RE RL BODF 30003 IF TY EN 1TKENNN 1 607033990 3e004 601039010 30005 FIND CX6 1 REN FIND AN AD FOR THE NEEDED CLASSIFICATION 30010 IF INDEX I EDDF THEN NNe1 26070 33990 REM ALL DONE 33021 TYSINT LINDEX 1 BODF RL REM COMPUTE RECORD WE FOUND 33022 TX TVERL BODF REM THEN FIND OUT IF WE HIT IN THE MIDDLE 33035 IF TX INDEX 1 THEN INDEX 1 INDEX 1 1 6070 38085 REMMIDDLE 33236 FOR 1110F 33237 INPUTXI L I sREM GET ALL FIELDS OF AD 33240 NEXTI 33250 IF L 1 P THEN 38820 33260 EY VAL L6 11 33270 IF EY EXTHEN3BOOB 33300 REM DETERMINE NUMBER OF LINES REQUIRED THIS AD 33305 L i 33310 FOR 1 2TONE 2 REM ALL BUT CLASSIFICATION EXDATE PRINTCODES 33315 IF LS 1 D AND LS 1 O O THEN L L 33320 NEXTI 33990 F1 K1 RETURN 36000 REN 36010 IF CXS 0 ALL THEN 30005 38015 38020 INDEX 1 BODF iTVERL BO7030000 500 REM ERROR 40010 PRINT PRINT ERR PRINT CLOSE 1 GOTO 51108 REM COMMON EXIT P 50008 REMDISK ERROR HANDLER 50810 10226 EL PEEK 11774 PEEK 11775 256 50025 REN CHK FOR CHANNEL ALREADY OPEN ERROR 50030 IF ER 133 THEN CLOSE GOTO EL 50040 IF ER 12B THEN ERRS INVALID FILE NAME BOTO 51050 50059 IF ER 132 THEN ERRS END OF FILE ERROR BOTO 51000 SPOG IF ER 130 THEN ERRS ACCESS RIGHTS VIOLATION BOTO 51050 50070
17. CX PEEK 65 May 1985 508 INPUT IS THIS WHAT YOU WANT Y N 3 509 IF Y THENS S 510 IF CL NO THENCLOSE 550 IF ALL THEN 708 560 INPUT ENTER BEGINNING RECORD BE 565 IF BEC THEN PRINT WHAT 6070568 566 BE BE 1 570 INPUT ENTER ENDING RECORD EN 571 EN EN 1 700 HIS RIGHTSIC 3 DS REN HEADING DESCRI 720 BOSUB38000 REM BET A REC 721 IF NN 1 THEN GOTO 958 REM EOF DONE 723 IF DV 2 THEN 00 724 GOTO 800 REM NO HEADINGS HHHHHHHHH 725 IFPEEK 15908 L STHENGOSUB735 726 TFPEEK 15908 L STHENFORY 1TOPEEK 15908 sPRINT DV NEXT RENSKI PPE 727 1FPEEK 15908 PEEK 14457 L 5 THEN 728 PRINTADV CHRS 14 TAB 1 sH1 732 PRINTADV PRINTED ON 3DT 733 BOSUE 735 REM HEADING 734 Baa 735 FOR 1 170BQSTEPS PRINTADY NEXT sPRINTADV 770 RETURN BOR REM AD LINES 805 PRINTADV BAD PRINTHDV L 2 B50 FOR 1 3706 855 IF L 1 ANDLS 1 O O THENPRINTADV 3L 1 BEO NEXTI BES IF L 7 ANDLS 7 THENPRINTADV 3L 7 87 IF L8 9 ANDLS 9 O THENPRINTADV 3181903 882 PRINTEDV LS 10 890 IF L B 4 8 B THENPRINTADY sL 18 940 GOTO 720 ma 950 REM 990 CLOSE BOTO51 108 5010 IF CL 0 NO THEN CLOSE 2 BODO REM GET CLASSIFICION BOOS IF CL NO THEN CS CX sD6 UNKNDWN NO CLASS FILE G0708069 8015 INDEX 2 BODF 2 8020 FIND CX 2 BMO INPUTA2 C REM CLASS NUMBER
18. Complete disk sort and Merge documentation shows you how to cali from any BASIC program on any disk and return it or any other BASIC program on any disk floppy or hard Most versatile disk sort yet Will run under LEVEL I II or III It should cost more but Sanders says sell it for just 89 00 KYUTIL The ultimate OS OMS keyfile utility package This implementation of Sander s SORT MERGE creates loads and sorts multiple field conditionally loaded keyfiles KYUTIL will load and sort a keyfile of over 15000 ZIP codes in under three hours Never sort another Master File 100 00 Assembler Editor amp Extended Monitor Reference Manual C1P C4P amp C8P 6 95 65V Primer Introduces machine language programming 4 95 C1P C1P MF DF MF C8P DF Introductory Manuals 5 95 each please specify 5 95 Basic Reference Manual ROM 65D and 650 5 95 C1P Cap cap Users Manuals 7 95 each please specify 7 95 How to program Microcomputers The C 3 Series 795 e Professional Computers Set Up amp Operations Manual C2 OEM C2 D C3 OEM C3 D C3 A C3 B 8 95 C3 C C3 C Cash enclosed Master Charge VISA TOTAS gt Account No _________________ ___ _ ____ _ _ MD hee add 5 Tax Signature O D orders add 1 90 IN GTO a Postage amp Handling g_3 70_ Street EE TOTAL
19. Printer Board 80MB drives and an Alloy Tape Backup Unit There is talk now of putting a couple more departments onto the system which will probably require going to DBI s micro to gain access to 3 MB plus drive size This Work Log System is avail able for other hospitals through Comptrol Systems Li censed by St Anthony s We also have a scaled down and modified version of the system which will work for ANYONE who needs to keep detailed Repair History on equipment Schools Pactories Car Rental Agencies etc By the way the system also records the last time a room was painted who painted it what color paint was used who the vendor of the paint was etc etc Hotels There are lots more little things the system does but time does not permit me to list them all here I KNOW there are lots of other successful DBI OSI installa tions out there Hopefully others will relate their sys tem experiences to PEEK 65 readers TURNING FLOPPY DRIVES OFF By Ed Richardson 146 York Street Nundah Queensland 4612 Australia As requested in March Colunn One here are my thoughts on the head load mod on a C4P MF This would have to be about the simplest possible modifi cation The three problems it solves are 1 The head will load and unload with disk access 2 The MPI drive will now eject disks 3 The activity light will go on and off with head load The big plus of course is
20. Winch 1 Yr Warranty on 5 amp 8 Winchesters Phone 417 485 2501 EJ FESSENDEN COMPUTERS 116 N 3RD STREET OZARK MO 65721 PEEK 65 May 1985 11 covered MICRO as D amp N Micro products ran their first MICRO ad in August 1981 The Sept ember 1981 issue presented the results of the reader survey The editors of MICRO were astounded to learn 39 of their readers owned OSI ma chines The November 1981 MICRO was devoted to games The editorial questions how Many serious computer users would stoop to running games on their machines The aver age circulation during 1981 was 133690 i The March 1982 MICRO again contained an OSI special sec tion with five articles The same issue ran an editorial entitled Hello OSI The editor tried to explain the apparent disappearance of OSI and the frustration of trying to contact the company The July 1982 issue carried a response to the Hello OSI editorial Phillip Johnson wrote M A COM Office Systems intends to continue its pres ence in the personal computer market and to support our customer base July 1982 al so marked the exit of Mary Ann Curtis who handled many of the OSI articles at MICRO During the remainder of 1982 the editors of MICRO pushed the 6809 CPU and requested articles on machines using this processor The focus of the editors seemed to move towards software and languages in contrast to the earlier hardware and machine code The scop
21. as follows FROM TX lt gt INDEX 1 THEN INDEX lt 1 gt INDEX 1 1 GOT03085 REMMIDDLE TO IFINDEX 1 gt TX 17THENINDEX lt 1 gt INDEX 1 1 GOTO03 665 REMMIDDLE first field chraracters to Also change length from 3 38 Another feature of this pro gram is a built in expira tion In my application I want records to be kept for 39 days I use a 12 field record with field 11 assigned to hold DATE i e YMMDD as in 40124 84 Jan 24th Be sure you maintain this form of data entry for data file records unless you are prepared to modify ADS 168 Remember records are searched and printed IF they are less than 39 days old You can circumvent this feature by entering 96 06 08 to the re quest of todays date Also only fields containing Gata are printed This is controlled by LINES 33388 to 33320 LINE 33318 deletes printing of fields 1 11 and 12 see diagram 3 In the diagram samples field 12 codes is an unused field This program is highly modifi able by most anyone with some understanding of BASIC I encourage beginners like my self to experiment with it as I have found I learn more by experimenting ADS 200 ADS 260 is an auto delete program used to delete expired records used with ADS 199 It inserts a in the first field of any record older than todays date while at the same time printing an audit on console or printer Data files then can be repacke
22. contracts On site service e Product exchange e Depot repair Over 15 years computer systems maintenance experience More than 5000 disk drives currently supported in the field For information or service contact U S and Canada Greg De Bord Sunnyvale California 408 733 1122 BTI COMPUTER SYSTEMS 870 W Maude Avenue Box 3428 Sunnyvale CA 94088 3428 408 733 1122 Europe Victor Whitehead Birmingham England 021 449 8000 Regional offices in Minneapolis MN Ramsey NJ Atlanta GA Dayton OH PEEK 65 May 1985 7 should declare constants that is variables whose values do not change It is also a good idea to declare before all others those variables that are used in time consuming loops and procedures These variables are declared in line 5 and the program will run faster as a result Long and or often used values such as CHR 27 CHR 28 should be declared vari ables Doing this speeds up a program in two different ways First a statement such as PRINT C means much less work for BASIC the value for C is looked up in table This is much faster than hav ing to translate PRINT CHR 27 CHR 26 Secondly six PRINT C obviously take up less space than half a dozen PRINT CHRS 27 CHR 28 The program will be shorter and therefore faster Location 13826 holds the character for the cursor The POKE in line 98 sets this character to a less distrac
23. ill effects have been noticed after several weeks use of the new disk capacity Tested with DOS 3 3 and it should work with DOS 3 2 Recently I had a program named 18 PEEK 65 May 1985 1 REM Listing 1 Use with DOS 3 2 10 INFUT Track 20 X 9822 POKE X 1 40 POKE X 1 11 SO POKE X 2 121 60 POKE X 2 49 70 POKE X 4 TN 80 POKE 8917 3 90 X USR X STN REM Foke code on se se as on se w 1 REM Listing 2 2 REM first RAM location REM Begin with sector one REM Fages to read REM lo byte 79 of 3179 REM hi byte 31 of 3179 REM Poke track number for READ Disk Drive A REM Read in data from disk 10 REM READ A TRACK HEADER by 1274 NOV 84 20 GOTO 5 30 DISK EXAM 7000 61 RETURN 40 SO PO 15041 DISK HOME POKE PO 48 POKE PO 1 48 REM 3AC1 60 DEF FN A X 1OK INT X 16 VAL RIGHTS STRS X 168INT X 16 1 70 PRINT 28 PRINT TAB 15 READ A TRACK HEADER PRINT 140 INPUT Starting track 3N FRINT 28 IF N 0 THEN 140 150 PRINT BYTE 43 57 T S58 PRINT PRINT 170 FOR T N TO 76 T STRS T IF T lt 10 THEN POKE PO 1 ASC MID T 2 1 2 GOTO 210 POKE PO 1 ASC RIGHTS TS 1 and save program 180 190 POKE FO ASC MIDS T 2 1 2 210 GOSUB 30 220 FOR R 28672 TO 28676 X PEEK R 230 IF X 16 INT X 16 0 THEN X 108X 16 GOTO 250 240 3 X FN A X 250 PRINT X 260 3 NEXT Rs PRINT 270 NEXT T
24. like a machine code program The READ POKE read SUS PICIOUS combination in line 6 and the USR call in 65 seem to confirm this The next step is to disassemble this code Listing 3 shows the sub routine in the DATA statements at 16 and 26 A little exper ience shows it to be a quick screen clear routine Knowing that this is a screen clear simplifies matters for HEXDOS users since they can simply PRINT CHR 3 to do the same thing Listing 2 shows the modified listing The data statements and the USR set up are no longer necessary Be aware that the USR set up is different under both HEXDOS and OS65D HEXDOS users must POKE at 24 and 241 instead of 11 and 12 Also under HEXDOS all X USR X calls must be changed to X USR 7 The address 0 that showed where the subroutine was to be put came from SR in line 38 This indicates an examination of the subroutine at 1310 is in order SR is set to 600 in line 1318 This is in the area described earlier which now contains the file alloca tion information and is no longer free So far this is not a problem since we have eliminated the need for a USR but checking further we find several spaces before SR are used in lines 88 and 99 for variable storage This must be relocated I simply made SR 16088 in line 1318 to save the variables somewhere in the no man s land between the pro gram and string spaces Al though this works it is a kludge at best The p
25. or runs but leaves the operating sys tem unable to read the disk etc the program must be modified The two main causes of tape disk program incompatibility are machine code subroutines Called through USR functions and data storage accessed by PEEKs and POKEs Many pro grams use the empty space under ROM BASIC between 6222 and 2FF to store machine code routines HEXDOS for example uses this space for disk file allocation and put ting a routine there messes up the OS If the program uses HEXDOS users should POKE 227 255 at the beginning of the program and POKE 227 127 at the end This is necessary because HEXDOS uses the byte at 227 to mask all printed characters to solve OSI s graphics mysterious half graphic error messages If the program does any sort of tape I O for file storage etc this must be changed to the equivalent disk I O commands See your OS handbook for details The best way to learn is by doing so on to the conversion of MINOS One basic rule is to be suspicious of all POKEs It helps here to be slightly familiar with your machine know the locations of the memory mapped screen the key board joystick etc Also know the most common monitor ROM routines like that to get a character from the keyboard at SFDOO This will enable you to know legitimate POKEs from storage and machine code subroutine areas In lines 18 28 we see some DATA statements which look at least to me
26. seem to be that it will run most OS U material there s a program to do most of the conversion work and will compile to either FORTRAN or COBOL both standard ver sions so as to allow unlimit ed software transfers between machine types At this time they are reporting that the 728 will comfortably outrun any other UNIX machine on the market The 18 MHz clock might have something to do with it but they have a bunch of other tricks up their sleeves too Try this ten users each do ing a KeyFile FIND UNIX ver sion of FIND in separate files each with 208 900 rec ords at an average find time of one second The software bundle will include a DB EMail Screen Menu Builder WP Spreadsheet Spooler and a super extension of OSI BASIC that is comfortable with most BASICs OSI and ISAM files and still is about 3 times faster than 0 I am embarrassed at the skimpy overviews above but how much can one do in this short space If the above coop erate you should find the June issue packed with the details Of course we are also looking for spill overs that will effect the small users and there will be some Our list of articles needed seems to have had some effect but much more is needed If you have read about one users efforts to lift the disk head and have another approach jot it down Out of such efforts comes the ultimate result The best part is that we are hearing from thos
27. sor Boards and realized well over 200 speed increase in Our searches The system is VERY EASY TO USE it HAS to be because non computer types such as Service Technicians need to be able to walk up to a terminal punch in an Equip ment ID and get a report on a piece of equipment We do this via fully menu driven software The results are that the technician can review the equipment s history with his supervisor to determine if it should continue to be re paired or should replaced The cost controls in these reports have saved the hos pital thousands maybe even tens of thousands of dollars 4 PEEK 65 May 1985 The Inventory Control in the system is very simple but it allows for effective track ing of stock items It also lets Bio Med bill other de partments for parts they have used to repair that depart ment s equipment Probably the most beneficial part of the system is the automatic PM Preventive Main tenance scheduling Each piece of equipment even a BED is assigned a PM Code which indicates if that equip ment is to be looked at daily weekly biweekly etc Every night the system runs 24 hours per day the system goes through each piece of equipment to see if it is to be PM ed the next day A list of scheduled equipment is pre pared for management to assign technicians to The technician inspects the equipment and prepares a Work Order which is then returned to the data entry o
28. 2 X 5367 PRINT 27 GOSUB 206698 168 ZS STOP the DWARVE GOSUB 2006 Z Y GOSUB2068 It really works The command Z in line 158 may be puzzling This is an extra command added to HOOKS See this month s WAZZAT column for a full ex planation and substitute code The first FOR NEXT loop in line 198 reads into arrays X and Y the X Y coordinates at which the graphics will be printed If the BASIC print at routine in line 2008 is to be used then only one array X would be required Then in line 198 change READ X C Y C to READ X C Each pair of addresses X Y would be substituted for by one 5 figure screen address For example in line 1400 the pair 27 0 would be replaced by 53529 for C4P 32 by 32 screen mode The next pair 27 1 would be replaced by 53593 53529 64 THE DATA Addresses are stored in pairs ten pairs to a line from line 1400 to 1449 with four more in line 1450 All the graphics characters are stored as numbers in DATA statements The scaffold is in lines 1488 1539 The fig ure is in line 1550 1618 The final pair of numbers in line 1538 are the noose The open FIGURE 1 2 VIDEO MEMORY HEX DEC 0 5 Deco 63468 0100 53604 D140 53568 Diep 53632 DICO 63606 0200 53700 0240 53824 0269p 63868 2 0 63062 5401 DIED 84144 DSCe 64286 DAD 427 Ose 64506 54400 Osco 54464 O58 84528 O58 54
29. 278 X USR X Z PEEK 531 REM KEYBOARD SCAN 288 IP 27THENPRINT PRINT PRINT Now in receive mode GOTO738 388 IPZ SO9THENGOSUB688 GOTO230 REM GET NEW SPEED REQUEST 316 IFZ 32THENL L 1 PRINTCHRS Z FORT TOTI 16 NEXT GOTO276 328 IPZ lt 44THEN276 338 IFZ gt 9 THEN27 REM ILLEGAL KEYBOARD PRESSES 340 Z Z 43 REM CONVERT Z FROM ASCII VALUE TO ARRAY COUNTER 358 PRINTMIDS C Z 1 REM PRINT CHARACTER OF KEYPRESS 368 IFL 7O0THENL 0 PRINT REM STARTS NEW LINE WITH lt RETURN gt AND LINEFEED 378 REM CHARACTER DECODING FROM BINARY TO MORSE 388 N INT C Z H REM OF VALID BITS IN 8 BIT BINARY CODE 390 B C Z N H REM DECIMAL EQUIV OF BINARY VALUE OF MORSE CODE 408 128 FORL1 0 TON Ile INT B I B B I I1 REM CHECK BACH BIT 410 IFILTHEN47 REM GO SEND A DAH IF Il IS A 1 420 GOTO5S38 REM GO SEND A DIT CAUSE 11 IS A 6 438 I I J NEXTL1 REM YOU VE CHECKED THE FIRST BIT GO CHECK THE NEXT 448 FORT 1T0TI 2 3 NEXT GOTO278 REM GO GET NEXT KEYBOARD PRESS 458 REM SEND A SPACE ROUTINE 468 L L F FORT 1TOTI 4 NEXTT GOT02786 47 REM SEND A DAH ROUTINE 480 POKEK M REM CLOSE EXTERNAL RELAY 498 FORT 1TOTI 4 NEXTT REM DAH LENGTH 502 POKEK Y REM OPEN RELAY 518 FORT 1TOTI 2 NEXTT REM SPACE BEFORE NEXT DIT OR DAH 520 GOTO430 536 REM SEND A DIT ROUTINE 549 POKEK M FORT 1 TOTI 15 NEXTT REM DIT LENGTH 558 POKEK Y FORT TOTI 3 NEXTT REM SPACE BEFORE NEXT DIT OR DAH 568 GOTO430 578 REM ERROR ROUTINE 5808 GOTO37
30. 656 Osco 54784 0640 0700 0790 o7ce trap door is the second group of numbers in line 1620 The eyes and mouth are in line 1630 The total number of graphics strips that are printed is 54 The 54 is stored in 1 in line 58 and used in line 196 Array C stores the graphics numbers Have a look at line 1488 The first digit is a 5 and counts the number of characters that belong to the first picture strip i e the five char acters ASC 156 that make up the top bar of the scaffold see Figure 1 Loops two and three in line 198 use this graphics data to build up character strips in array C see line 209 The finer details of how this works can be investigated by running the program given in listing 1 then in Immediate Mode typing PRINT C 1 etc The scaffold can be printed using F 1 L 38 FOR Q F to L PRINTS X Q Y Q C Q NEXT CIP users try FP 1 L 38 FOR Q F TO L Z C Q X 53488 GOSUB 2890 To print the figure let F 31 and L 44 Of course the scaf fold and the figure could both be printed together using Fl and L 44 This method of printing graphics is very flexible and was particularly useful during program develop ment A single FOR NEXT loop does all the work Next month the second part of the program cursor addressing and how to produce non repeat ing random numbers Listing on Page 18 MAP 5489 IN 32X32 FORM
31. 8955 11 POKE 8956 168 16 T 1 OFF dear T 2 ON X USR X V el The values 11 and 160 28 GOSUB 18698 would have to be changed if the program was assembled to 36 V NOT V and 1 1 PRINT Board ievel service on e OSI Isotron TeleVideo an address different to SA9 Q TS V IBM pc xt If it is required to stop 48 GOTO 28 Floppy drive alignment start more than one drive e Siemens then experiment with these 58 END Shugart values Selecting a drive is e Teac done with DISK SE A The 108 INPUT A RETURN first number goes into Terminal repair and the second into C 2 Try different values for e TeleVideo in line 1 For example 3 eMicro Term Select drive A 40 SFF 4 10 188 108 and even Wazzatl 1 week turnaround Select drive 00 SFF Sokol Electronics Inc POKE list 474 N Potomac St Select drive C 46 SDF Hagerstown Md 21740 Here is a list of useful POKEs 301 791 2562 Select drive D 80 SDF for DOS 3 3 a PEEK 65 May 1985 17 POKE 916 0 get rid of Ok POKE 138026 128 new cursor POKE 11241 13 13 sectors per track POKE 9618 2 1 POKE 9611 14 toggle printer on and off with CTRL N POKE 2888 POKE 8722 9 accept null input on lt RETURN gt 10 3 DISK STOP START amp y DELAY 20 3 by 12404 30 35 AQOO A000 37 40 ANGO CFESA CMP 2Z 50 AGO2 FOOO BEQ ONOFF 100 A004 4COBAO ONOFF JMF DISK 5 1000
32. 9 638 REM DECIMAL EQUIVALENTS OF CHARACTER BINARY CODES 648 DATAL484 848 1364 1328 1272 1144 1088 1648 1632 1624 1152 1216 656 DATAL248 1264 1164 1 1 1 1 1168 1 328 896 928 646 0 800 704 660 DATA768 256 880 672 832 448 384 736 864 976 576 512 128 544 784 670 DATA6O8 912 944 969 680 PRINTCHRS 63 INPUT CODE SPEED 5 58 WPM SPEED 698 IFSP lt 5GOT0O6 88 700 IFSP gt 58GOT0688 REM ILLEGAL SPEED REQUESTS 738 XsUSR X Z PEEK 531 748 PRINTCHRS 2 3 745 IF2 13THENPRINT 718 ee eens CHANGE THIS VALUE FOR CORRECT CODE SPEED CAL 758 IF2Z 27THENPRINT PRINT PRINT Now transmit mode GOTO270 768 GOTO730 ready HOSPITAL INSTALLATION By C Culp Jr Comptrol Systems Inc Box 1305 Parker CO 88134 Since PEEK 65 has requested articles about successful in stallations of DBI OSI gear we decided to relate such installation which has been very typical of our experi ences here in Denver The users of this system are far too busy to have the time to write such an article so we will do it on their behalf The installation is at one of the largest hospitals in Denver St Anthony s St Anthony s purchased one of the first OSI systems to come into the Denver area approximately 7 years ago The system was purchased by the Bio Medical Department of the hospital Bio Med is responsible for the Maintenance of ALL hospital equipment from beds to EEG Machines to catscanners All total t
33. AT THE FIRST TRUE PERSONAL COMPUTER _ Ohio Scientific The Superboard 400 CPU THE FIRST MICROCOMPUTER WITH BUILT IN FLOPPY DRIVES Ohio Scientific The Challenger THE FIRST MULTI USER MICROCOMPUTER Ohio Scientific The 550 CA 10X with 16 port serial I O Board THE FIRST MICROCOMPUTER WITH BUILT IN HARD DISK Ohio Scientific The CD74 C3 B with a 74MB Winchester hard disk drive THE FIRST MULTI USER MICROCOMPUTER NETWORK Ohio Scientific The CA 10N5 OS 65U with distributed processing hardware and software THE FIRST REAL TIME UNIX MULTI USER MICROCOMPUTERS Ohio Scientific The new Unix Series See us at Comdex Booth 5167 and see what we mean by Real time response Unique communications compatability with IBM 3270 BSC SNA IBM 2780 3780 IBM 3770 and others e Easy program generation with 1 million record capability UNIX is a tradename of Laboratories OHIO SCIENTIFIC THE FIRST NAME IN MULTI USER MICROCOMPUTERS E Manulactured by ISOTRON inc 140 Sherman Street Fairfield Connecticut 06430 203 255 7443 Telex 756436 PEEK 65 May 1985 9 10 REM 5 2 STOP THE DWARVE 20 REM Copyright 1985 by 1 7 Jankowski 30 40 POKE 2888 0 POKE 8722 0 POKE 2073 173 gt Null INPUT CTRL C 50 C O K O L 54 Y Os 0 Fads 0 0 H 0 RO CHRS 13 8 95 D 127 E 45 6 122 60 R 10 LS CHRS 8 LIS LS LS L
34. Another program can loaded in normal memory use the program at 8009 POKE122 128 and RUN 122 S 7A 128 86 To go back to nor mal POKE122 3 computers Finally ber 1979 the OSI name ap peared on the front cover of MICRO courtesy of a design drawn by the publisher s 8 year old son By the end of 1979 circulation had grown to 3825 with a 78 page magazine My complaints about lack of OSI recognition were finally in Decen heard when starting with January 1986 the banner con tained the names of AIM APPLE KIM PET ATARI OSI SYM all of which were 6582 machines Visibility of OSI was even greater in the February 1980 issue with a photograph of the Challenger 4P on the front cover The March 1988 issue of MICRO anticipated a 16 bit version of the 6582 This vision has only recently become a reality with the Western Digital 65S8C816 chip More OSI ven dors began to notice MICRO since in April 1988 the first Aardvark Software ad appeared Even OSI was aware of the growing amount of OSI related material in MICRO In that same issue an OSI full color ad appeared on the back cover and the Small Systems Jour nal appeared within The OSI ad was on the back cover for every issue through May 1981 The June 1988 issue introduced the cover format of looking out into the world from inside of a terminal Thus the back wards writing is created This cover format was continued in all future issues The Au
35. DUE City a Zip POSTAGE MAY VARY FOR OVERSEAS 24 PEEK 65 May 1985
36. FIC CLASSIFICATION gt 4 REM THIS PROGRAM WILL FORMAT AND PRINT ADS FOR A 5 REM REQUESTED CLASSIFICATION BYPASSING THOSE WHICH 6 REM ARE EXPIRED BASED ON TODAY S DATE 7 REN 3 7 82 MARK MOVES WITH OND B KO sK1 1 R22 R3 3 KA R55 R66 sK7 7 K8 8 K9 9 3 P3 1 FLACEsFLAGI FLABI 1 FLAG21 sFORX 17023 PRINT sNEXT 10 CLS NO 30 POKE 376 44 REM ALLOW TERMINATION 31 GOSUB 62400 REM FILL VARIOUS ARRAYS 35 59 5 5 52 5 5 5 36 50 150 50 50 50 50 50 50 33 POKE 2976 13 5 CLOSE 5 PRINT ADS108 AD PRINT PROGRAM 55 PRINT 56 PRINT THIS PROGRAM PRINTS VERTICAL FORMATTED ADS FOR A 57 PRINT REQUESTED CLASSIFICATION OR FOR ALL CLASSIFICATIONS 58 PRINT BETWEEN GIVEN RECORD NUMBERS BYPASSING EXPIRED ADS 59 PRINT 60 T PEEK 14387 POKE 14457 POKE15908 T REM PRNTR CNTRL E1 INPUT PRINT GN CONSOLE C GR PRINTER P OR QUIT 0 0 IF 0 P THEN DV 5 63 IF O C THEN DV 2 64 IF O 0 THEN 31100 65 IF DV 0 THEN PRINT WHAT G0TO6 66 POKE 14639 256 POKECO73 76 7 PRINT INPUT ENTER TODAY S DATE MM DD YY DT 7 TFLEN DT BTHENPRINT ILLEGAL ENTRY G0T076 72 IFMIDS DTS 3 1 THENPRINT ILLEGAL ENTRY e 507070 73 IFMIDS DTS 6 1 THENPRINT ILLEGAL ENTRY ewe 50T070 75 XX RIGHTS DTS 1 LEFTS DTS 2 110 DTS 4 2 REM YRMDD 76 EX VAL XX REM VALUE OF EXPIRATION DATE
37. IF ER 129 THEN ERR CANNOT ACCESS FILE BOTO 51058 SEARCH ADS FILE 50 75 REM DTHER ERRORS ARE HARD ERRORS 50080 ERRS DISC ERROR CODE STRS ER IN LINE STRB EL 50094 ERG FOR 1 4 TD STEP 1 EAFERS2S6 PEEK SBBS 1 NEXT 1 50896 DV 3 PEEK 9832 IF DV 3 127 THEN DV 3 DV 3 128 4 50098 PRINT ERROR ON DEVICE CHRS DV 3 65 AT DISC ADDRESS EA 51888 REM RROR EXIT 5182 CLOSE 1 51040 REM ENTRY AT 51050 DOES NOT CLOSE THE CHANNEL 51050 PRINT PRINT PRINT e ERROR tets PRINT PRINT 51050 PRINT ERRS 51100 REN _ COMMON EXIT 51110 DEV CHRS DV 2 65 REM SELECT ORGINAL DEVICE 51120 FLAG REM ENABLE PROGRAM ABORT ON EOF HIT ERROR 51130 FLAG 22 REM ENABLE BASIC S IMM MODE 51150 FLAG 12 REM DISABLE SPACE SUPPRESSION 51150 FLAG 10 REM ENABLE PROGRAM ABORT ON DISC ERROR 51152 REM FORI 1TOPEEK 15908 PRINT DV NEXTI 51168 STOP 62508 REM FILL MISC WORK ARRAYS 62410 DIM MA 13 M2113 M 13 62420 FOR M 1TOL3 READ 1 MD M2 M NEXTH 62430 DATA JANUARY Q 62431 DATA FEBRUARY 31 31 62432 DATA MARCH 59 68 62433 DATA APRIL 90 9 62434 DATA MAY 128 121 62435 DATA JUNE 151 152 62436 DATA JULY 181 182 62437 DATA AUBUST 12 213 62438 DATA SEPTEMBER 243 244 62439 DATA OCTOBER 273 274 62448 DATA NOVEMBER 384 305 62441 DATA DECEMBER 334 335 62442 DATA YEAREND 365 366 51155 INPUTWANT TO DD ANOTHER RUN Y N YN 63008 RETURN
38. INT LOAD INPUT Another ASZAZASC AS 765 IF A 78 THEN 1140 767 RESTORE CLEAR GOTOI22e 768 3 770 Y1 Y 1802 780 QI INT Y1 4 790 QZ INT Q1 25 BOO QZSINT Y1 200 7400 810 K 820 IF Q1 4 Y1 THEN 860 830 IF Q2 100 V 1 THEN 860 320 IFY L79 THENY Y 1900 840 IF Q3 400 200 Y1 THEN 860 330 E29 D2 D G2aY 850 Kel 340 GOSUB 770 860 Ta365 1 01 G2 03 K 350 P2 ABS Z2 T 870 TsT A M D 1 360 K2eJ 1 G82 IF M 3 THEN 920 New Lower Prices High Resolution Memory and More Color Graphics 16K 195 340 5 425 24K 240 ne 375 64K 1 9075 32K 290 52K 400 Our Color Plus board provides 256 x 192 resolution with 15 A colors Two 8 bit resolution joystick interfaces are included Other MEM Options Include Software extensions to OS 65D BASIC provide a superset of Machine screw sockets APPLE II graphics instructions Call for availability of OS 65U for memory chips add 15 extensions OSI compatible floppy disk controller add 85 Color Plus can connect to the standard 48 pin bus or for full RTC Real Time Clock day date and backplane systems to the 16 pin bus time with lithium battery backup add 85 Centronics parallel printer interface with Pricing software for OS 65D and OS 65U add 65 CP 8 for CB or computers 145 4 for C4 computers 5 volt only 195 RTC only OSI CA 20 replacement 195 All boards feature solder mask silkscreen gol
39. The Unofficial OSI Users Journal P O Box 347 Owings Mills Md 21117 301 363 3268 Column One It s COMDEX time again To manufacturers and suppliers that usually means the cul mination of _months of pre paration to meet the deadline for new product announcements The OSI DBI world is no excep tion The trouble is that everyone is very secretive about what is to be shown until the last minute In our case it means that this issue was all but ready for the printers when we received the announcements That being the case there is only room for a thumbnail sketch in this col umn with the details to fol low next month To begin with in the order that we have been informed Gander will be holding sem inar on May 21st for people who are purchasing the Program Generator The Program Gener ator allows the programmer to pick out the required pieces of The Data System in creating his own program and that s an over simplification It will not be released directly to the end user only to author ized DBI and ISOTRON dealers and systems houses it that they will also show their new MS UTIL multi sys tem utilities that allows one copy of the utilities to be used in all hard disk sub systems It appears that DBI will be using Gander s gathering to make some announcements of its own The big brother 16 user to the DM 1 machine is expect ed to be there The user s machine is in one bo
40. any defined system on your hard disk Ditto with DIR and any other program you could wish was available to each partition This means an end to having to install sub sets of the standard utilities in each partition Now as another example even folks without The Data System can have the remarkable ability to copy files from one system to another using COPYFI s proven 40 speed increase over COPIER In addition this package gives the user a complete sys tems manager with two levels of optional passwords Up to 188 Log on passwords can be defined for access to SYSDIR and each of those can define up to 15 systems On top of that each of to 166 defined systems can have its Own password Gander s MS Utils uses no tricks of any kind but rather pulls together in one place the sort of multi system logic used in The Data System and in prior disk managers in a very easy to use form Password protected editors are provided for defining systems and pass words The systems definition editor is intelligent knowing the parameters for any hard disk device released by OSI Once you specify the amount of space you want in a partition it calculates the appropriate length based on your cylinder size It even keeps track of total space used so when you go to define a new system the base address is already there k k k Gander has also announced the release of a Level 5 version of the Data System with all the c
41. arket Very often the changes alienated the original cus tomer base Thus ends my history of MICRO magazine as viewed by an OSI user The computer industry is much changed since MICRO 1 appeared in 1977 to fill the needs of computer hobbyists hungry to read anything about the 6562 TAPE TO DISK PROGRAM CONVERSION MINOS By Jim McConkey 7304 Centennial Rd Rockville MD 20855 This article is the direct re sult of Editor Eddie s prod ding see it really does work and specifically add resses Gary Florence s letter in the Dec 84 issue of PEEK on the conversion of the popu lar maze game Minos by Alan Stankiewicz and Bruce Robinson to run on disk based system The conversion process is equally applicable to non games as well Since I run under HEXDOS the conversion will be geared to it though the procedure is directly ap plicable to OS65D with minor modifications The first step in the con version process is of course to load the program from tape into the computer which has been booted from the disk Watch out for auto run games on tape Hit the space bar to quit the load before the RUN gets loaded After the pro gram has been loaded it should be saved onto disk before anything else The next step should be the ob vious try running it but remove the disk first just in case Many games especially adventures will run without modification If the program won t run acts funny
42. building the data base as soon as possible knowing that it was going to take a considerable amount of time to enter the 28 008 pieces of equipment While the data base was being built we spent approximately 8 weeks putting together the custom programs which would capture date and time of ser vice on an item service tech nicians initials type of hours Reg OT Etc labor accumulators Inventory Con trol etc The hardest part of the whole application was determining how to deal with 5 7 years history on each piece of equipment This history would grow to 160 006 records very quickly and had to be able to be searched fast Our Systems Generator handles the data base quite nicely After installing the software we went through 69 days of debugging and fine tuning the system It was working great The system was running so well and producing such val able cost management and scheduling reports for Bio Med that the Engineering Depart ment decided it wanted to go on line with its 5000 pieces of equipment Since the original system was a 2 terminal 23MB system there just wasn t any room for expansion We needed a lot more hard disk space and faster data access for more terminals At this point we upgraded the system to a 258JJ that s twin 8 MB drives We had plenty of disk space now but adding 3 more terminals to the system caused too much search speed degradation We installed 5 DB 1 DBI Proces
43. ckspace It may well be that this routine is giving you trouble In my article I also showed a method for porting the OS 65D V3 3 video routines to 650 With that implemented I don t lose the cursor 2 DQFLS we were informed is no longer in business We use 1 3 daily on a hard disk with no problems You might con Sider Rick Trethewey s Edit Plus which is an improved version of WP 2 3 for some thing like 46 68 It also works with his Term Plus modem software Both are free to CompuServe OSI SIG members 3 From Rick Trethewey Sorry I can t help much with the Hooks BEXEC without knowing what error you get Check the output of the assem bler to make sure that the last routines reside in the memory locations that are pointed to by the BEXEC The REMs should give ample indi cations as to what s happening where Eddie and Rick PRESS RELEASE Gander Software Ltd the folks who brought you The Data System the Time and Task Planner and the Financial Planner has begun testing its most recent software product which it expects to have to market within 68 days either direct from Gander or per haps from Isotron Inc Multi System OS 65Utils is a complete replacement for OSI s standard 65U utilities that provides the same flexibility to the partitioned hard disk user now available to a more limited extent with the Data System Now for example you can install FDUMP once and use it on
44. consensus was that there is a Canadian user group that has one but they knew nothing about it Do you know of what they are eluding to or who to contact for more information Thank you for any information you can give me on these prob lems Glen Davis Endicott NY 13768 Glenn Although there are a multitude of references in PEEK indexes to explanations of Disk Boot routines bugs and fixes it sounds to us like your problem may be answered by the article in the October 1986 issue pg 4 or July 1983 pg 2 gives an excellent understanding of the boot routine Regarding the spreadsheet pro gram you might try TOSIE P O Box 29 Streetville On tario Canada L5M 2B7 In any case let us know how you fare so we can share it with other PEEKers Eddie k k k k ED A letter in a recent PEEK 65 mentioned using a 65C 2 I have been using one for over a year now Installation is sim ple Pull the old 6562 out and plug in the new 65C82 There are two advantages power consumption drops by about l ma and the 65C 2 is more tolerant of poor timing The 65C82 can be bought in different speed versions A 4 MHz version would probably require 158ns memory I may have a go at plugging one into my Superboard and seeing what happens at 4 MHz make sure crystal clock is buf fered I estimate Disk BASIC would run as fast as an 88186 runs in the new MS DOS micros ROM BASIC would of course be 50
45. d with PACK on OS DMS Nucleus If other than ADS PASS is preferred for your data file you will have to delete line 110 from ADS 188 and replace it with lines 96 and 110 from ADS 200 ADS 266 next month DIAGRAM 1 Sample Record Created by O8 DNB NUCLEUS PILE ADS 8 NUMBER OF RECORDS 950 CLASSIFICATION ITEM 8 1 DESC 2 DESC 3 DESC 4 PRICE PHONE CITY STATE EXP DATE CODBS Ea DIAGRAM 2 Sample Record With Data entered RECORD INDEX 171 CLASSIFICATION 123 ITEM JOHN DEERE 2040 DESC 1 LOW BOURS DESC 2 ORCHARD PROFILE DESC 3 6 DBSC 4 6 PRICE 8950 PHONE 509 662 1566 CITY WENATCHEE STATE WA EXP DATE 40124 CODES DIAGRAM 3 Record printed via ADS 198 JOHN DEERE 2048 LOW HOURS ORCHARD PROFILE gt 8958 WENATCHEE WA 589 662 1566 Listing on Page 16 THE DATA SYSTEM Stored Report Formats Stored Jobs Formats Calcs Multiple Condition Reports Multiple File Reports e Calc Rules Massage Data e Up to 100 Fields Per Record HARDWARE REQUIREMENTS 48K OSI Hard Disk serial system OS 65U 1 42 or Later Space required 1 3 megabytes for programs and data e User Designed Entry Edit Screens e Powerful Editor e Merges Append Overlay Match e Posting Batch Input e Nested Sorts 6 Deep e Abundant Utilities PRICE 650 00 User Manual 35 00 credited towards TDS purchase Michigan residents add 4 sales tax 30 day free trial if not satisfi
46. d plated edge connectors and a one year warranty Computer Generic 7514 5 Products VISA MasterCard personal checks and CODs all accepted Add 5 per board for shipping and handling To order or for more information contact Fial Computer 5221 S W Corbett Portland OR 97201 503 227 7083 Dealer Inquiries Invited PEEK 65 May 1985 19 898 T T K 900 IF INT Y1 4 1 4 THEN 930 910 IF M2 THEN 930 928 TsT 1 930 JaT 7 eINT T 7 940 RETURN 945 3 950 IF M 1 THEN PRINT January 2RETURN 960 IF M 2 THEN PRINT February 4 RETURN 972 IF Ma3 THEN PRINT March 3 RETURN 980 IF Ma4 THEN PRINT April RETURN 990 IF 5 THEN PRINT May RETURN 1000 IF M 6 THEN PRINT June RETURN 1010 IF M 7 THEN PRINT July 1RETURN 1020 IF M 8 THEN PRINT August RETURN 1030 IF M 9 THEN PRINT September RETURN 1040 IF 1 PRINT Oct aber RETURN 1050 IF M 1iTHEN PRINT November sRETURN 1060 PRINT December RETURN 106 1070 IF Ji i THEN PRINT 1080 IF Ji 2 THEN PRINT 1090 IF J1s3 THEN PRINT 1100 IF Ji 4 THEN PRINT 1110 IF Ji 5 THEN PRINT 1120 IF Ji 6 THEN PRINT Wednesday RETURN Thursday RETURN Friday 31RETURN Saturday RETURN Sunday RETURN Monday RETURN 1130 PRINT Tuesday RETURN 1140 END 199 REM ORIGIANL IDEA FROM RADIO SHACK BOOK 62 2068 Z QQ REM PAGE 21 THAT DOES NOT WORK DUE TO ERRORS 2210 REM OSI VERSION
47. e plug 6 PEEK 65 May 1985 The job is done Because this is a drive mod it would work just as well on 1 A more complex change is need ed for a DF Motor mod for microswitch op eration or toggle switch Cut the track from edge con nector pin 16 to the 1G shunt as in the diagram below Solder flying leads to pins 5 and 7 of the 1G shunt When these leads are connected the motor will run On the OSI Al3 board the one that plugs into J2 on the 565 board remove the strap a blue wire on mine that shorts 42 pin 4 to ground This is only to remove the short from the outputs of a couple of ICs a practice I don t like Of course the proper motor control method would be to write software to start stop the motor OSI provided the hardware to control the motor but never implemented the software It would be a solid job to modify the DOS As to the positioning of the motor switch I will leave it up to individual preference There are many possibilities One clever way could use a relay springset mounted above the centre spindle on the door frame arm This pushes up when the disk is clamped EDGE Corrkcra A little bit on my background I am an electronics technician working in the television broadcasting field The US calls them engineers I have had a Cl since early 1980 In May 1988 I began a User Group which is still going The first 25 newsletters were published ind
48. e are not using the screen clear call we can eliminate the saving of the USR vector in A and B although in general this is a good idea The USR vector must be changed because HEXDOS expects it at 248 241 and the X USR X must be changed to X USR 7 Finally at line 36885 we find two USR calls The first is just called with no vector set up so we know this is the screen clear and we change it to PRINT CHR 3 The vector is changed who has seen this before and the USR is called again This is the GETKEY routine again It waits for the user to press a key and then runs the program again The RUN in 39018 could be changed to ask the player if he wants to play again if you want Otherwise the only way to quit is ctr1 C or lt repeat gt for HEXDOS users To recap know your machine watch out for POKES and USR calls Also to be held under suspicion are variables set to a nice round number near 8000 The stock CIP has 8K of mem ory user storage is often put near the end of memory Don t forget to make changes requir ed by your operating system such as different set up vector locations and different commands for tape and disk 1 0 Next how to relocate machine code without knowing what it does OS 65U0 SELECTIVE SEARCH amp PRINT PROGRAM By Raymond D Roberts Box 336 Ferndale WA 98248 Have you ever needed a program that would selectively search and print records I offer this pr
49. e of MICRO was ex panded to include the 68009 During 1982 many OSI related articles and advertisements continued to appear in MICRO despite the absence of OSI it self The MICRO OSI book was announced in December 1982 In January of 1983 the banner was changed to Advancing Com puter Knowledge to reflect the widening scope of the magazine The editors re quested articles about the TRS 88 machine Many more changes were made 1983 The Learning Center feature was created for be ginners a new publisher ad dition of more color and more pictures change from MICRO INK to MICRO The mailing ad dress changed from Chelmsford MA to Amherst NH Between March and May of 1983 MICRO became a rather different mag azine The number of OSI related articles dropped off sharply In March 1983 the Micro on the OSI book was offered for sale early in In the August 1983 editorial 12 PEEK 65 May 1985 MICRO announced they would no longer carry OSI related ar ticles On information they obtained from M A and Kendata it appeared OSI was no longer selling computers into the personal market MICRO had carried more OSI articles than any other mag azine over the last six year period However editorial Space was now needed to cover the more current popular per sonal machines MICRO sug gested OSI users buy the MICRO OSI book and subscribe to one of the OSI newsletters At that time I had no further
50. e of you who have been too bashful to write before Now that the ice is broken keep it rolling If they can do it so can youl BINARY ENCODING AND BIT DETECTION OF KEYBOARD CHARACTERS A clever way to scan the key board quickly and generate Morse Code By Michael J Goldstein Courtesty of TOSIE Toronto Ohio Scientific Idea Exchange Box 29 Streetsville Ont Canada L5M 2B7 Having done the Cl Tape Con Put Your trol modification Tape Cassette Under Software Control I now had a software controlled relay available for Morse Code transmission The easiest way to have soft ware open and close a relay for Morse code is to use separate subroutine for each keyboard character with tim ing loops for opening and closing the relay for the de sired code character This works but is very memory hun gry and slow Don Moore VE3EVE suggested I use encoding and bit detection and when I looked blank he borrowed all my OSI manuals not only did he devise this elegant encoding scheme which I shall shortly reveal he also discovered how to use the machine code keyboard scan routine at SFD 110 POKE 11 POKE 12 253 Z PEEK 531 REM SETS USR POINTERS E 120 X USR X PRINTCHR Z REM KEYBOARD SCAN 139 GOTO 120 REM GO GET THE NEXT KEYBOARD PRESS This gives you a fast keyboard detection scheme If you try to scan the whole keyboard using BASIC and the m
51. ed full refund upon return TIME amp TASK PLANNER 30 DAY FREE TRIAL IF NOT SATISFIED FULL REFUND UPON RETURN e Daily Appointment Schedule e Future Planning List sorted e To Do List by rank or date e Work Sheets for all Aspects e Year amp Month Printed Calendar Transfers to Daily Schedule A SIMPLE BUT POWERFUL TOOL FOR SUCCESS HARDWARE 48K OSI 8 floppy or hard disk serial terminal system OS 65U 1 3 or later PRICE 300 00 User Manual 25 00 credited toward TTP purchase Michigan residents add 4 sales tax FINANCIAL PLANNER e Loan Annuity Analysis Annuity Due Analysis e Present Future Value Analysis HARDWARE REQUIREMENTS 48K OSI 8 floppy or hard disk serial terminal system OS 65U v 1 2 or later _ DEALERS Your Inquiries Most Welcome GANDER SOFTWARE Ltd 3223 Bross Road The Ponds Hastings MI 49058 616 945 2821 It Flies e Sinking Fund Analysis e Amortization Schedules e Interest Conversions PRICE 300 00 User Manual 25 00 credited toward Planner purchase Michigan residents add 4 sales tax FROM THE FOLKS WHO BROUGHT YOU All This THERE IS MORE COMING SOON Program Generator for TDS Proposal Planner Time and Billing A R PEEK 65 May 1985 15 16 ADS 166 1 REM ADS Copyright 1983 K ROBERTS 2 REM 1 5 83 R D ROBERTS POR 236 FERNDALE WA 98248 3 REM PRINT ADS FOR A SPECI
52. end the necessary instructions to the printer to make it do anything in the Manual but you cannot make up new fonts In BASIC just PRINT 1 CHRS X X being the number of the character from the manual In WP 2 3 type ESC 91B and the character You could make a new font and print it in the graphics mode but SLOW May be other readers will have another answer If we are off target give us more details please Eddie AD WANTED C3 B or C3 C in good working condition Also tape back up Call Richard 281 666 3258 NJ OS 65D V3 2 DISASSEMBLY MANUAL Published by Software Consult ants now available through PEEK 65 for 25 95 including postage Overseas add extra postage weight l6o0z Make check or money order in U S funds drawn on a U S bank printed this ad honestly do you see any payable to PEEK 65 P O Box 347 Owings Mills MD 21117 GIVE AWAY Multi Strike Printer Ribbons What do you currently pay for a multi strike ribbon cart ridge About 4 98 each in lots of 6 We have found a solution that May cause you never to use a fabric ribbon again 1 Did you know that most all multi strike ribbon cartridges use the same ribbon bobbin It is just pressed on a different size hub and put in your cart ridge type 2 We have found a source of recently outdated yes many are dated Diablo Hi Type I cartridges We took the oldest
53. ependently but since 1982 I have published it in KAOS a 6562 User Group based in Victoria Our club has over a hundred members while KAOS has over three hun dred I now own a C3A pur chased second hand from a business that hardly used it I have recrunched a BASIC 3 cassette with error tape OSI ISOTRON MICRO COMPUTER SYSTEM SERVICE C2 AND C3 SERIES 200 AND 300 SERIES FLOPPY DISK DRIVES HARD DISK DRIVES CD 7 23 36 74 TERMINALS PRINTERS MODEMS BOARD SWAPS CUSTOM CONFIGURATIONS CUSTOM CABLES SERVICE CONTRACTS PHONE 616 451 3778 COMPUTERLAB INC 307 MICHIGAN ST N E GRAND RAPIDS MI 49503 and a BASIC 4 chip 3 mod solves the The BASIC string bug The BASIC 4 chip fast M C or BASIC Save Load Verify for checking and can auto run programs from A special Cold Warm start function is provided for program hang ups Standard cassette format is retained No other functions are lost Either chip costs A 14 66 in Cluding postage world wide that s less than US 18 BASIC 4 is for Cl only and problem offers a token Pa cockhime TAG wey Si DE view TOP yi w uses 1206 baud Full instal lation and operating details are included and profits go to the User Group P S Basic 4 is for Cl only and uses 1208 baud BEGINNER S CORNER By L Z Jankowski Otaio Rd 1 Timaru New Zealand STOP THE DWARVE Games programs tend to be
54. ested in find ing out if this DOS has been or could be adapted for my C1P Any assistance will be greatly appreciated J Hipsher Virginia Beach VA 23456 CJ We sure thank you for follow ing up on the disk problem We too were frankly swinging in the breeze As to Astro another blank Here s hoping a reader can come to the rescue Eddie k k k I have recently been having intermittent problem with my C1P MF occasionally blitzing disks on cold boot The prob lem may have existed before now but I had so many prob lems with my old MPI drive that I replaced it with two Shugart SA 455 drives Now this problem is the only one remaining and it has no re lation as to which drive is the default A drive I called Bill Thompson at Isotron to see if he knew of any common problem like this and he thought it had been discovered and reported in one of the old issues of PEEK 65 I have only been getting PEEK 65 for a couple years and don t recall seeing it in any of the issues that I have Do you or any of the staff recognize the problem Bill s recollection is that there is some kind of race condition in the floppy interface cir cuitry that would cause such problems in a relatively small percentage of the C1P MF ma chines Also I had conversation with Rick Trethewey and some other hackers on CompuServe and asked them about a spread sheet program for the CIP The
55. ethod shown in the OSI Graphic Manual you will have to wait with your finger on the key till the keyboard scan routine Copyright 1985 PEEK 65 Inc All Rights Reserved published monthly Editor Eddie Gieske Technical Editor Brian Harston Circulation amp Advertising Mgr Karin Q Gieske Production Dept A Fusselbaugh Ginny Mays Subscription ates Air surare 19 Canada amp Mexico 1st class 26 So amp Cen America 38 30 Europe 38 30 Other Foreign 43 30 Alt subscriptions are for 1 year and are payable in advance in US Dollars For back issues subscriptions change of address or other information write to PEEK 65 P O Box 347 Owings Mills MD 21117 301 363 3268 Mention of products by trade name in editorial material or advertisements contained herein in no way constitutes en dorsements of the product or products by this magazine or the publisher 2 PEEK 65 May 1985 gets round to scanning that key very awkward typing Once you have the keyboard character you are ready to convert it to Morse Code This is how Don encoded each character first in Binary then in Decimal First we will use for a dit and 1 for a dah For the letters A We also need to know how many bits each character has after it is binary encoded Three binary digits allow you to count up to 7 in Decimal The longest Morse character has 8 bits t
56. f programming speech and sound effect rates so that pitch may glide from one setting to another during the pronounciation of several phonemes This gives the SSI 263A the ability to produce highly intelligible and natu ral sounding speech Other registers are provided for varying amplitude articula tion vocal tract filter set tings and phoneme output and duration BASIC programming may be used to create high quality speech synthesis and MACHINE LANGUAGE programs are Capable of producing remark able speech and sound effects The Synphothizer is available for the OSI sixteen pin bus and uses sub port locations 8 to 15 C788 to C7 F or 58952 to 58959 The first five addresses are used for the SSI 263A Addresses 50957 and 50958 are used each for one of the two TI sound chips Add resses 50948 to 56951 are not used by the Synphothizer and an additional sixteen pin soc ket plus decoding for address bit 3 is provided for con necting to other 16 pin bus devices which use those add resses An on board clock is provided to supply the 2MHz and 1MHz clock signals required by the SN7489As and the SSI 263A The board will require 5V for the sound chip circuitry and 9 to 12V for the amplifiers Currently available from HG Interfaces as a bare board with assembly and programming instructions the Synphothizer Board is priced at 40 98 HOW TO PUT A BASIC PROGRAM AT ANY ADDRESS By John Whitehead 17 F
57. f these decimal values would be read into an array to be used later in sending code The decimal values are stored in DATA statements 248 GOTO 7860 REM FIRST BIT AIN T Al SO IT MUST BE A 6 SO GO TO THE SEND A DIT SUBROUTINE 25 I I 2 NEXTL1 REM YOU VE CHECKED THE FIRST BIT GO CHECK THE NEXT 268 REM WAIT A SPELL AFTER YOU VE SENT THE LAST DIT OR DAH AND GO BACK TO THE KEYBOARD SCAN FOR A NEW CHARACTER USE TIMING LOOPS FOR DELAYS 276 GOTO 128 Oh Yeah TOSIE s beginners articles by Roger say you should initialize all those variables before starting into your loops to keep things running speedily and to avoid having to initialize each var iable each time you go through the loops 6000 REM DAH SUBROUTINE 6010 CLOSE THE RELAY WAIT A WHILE OPEN THE RELAY WAIT A SPELL AND BACK TO THE PROGRAM 70090 REM DIT SUBROUTINE 7019 CLOSE THE RELAY WAIT A WHILE ETC ETC Note that using this tech nique you must send a Morse character before typing the next character there is no typing ahead can someone devise a method to do this To make your array counter agree with the keyboard press ASCII value Here 15 the sequence of characters for which decimal values are read into your array X indicates a space r 28123456789 XXXX XABCDEFG HIJ KLMNOPQRSTUVWXYZ Would it humble you if I men tioned that Don had never used BASIC before he devised this algorithm He speaks 4 other computin
58. faster Does this tell us that Intel stuff is just plain slow I am sure many readers leapt to the first article in the February issue of PEEK 65 enclose a short program DIRDEL which readers may find useful I would also 10 PRINT 28 20 2 advise using DOS 3 2 with the program DOS 3 3 and its seq file read causes too many problems because of the need to avoid CTRL key codes Leo Jankowski Timaru New Zealand k k k kxk REM Directory selective delete by 1 2 40 PRINT TAB 10 DELETE DIRECTORY UTILITY FOR 8 CHR 34 DISKS SO FOR X 1 TO 64 PRINT 5s NEXT 1 PRINT 60 PRINT is the of file names gt NOT lt to be deleted 70 PRINT PRINT Let P 19 to save first 33 Tracks 3 PRINT PRINT 80 INPUT of names from Trk gt NOT lt to be deleted P 85 IF P gt 31 THEN PRINT Can t be done PRINT PRINT GOTO 80 90 100 4 11897 P38 110 E 12145 REM TRACK 08 1 Omit first P names z REM 2F78 7512145 120 DISK CA 2E79 08 1 3s GOSUB 190 DISK SA 08 1 2E79 1 130 140 M 11897 150 DISK CA 2E79 08 2 GOSUB 170 DISK SA 8 2 2 79 1 160 170 PRINT PRINT lt lt Done gt gt END 180 190 FOR C M TO E STEP 8 FOR X C 5 POKE X 35 NEXT X 200 POKE C 6 0 POKE C 7 0 NEXT RETURN HH RH HHH HH HH HH HE HEH HHH HH ED Greetings from the Great White North As a new s
59. g languages however 1 REM MORSE CODE TRANSMIT BY MIKE GOLDSTEIN VE3GFN 298 WARDEN AVENUE 20 REM SCARBOROUGH ONTARIO MIN3A4 CANADA ALGORITHM DON MOORE VE3EVE 3 REM PROGRAM FOR OSI ClP WITH AARDVARK C1S MONITOR ROM 40 REM COMPUTER TO BE MODIFIED CONTROL A RELAY WITH SOFTWARE AT 61440 50 DIMC 5 B 255 3 5254 Fel G08 K 61440 M85 3 Yoo 6 He2S6 J 2 POKE11 6 POKE12 253 REM SETS POINTERS TO SCAN ROUTINE 76 PRINT CODE MASTER PRINT PRINT PRINT PRINT 88 CO 53381 FORX 1 1023 PORECO 32 X 43 NEXTX 98 PRINT To type without sending code press ESC 188 PRINT PRINT To return to code press ESC again 118 PRINT PRINT type for ERROR KisT OFT MTS 120 PRINT PRINT type for AA 130 PRINT PRINT type for AR 148 PRINT PRINT type to change SPEED 15 PRINT PRINT hit ESC to continue WAIT 57088 32 254 160 PRINT PRINT PRINT 178 GOSUB6 88 PRINTCHRS 03 188 PRINT CODE NO CODE hit ESC PRINT 268 POKE5S48 6 POKE5S49 26 PRINTCHRS 3 REM SCREEN FORMATTING 218 PRINT ERROR AA AR PORX 11023 POKECO 32 5 X 183 NEXT 228 FORX 1 T023 POKECO 32 22 X 183 NEXT 230 PORES 48 27 POKES 49 30 PRINTCHRS 83 PRINTY WPM SP SPEED 235 REM CHANGE SCREEN FORMAT TO PRINT your CALLSIGN HERE 240 PRINT PRINT 258 123456789 VE3GFN PORES 48 10 POKE549 24 PRINTCHRS 03 ABCDEFGH IJ KLMNOPQRSTUVWXYZ 268 PORZ 11047 READC Z NEXT RESTORE L 0 REM LINE CHARACTER POSITION
60. gust 1988 issue contain ed results of the first and only MICRO limerick contest as well as the introduction of a column devoted to OSI enti tled Up From Basements During 1988 most issues had two or three OSI related art icles The average circula tion during 1989 was 18521 In March of 1981 a new OSI column Challenges began There were many changes in the June 1981 issue The magazine looked different with a new type of binding and expansion to 112 pages However the OSI ad was missing from the back cover and was never to re appear This corresponded with the buy out of OSI by M A MICRO announced both the 6502 and the 6889 CPUs would now be covered The banner was now The 6582 6809 Journal The July 1981 issue contained a special section devoted to OSI with five articles This issue also car ried the final Small Systems Journal and the last regular editorial by Robert Tripp the founder of MICRO More OSI related vendors dis DISK DRIVE RECONDITIONING WINCHESTER DRIVES FLAT RATE CLEAN ROOM SERVICE parts amp labor included 23meg 550 00 10meg 450 00 Shugart SA4008 Shugart SA1004 Seagate ST412 10meg 350 00 FLOPPY DRIVE FLAT RATES 8 Single Sided Shugart 190 00 8 Double Sided Shugart 250 00 8 Single Sided Siemens D amp E Series 150 00 8 Double Sided Siemens P Series 170 00 Write or call for detailed brochure 90 Day warranty on Floppy amp Large
61. hanges necessary to take full advantage of DBI s extra memory Except for using that extra memory it is function ally identical to and looks and acts the same as the very popular OSI version which Isotron Inc was the first to bundle Dealers around the country report to Gander that they have begun to write ap plications software around TDS and its Type 38 file struc ture Now that same power is available to the user with an OSI box running Denver boards LETTERS ED I have a CI1P MF with OS 65D V3 3 I need to know how to keep BASIC s input from strip ping the following characters at sign ASCII 48 square brackets 5B and 5D curly braces 7B and 7C and the vertical bar 7D Last year I needed some en hancements for my text editor namely how to keep the DOS BASIC input from eating lead ing blanks double quotes commas and colons These were completely answered by J L Pottier in the Jan 84 issue pg 16 Lately I ve had the need to use all the ASCII printable characters key board driver from the old Aardvark Journal Dec 81 pgs 18 26 lets me generate them and BASIC lets me print them but the input screens out the above mentioned characters After a few days of disassem bling code I discovered the device drivers were respon sible for the square brackets only Looking into the BASIC input routine is fruitless It is very convoluted and PEEK 65 May 1985 21 bears almost
62. hard disk reliability Floppies don t The DMA 360 protects your data in a totally sealed cartridge Floppies don t The DMA 360 packs 13 megabytes 10 formatted on a single ANSI standard DMA Systems cartridge It takes up to 30 floppy removable 514 disks to achieve an equal Winchester capacity The DMA 360 even has a lower cost per megabyte than a floppy But it gives you so much more Like an average access time of 98 milliseconds A transfer rate of 625 kilobytes per second And an error rate on par with the most reliable conventional Winchester disk drives FOR PRICING AND DELIVERY CONTACT YOUR NEAREST D B I DEALER WANGTEK 5000 is a registered trademark of WANGTEK CORPORATION DMA 360 is a registered trademark of DMA SYSTEMS PEEK 65 May 1985 5 logic to block off the INDEX pulse until the motor was up to speed say a 1 2 sec delay The monostable would be triggered off the COXX line that feeds the disk controller PIA It would time out and stop the motor after say 3 seconds However a manual motor switch would be easy to implement either a simple toggle or a micro switch with an operating arm actuated by the drive door when the release is pushed The latter idea has the advan tage of being automatic plus instant access to disk files It s a compromised solution During program development or game playing it is always a wise precaution to remove the disk in case of power fai
63. he error sign is eeccces Later we will see that using only 3 binary dig its for bit counting allows us to easily divide the decimal equivalent of our binary en coded character by 256 So we will use extra binary digits to count the number of character bits MINUS ONE 1024 512 256 128 18 DIM C 58 20 FOR Z l TO5 READ C Z NEXT RESTORE RR 10 1 010 1620DATA Now we must detect the Number of bits in each character and send the dit or dah for each bit BINARY 199 Z Z 43 REM CONVERTS 7 FROM ASCII VALUE TO ARRAY COUNTER 208 H 256 N INT C Z H REM NUMBER OF BINARY BITS 1 IN CHARACTER 219 I 128 FOR Ll TON Il INT B I REM IS FIRST BITA1 OR A 6 226 B B I I1 REM VALUE OF B UPDATES TO CHECK NEXT BIT 230 IF Il THEN 6000 REM IF I1 FIRST BIT IS Al GO TO SEND A DAH SUB ROUTINE ENCODING If the character has four bits 1808 the bit count shows 3 11 Our data word now con sists of up to 11 binary digits the first 3 from the left signify how many actual bits 1 our encoded character contains The remaining bits encode our character Well we can t use binary dig its easily in BASIC so let s now convert our unique binary codes to equivalent decimal numbers That s easy just add the decimal values of all the binary digits we used A 256 64 326 B 512 256 128 896 512 256 128 32 928 All o
64. he first part of that plan is to design the graphics See Figure 1 Next design the action The graphics action is as follows draw the scaffold draw figure in horizontal strips after 5 guesses the dwarve appears and pushes a step to the scaffold the dwarve climbs one step after each wrong guess on the top step the dwarve pulls the pin out and throws it away the pin is caught by another dwarve at the top of the screen the figure s eyes flash trap doors open figure drops mouth turns down eyes reverse dwarve jumps up and down The other graphics are messages are printed to the screen at various times scores are printed correctly guessed letters are printed to make up the word THE PROGRAM The program was written to run under OSI 65D 3 3 The spaces have been inserted for clarity only do not type them in All REM and spacing lines can be omitted The shorter a program is the faster it will Before typing in the program set one buffer before BASIC s workspace Do this using option 7 under DOS 3 3 or run CHANGE under DOS 3 2 The first two POKES in line 40 establish null input on lt RETURN gt The third POKE can be used to disable CTRL C substitute 96 for the 173 The first block of any program HAS YOUR HARD DISK GONE S O F F T BTI is your Authorized Service Agent for Okidata OSI and DTO 14 inch disk drives BTI service includes e Maintenance
65. his amounts to over 22 0800 pieces of equipment in St Anthony s The system was to track repairs made to each piece of equipment schedule routine preventive mainten ance track all parts costs associated with a piece of equipment report breakeven cost analysis figures and report man power utilization to management Bio Med had tried to get these programs established on the hospital s multi million dol lar mainframe but was told that the cost would be 1 the hundreds of thousands of dol lars and it would take 3 to 5 years to complete This was not acceptable to Bio Med and thus they decided to get their own system to do these chores For two years they had an in house programmer who using OSI s DMS Nucleus tried to get the applications on line His success was limited and he accepted another position at a different hospital The Bio Med Department began searching for someone who could complete the project They found Comptrol Systems by a referral from the distributor who had sold them the machine After analyzing the need pre paring cost time frame stud ies and presenting a proposal to the Bio Med Department we began the project We esti mated 6 9 months for total completion Using our Systems Generator Data Base Manage ment System we built all the necessary file structures and PEEK 65 May 1985 3 data base maintenance programs within 2 weeks We did this so that St Anthony s could begin
66. lure anyway The 1 2 second delay can be annoying when ASCII files are constantly being ac cessed Just my thoughts on the matter Now to the mod for head load 65D has all the software need ed to operate the load relay so no problem there Unlike the 8 systems the MPI drive does not have separate pin for head load so some hacking is needed on the disk con troller board on the drive that is Step 1 Locate the shunt 1G mounted near the edge connect or on the drive board Open circuit all links on the shunt except the one joining pins 2 and 13 Solder a wire between pins 4 and 8 either under the board or preferably across the shunt links Step 2 Perform the track cut modification as in the dia gram Solder a wire between the pad and pin 4 of the 1G shunt This can be done under the board or by a flying lead up to the shunt link The latter is preferable Step 3 Locate the black wire on J4 pin 5 J4 is the large connector next to the edge connector and numbering starts from that end If you remove the connector from the plug and turn it over you will see a slot Push the end of a small screwdriver against the pin in the slot while gently pulling on the wire and the pin will come out Bend up the locking tab on the slightly be fore pushing the pin into the connector socket number 19 four from the other end until it clicks into place Refit the connector onto th
67. n a single 8 by 6 5 inch board are one speech chip and two TI sound chips plus three independent one watt am plifiers with volume con trols providing stereo sound and speech effects 19 PEEK 65 May 1985 Each of the TI sound chips provides three independent tone generators capable of covering a five octave range One generator is provided for white and periodically varying noise and may be controlled by the output of tone generat or 3 Each of the chip s sound generators also has its own attenuator which may be programmed to cover 28 dB range from maximum amplitude to off in sixteen 2 dB steps This most useful feature of the SN76489A makes the syn thesis of many interesting sound effects possible Pro gramming tones may be accom plished by simply POKEing two bytes of data to the chip and only one byte is required for attenuator and noise updates The SSI 263A is a phoneme based speech synthesizer pho nemes being the basic word sounds from which language is constructed and is fore capable of producing continuous unlimited vocabu lary speech But unlike ear lier chips of this type the SSI chip contains five inter nal registers for continuously varying speech and sound ef fects Registers are provided for varying pitch at two addresses a total of 12 bits in two 8 bit registers and allow a range of 4996 pitch settings The remaining four bits of one register provides the capability o
68. no resemblance to the BASIC in ROM version de scribed in the Oct 82 issue Thanks for your help Frank Glandorf Cincinnati OH 45228 Frank The square brackets are trap ped by 65D not BASIC but it is certainly possible to POKE those into oblivion The and curley brackets and verti cal bar are mysteries to me I can look at BASIC and reply more specifically but I think the solution lies elsewhere The best solution is to add a USR X routine that latches into the keyboard poll and re turns the ASCII value numeric variable that a C CHRS should allow you to build string trapping a terminator charact er en route Following PEEK now does have the 0OS 65D V3 2 Disassembly manual avail able for 25 95 including postage if you want to hunt for an answer there Rick Trethewey Sys Operator OSI SIG on CompuServe Lucky youl We have two an swers for you Regarding 65D 3 3 to allow POKE 1398 with what you want to be the new line delete character To allow braces tilde and stuff POKE 1386 127 To bypass the trapping of square backets by the O S try this POKE 9014 32 POKE 9015 103 POKE 9816 35 Dan Schwartz k k kk ED I had written some time ago PEEK Nov 84 and asked for help concerning a problem that I had with not being able to write to disks because the headers and d ata were being garbaged I say had because I found solution to the problem and now ever
69. ogram in the hope that it will help someone It is a rather basic no pun program 14 PEEK 65 May 1985 and I m sure some of you expert hackers will call it simple PEEK 65 has asked all of us to share and so this is my contribution Please remember that some of us are USERS not programmers While I find that my desire and interest in programming stead ily increases my time to do so does not I am deeply in debted to you folks who con tribute your knowledge and ideas with us beginners ADS 109 This OS65U program handles random record data files I have created and filled with the OS DMS Nucleus It as sumes that the data file is named ADS More on this later The program searches on a 3 digit numerical variable in the first field of the record i e 000 thru 999 This is controlled by LINE 33035 In my application I use a 12 field record with the first field 3 characters long see diagram 1 I assign a number upon data entry of the record Suppose I have 308 records on autos I then classify red Fords under 168 blue Fords under 191 red Chevrolets under 162 etc If I want a printout of all records on blue Fords I make a search and print with ADS 100 and it prints all records with 101 in the first field You should be able to see many applications for use of such a program If you want to search on Ford Robin Appaloosa or some other string variable change LINE 33035
70. one we could find put it in our NEC cartridge Now difference We can t either So we are offering those of you who use Hi Type I or are willing to pry open whatever cartridge you are using and replace the bobbin a deal you can t refuse Buy one box of 6 cartridges for 8 00 and we will give you a second box FREE That s 66 66 cents a piece or 83 off At that rate how can you lose 3 for post age and handling Make check Or money order in U S funds drawn on a U S bank payable to PEEK 65 P O Box 347 Owings Mills Md 21117 or der NOW supply limited zkekek Still in MUST SELL original wrappings KEYWORD CP M Word Processor CP M v 2 25 Cost was 400 80 each Will sacri fice 258 08 each 408 00 for set Reply PEEK Box K c o PEEK 65 Box 347 Owings Mills MD 21117 f k kk Send for free catalog Aurora Software 37 South Mitchell Arlington Heights IL 60805 Phone 312 259 4071 k k k k Good prices on collection of OSI equipment and accessories Send SASE for complete list Ricky Peterson 206 Pine Val ley Warner Robins GA 31093 kkk KK FOR SALE C3S with almost new FDD 100 8 8 drives 1368 or offer 2 new FDD 100 8 drives with box and power supply 425 or offer Tom McGourin 219 429 4160 days 219 4869 6001 eves weekends PEEK 65 May 1985 23 BULK RATE U S POSTAGE x P e The Unofficial OSI Users Journal
71. perator This Work Order indicates how much time was spent on the any materials used etc The Operator enters this into the system and the system using the PM Code calculates the next PM date A secondary reason for keeping so much history on the system is that in Colorado hospitals must go through a state cer tification audit in order to continue to operate To meet the state s requirements his torical data on all equipment must be retained for the state s auditors to review This also comes in handy in court cases involving malfunc tioning equipment Before acquiring the computer system all these records were kept by hand theoretically The state s certification inspec tion required St Anthony s to have from 5 7 people avail able just to track down equipment history for the auditors It is now done by the auditors themselves They just sit down at the system and look up what they want to see Hard copy is also avail able to them This has saved St Anthony s a minimum of 190 808 since installing the system man hours saved during audits Believe me this FAR EXCEEDS the amount they have invested in both hardware and software All in all St Anthony s is very pleased with their sys tem Hardware down time over the past 5 years has been less than 24 hours Software down time has been less than 2 hours The system currently supports 5 terminals via DB l s 2 printers via DBI s DP 1
72. program If you intend to use it omit lines 1 amp 2 and type in lines 10 26 and 30 exact ly as shown The program uses EXAM to read the first 5 bytes from each track header from track 1 to 76 The pro gram was originally written to test drive hardware On my system the program does not give consistent results Sometimes the first byte read is not 43 other times it is Is the byte before 43 a timing byte or just something left in the PIA registers see line 158 OSI literature reveals that the 43 and the 57 are a two byte track start code The next number is the track number followed ae track type code a BIO COMPATIBILITY PROGRAM A new twist to an old standby for any OSI machine By R R Groome 824 W Main Street Richmond IN 47374 In the Radio Shack book 62 2868 there was a nice bio compatibility program that would not run for errors Here is my revision In the listing the CHR 29 CHR 31 type lines are er commands If anyone wants a cassette copy send me a cassette with a couple programs anything and I will return both on the other side of cassette C 60 5 POKE12 83 8 Kad 108 118 128 138 15 155 190 200 210 220 230 240 2530 310 DIM A1 30 B1 30 DIM A 12 FOR laiTOL2rREADA I NEXT 1 DATA 31 59 90 120 151 141 212 243 273 304 334 Yat PRINT What is the name of person one INPUTWS PRINT PRINT What is sWwe
73. projects etc Some of these works have been published During the past years I have been involved with industrial electronics control CNC So you can see that the main use of my OSI 15 related to hardware For this use I have not seen a better ma chine The I O capabilities are almost endless The protoboard connected to the computer buffered bus is in valuable In the meantime I have developed a lot of the software and hardware that I needed Most of it is in public domain The following is a partial list Display Date and Time on line 26 out of 65D 3 3 window under OS automatically on boot Need 2 RT Clock Printer set up menu in BASIC EPROM 2716 2732 reader pro grammer needs a simple piece of hardware and 2 OSI s PIA 6821 Sun Ephemerides for any geo graphic location at any time Parallel amp Serial intercon nection with other small computers Creating a Centronics type port with PIAs with OS65D and OS65U modifications Interface for a Smith Corona EC 1166 Daisywheel typewriter to use as a printer on the created parallel Centronics port Various Assembler routines to be called from BASIC USR funct search RAM move blocks of RAM load through parallel port etc Monitoring and talking with a SDK 85 single board microcom puter kit INTEL An 8748 developing system with the capability to program the 8748 s EPROM running single step and more
74. referred method is to lower the top of free memory by the appropriate POKEs and to put the data in a protected space at the end of memory 18 26 38 58 60 65 157 89 212 LISTING l TAPE VERSION OF MINOS DATA162 0 169 32 157 0 288 157 08 209 157 0 218 157 0 211 DATA157 213 157 8 214 157 0 215 232 208 229 96 GOSUB1319 Q SR POKE12 Q 256 M PEEK 12 POKE11 Q 256 M READM POKEQ M IFM lt gt 96 THENQ Q 1 GOTO6 X USR X 1200 Q SM 1 PRINT X USR X 1310 SR 660 VM 28 HM 20 IFPEEK 57888 lt 127THENM 40 2635 X USR X 9000 POKE240 0 POKE241 253 J USR X 98605 J PEEK 531 25009 5 7000 30005 X USR X V 2 GOSUB1290 POKE11 POKE12 253 X USR X 18 POKE227 255 38 GOSUB1319 Q SR 65 PRINTCHRS 3 1200 Q SM 1 PRINT PRINTCHRS 3 LISTING 2 HEXDOS VERSION OF MINOS gt 1318 SR 10006 VM 20 HM 20 IFPEEK 57088 lt 127THENM 40 2635 PRINTCHRS 3 9696 POKE240 0 POKE241 253 J USR 7 9005 J PEEK 531 25009 5 10000 36685 PRINTCHR 3 V 2 GOSUB1206 POKE 1 POKE12 253 X USR X 18 166 118 128 139 148 158 168 176 188 198 208 2198 228 6680 8882 0084 0607 DOPA 886D 0818 6813 0616 6819 661C 661D 01 og 20 8B 0 08 og 00 og Bg E5 Continuing down the we find X USR X in line 1200 execu By tracing the program tion we see that this LISTING 3 OPTION L 2 S 2 CLEAR SCREEN ROUTINE USED IN MINOS GAME CLS LOOP
75. rudal Crescent Knoxfield 318 Australia With CMOS memory available with battery backup you may want to put your most used there BASIC programs in it or them in EPROM as I have This is how to do it put done A BASIC program has to be written at the address it is RUN at or LOADed there from tape It can t be moved there with the Extended monitor because each BASIC line is stored in memory with the ad dress of the next line In this example it is assumed 8K of RAM at 0008 to SI1FFF and another 8K at 8660 to 9FFF The following are the BASIC work space pointers that have to be altered memory area as in 007B 887C Procedure Do a cold start Break Change contents of memory at 87A 87C and 2886 as above Put 3 nulls at the start of the new Memory i e B at 8800 8601 and 8 2 i Type in your BASIC program or LOAD it from tape This will be loaded at 8009 When it s working correctly then If your two sections of RAM are not continuous as assumed above you can now cold start to reset the point Pointer cold start new value new value new value address value for loading for e iting running 8800 or running only 0079 text start LO l gl l gl 007 text start HI 3 80 88 80 087B text end LO 63 03 see note see note 007 text end HI 93 86 A B 8685 memory end LO 66 og 08 see note 0686 memory end HI 20 Ag AO Note A This has to contain the address of the nex
76. t ing blank Tl in line 118 is used in the time delay loop in line 1260 2 15 used to speed up the game after 5 wrong guesses have been made The program chooses its words from array W whose size is fixed by NW in line 126 The graphics characters strips are held in array C L In line 118 are the names of three sequential files from which lists of words can read RANDOM NUMBERS Line 130 sets up the array from which numbers will be chosen at random Each number will be chosen ONCE only BASIC s random number seed is constantly updated in location 8996 2324 This happens when devices 1 and 2 are polled The code is at 24F9 and 252E respectively PEEKing RAM location 8996 will give a random number Y be tween and 255 This number is then used in RND Y to start a pseudo random number series different to the pre vious one Information on how pseudo random numbers are pro duced comes under the heading of Linear Congruential Gen erators It is not easy reading CHANGES FOR 1 For 1 users a print at statement can be simulated with 2000 FOR H 1 TO LEN Z POKE X H ASC MID Z H 1 NEXTH X X 24 8 PEEK 65 May 1985 RETURN where Z is the string to be printed and X l is the first screen address The 24 is screen width A good example of how the program could be adapted C1P to use line 2866 would be as follows Change lines 158 and 16 to 150
77. t loca tion after the three BASIC nulls that are at the end of every BASIC program It is up Gated automatically If you want to return to a program and edit it then this has to be noted before leaving then restored when returning Note B This can be the end of the new program or the end of a program that is in 0388 to 2000 Note C This is the memory and must be A HISTORY OF MICRO MAGAZINE end of the same By Earl Morris 3200 Washington Street Midland MI 48646 The first issue of MICRO ap peared in October of 1977 The 28 page magazine was sub titled The 6582 Journal and its purpose was to bring to gether users of 6562 machines The major 6502 machine at that time was the KIM l Issue one also marked the first of a long series of articles penned by the infamous Mike Rowe pun intended The second issue appearing December 1977 con tained an article on the OSI Challenger as well as the just released Commodore PET MICRO soon became subtitled The Magazine of the Apple Kim Pet and Other 6562 Systems Despite the growing number of articles and adver tisements OSI was still Classified among the other ers back to normal If your RAM is continuous you will need to reset the point ers to the cold start values using the monitor then warm start or do a cold start but answer memory size with a value less than the start of your BASIC program in high memory now be To
78. ubscriber to PEEK 65 I would like to take the opportunity to commend you on the content of your pub lication In reading through some of the back issues just received I know I missed a lot by not being your mailing list over the past few years while working with my OSI C4P MF OS 65D V3 2 In addition to the above I am very interested in obtaining a copy of the Tiny Compiler or F Basic and Busicalc on 5 25 disk perhaps in some ex change with one of your read ers if it is not still avail able from a commercial source Do you have any contacts in this regard Lloyd G Bunbury Ontario CANADA K2H 7V2 Lloyd Re F BASIC Rick Trethewey says it rings a bell with him as being a product of Pegasus Software in Hawaii they may no longer be in business No doubt someone still owns the copyright but who Re Tiny Compiler available FREE on OSI SIG on CompuServe or for a fee from David Pitts 16011 Stonehaven Drive Houston TX 77059 known ad dress as of Dec 83 Also BUSI CALC used to be available from Micro Software Interna tional 3388 South Madelyn Sioux Falls South Dakota 57106 not sure if they still support OSI but worth a try Eddie ED Do you folks know of a program that can produce different type fonts and sizes of print for use with a C4P and EPSON MX89 with Graftrax Ray Peterson Edmore MI 48829 That s not much to go on Your 4P can s
79. x and all disks and storage in another including 288 MBs of hard disk floppy and tape stream er They may even have the Rumor has HISTOR TO DISK OS 65U SELECT SEARCH amp PR PROG WAZZAT CORNER i BLO COMPATIBIL I TY PROGRA MAY 1985 VOL 6 NO 5 NE PROG MINOS lt OURCE PROG DEVIATIONS newly revised DB l CPU boards in it using the 8 16 proces sor and 4K x 1K memory Last ly if things work out they will finally release the 65 E op system which contains a 17 integer digit precision BASIC with twice as many reserved words and faster than U Isotron has two new hardware efforts to announce at COMDEX First is the Portland Board utilizing the 6582C at 4 MHz for the 208 series computers which we commented on in this column last month The big news is the new lineup of 708 series machines Some of you have commented that the OSI hierarchy have been hard to reach these past months The reason is that they have been slogging it out to make the COMDEX deadline with a totally new machine based on the 68098 family of CPUs Ultimately there will be three machines the 720 in the ad 719 and a baby as yet unnamed They all will be garden variety UNIX 5 based with the 728 utilizing co processors 68668 _ and 68088 to relieve the main CPU of its time consuming ser ial duties The key points to the user
80. ything works fine The problem seems to have been related to the termination of the write data line on the D amp N controller During pulse width set up the write data line is jumpered to the read data and SEP clock inputs so that the read pulse widths can be set What I found was that if I left the jumper in between write data and SEP DATA I could write to a disk As a permanent fix I installed two resistors on the write data line so that it is 22 PEEK 65 May 1985 into a terminated just like the SEP data line Originally writed data has a pull up resistor to 5 volts and SEP DATA has resistors to both 5 volts and ground Anyway this should be one for your believe it or not filel Second I have a question re garding another operating system that I have run across It s called ASTRO GRAPHICS and was written by a fellow named Corey Ostman and runs on a C4P The DOS operates similarly to OS65D but pat ches have been made to BASIC to allow for some pretty im pressive graphics One pro gram is a lunar lander that is equal to the old arcade land er complete with various landing pads and point multi ples for difficulty Plus the BEXEC has been modified for blinking cursor and a HOME command that clears the screen and homes the cursor to the upper left of the CRT BASIC was patched to allow for a very good X Y plot function that will draw graphics on a pixel by pixel level I am very inter

Column One

Contents

Download Pdf Manuals

Related Search

Related Contents