Home

Vol 4 No 9

1. TH ENF RINT 7 CHRE 34 NE 1 3 CHRE 34 437 NEXTI 464 DISK close 4 DISK close 7 RETURN INFUT gt 2 TH MORE EX MON ADDITIONS by Bill Woodland 6000 Turtle Dove Drive Austin TX 78744 First of all thanks PEEK 65 for such a wonderful job of distributing all of this handy OSI information I have been reading your magazine from the Start and have found many valuable pieces of information which were of great help I suggest to all of you OSI and computer neophytes that you buy all of the back issues of PEEK 65 and read them one by one These will probably answer about 99 of your ques tions Here are a few goodies for you both of which are ad ditions to the 65D Extended Monitor The first is a Hex Dump with ASCII on the right the second will renumber the assembly code which is pre sently in the workspace The ASCII dump routine was written for the Serial Term inal but can be set up for the 540 board Lines 80 and 90 add the address of the routine to the EX MON s jump table in place of the J command Use this just like the D command J3200 3300 will dump with ASCII the block of memory from 3200 S 32FF Line 110 gets the starting address from the OS input buffer Lines 120 through 250 print the least significant digit of the ad dress across the top of the hex part 260 through 320 print it over the ASCII part Lines 330 to 410 print the start address of the nex
2. years PRICE 400 00 User Manual 25 00 credited toward Planner purchase Michigan residents add 4 sales tax COMING SOON Ultimate Time Scheduler DEALERS This program of great value to lawyers bankers insurance people and real estate people will help you sell hardware Inquiries invited 18 choice of ate and increments It also includes a simple calculator which can be used without disturbing other problems displayed and which contains three separate user addressable memories Finally to aid planning the Menu program will generate a calendar for any month year between 1901 and 2399 and accurately accounts for leap GANDER SOFTWARE 3223 Bross Road The Ponds Hastings MI 49058 h Flies resend its original message The delay routine which was called had been overlayed by WP 3 3 A problem would appear when the node was busy and WP 3 3 made a request from the node i e LOAD PUT MERGE etc The work station would then hang and never return from the request Due to the loss of this sub routine the delay routine calls have to be changed to call another delay routine The following fix solves this problem First load the WP 3 program by entering LOAD WP 3 PASS Enter the lines following two new 211 IF PEEK 16317 lt gt THEN 220 212 POKE 14025 184 POKE14026 62 POKE14044 184 POKE1 4045 62 Now save the WP 3 entering program by
3. 2THENPRINT 248 ITFMAS oS THENIFLEN CHS gt 23T HENPRINTMIDS CHS 24 3 TAR 256 ss GOTO26a 2508 IFMA lt THENPRINTTABE 26 We a 26 PRINT 3s QR 2 RETURN 270 We8d DISK SE BR 288 PRINT PRINTOUT F OR SCR EEN DISK GO 2336 AS CHRS F EEK 9859 298 PRINTAH 3G TFAK FP THENS 2a 31g GOTOII 328 W 8ds POKE64512 3 POKES4S1 2 16 DISK TO 2 a3 S3 PRINT PHYSIOLOGY TEST TA B 16 THTAR W 21 NAME S40 IFPEEK 8994 lt D2 THENFORx 1 TO16 POKE 64513 95 NEXT PRINT 358 PRINTTAR W 21 Hours 368 IFPEEK 8994 lt gt 2THENFOR 1705 POKES64513 95 NEXT PRINT 378 REM DISK OPEN 6 INFUT 6 MC GOSURSSS 38 DISK OPEN 46 s INPUT 6 MA GOSUBS8d s DISK CLOSE 6 REM MATCH 394 DISK OPEN 6 s INFUT 6 TF GOSUB7AR 4808 REMno not4 increment ite m counter when Ping other kind s items 410 REM 426 REM 430 REM 446 DISK 10 2 2 DISkK se a END 430 cat kee multiple choice KKK GOSUBS 6S 46 POKE23 w FORI 1TOMC REM m ultiple choice 478 no not lsns MID STR no 2 45 00 480 INPUTHS ad BS AIS A2 ARS AAG 490 Q NS AS HSs QR 1 GOSUR1 1g Sag Q A A1 GOSUBLIA 518 O K A2 GOSUB114 S209 O C AT GOSURLIA 538 Q D A4 GOSUR1I14 S44 PRINT PRINT 5 NEXTI RETURN FOP PRINT P 28 p p LEN CAS 2 PRINTCHRS 14 TAR p CAS S7 PRINT RETURN S8 cas exe matching KK EPR INT GOSUBS4a S98
4. COMPLETE DOCUMENTATION AND OPERATING INSTRUCTIONS e Record Keeping UNIFORMED FIRE INCIDENT REPORTING SYSTEM UFIRS PREPARES UFIRS REPORTS COMPLETE LOCAL DATA BASE DEALER INQUERIES WANTED CONTACT Bob Tidmore MARMEN 125 Sixth Avenue Menominee Michigan 49858 906 863 2611 DISK DRIVE RECONDITIONING WINCHESTER DRIVES FLAT RATE CLEAN ROOM SERVICE _ parts amp labor included Shugart SA1002 Smeg 390 00 Shugart SA1004 10meg 450 00 FLOPPY DRIVE FLAT RATES Parts amp Labor Included Missing parts extra 8 Double Sided Siemens 170 00 8 Single Sided Siemens 150 00 8 Double Sided Remex 225 00 8 Single Sided Shugart 190 00 8 Double Sided Shugart 250 00 5 M P I Single Sided 120 00 5 M P I Double Sided 150 00 ONE WEEK TURN AROUND TYPICAL You ll be notified of The date we received your drive Any delays amp estimated completion date Date drive was shipped from our plant Repairs performed on your drive Parts used and description 90 day warranty Write or call for detailed brochure We sell emergency parts Phone 417 485 2501 EJ FESSENDEN COMPUTERS 116 N 3RD STREET OZARK MO 65721 Concerning programming I use two techniques The first is to block out ranges of line numbers with REM statements describing the function of what will be the purpose of the code in that block This forces me to break up the total program into discrete blocks
5. chronous and IBM data transfer is snychronous I heard some place and that was the major reason for incompatibility Fred S Schaeffer Jamaica NY 11435 Fred Many questions 1 Many people including Westico can copy IBM lt gt OSI disk format for a small fee per disk 2 Proxy 80 D amp N 80 boards will allow both disk con trollers to be in the computer at once though not hooked to the same disk drives at once and can therefore read CP M IBM format and or CP M OSI old format However the D amp N 80 board has no 6502 chip on it and therefore cannot run 65D or 65U The 510 board 22 CPU board couldn t be in the computer at the same time unless a switch disabled at least all power supply lines e Readers 3 OSI and most other MICROS data transfer between compu ters or terminal is asynch Some IBM is synchronous this has nothing to do with internal transfer inside the box Al kek kk ED The dealer I purchased my OSI C2 OEM system from went out of business so I have had diffi culty obtaining much needed information about its opera tion Your Journal is of consider able help as I have spent many hours seeking facts and learn ing through trial and error I use my system primarily for preparing programs for a client who uses a OSI system I use the 65U operating system almost exclusively I find it useful compared to WANG BASIC that I use on a WANG 2200
6. 00 130 1FE4 A900 LDA 00 710 LDX 10 140 1FE6 BDCA20 STA LNMULT 720 LOOP4 LDA CC Y 150 1FE9 8DCB20 STA LNMULT 1 730 CMP 20 160 1FEC 8DC820 STA LINNBR 740 BMI DOT 170 1FEF 8DC920 STA LINNBRt1 750 CMP S7E 180 LFF2 20E42C LININP JSR BUFBYT 760 BPL DOT 190 1FF5 C930 CMP 30 770 ASCII JSR PRINT 200 1FF7 3004 BMI XLEGAL 780 JSR INCADD 210 1FF9 C940 CMP 40 800 BNE LOOP4 220 1FFB 3007 BMI GOOD 810 BEQ PADD 230 1FFD C92C XLEGAL CMP 820 DOT LDA 2E 240 1FFF FO1B BEQ INPINC 830 BNE ASCII 250 2001 4C8220 JMP ERROR 260 2004 290F GOOD AND S0F 270 2006 48 PHA COMPUTER FOR SALE 280 2007 D8 CLD 290 2008 208F20 JSR MULTLN O S I 48K Dual 8 Floppies 300 200B 6B PLA 310 200C 6DC820 ADC LINNER 430 Superboard C10X Switch 320 200F 8DC820 STA LINNER 330 2012 90DE BCC LININP controlled Board Lear Seigler 340 2014 18 CLC 350 2015 EEC920 INC LINNBR 1 ADM 1 Terminal AndersonJacobs 360 2018 B068 BCS ERROR 370 201A 90D6 BCC LININP 2way 0 450 Baud Modem Dozens 380 201C 20F42C INPINC JSR BUFBYT 390 201F C931 CMP 31 of Floppies Several Operating 400 2021 305F BMI ERROR 410 2123 C939 CMP 39 Systems Software Everything 420 2025 105B BPL ERROR 430 2027 290F AND S0F in Excellent Condition I Like 440 2029 8DCC20 STA INCR 450 202C A500 LDA INDEX 2 500 or make an offer Wayne 460 202E 48 PHA 470 202F A501 LDA INDEX 1 R Cole You can call me at 480 2031 48 PHA 490 2032 AC7931 LDY BEGIN GET LO BYTE OF SOURCE ADDR my office 301 825 2532 or 500 2
7. 200 JSR HEX 210 JSR SPACE 220 JSR SPACE LEAVE THIS OUT FOR VIDEO BOARD 230 INX 240 DEY 250 BNE LOOP1 255 PRINT LOW DIGIT OF AD DRESS 256 ACROSS TOP OF ASCII PART 260 LDX CC 270 LDY 10 280 LOOP2 TXA 290 JSR HEX 300 INX 310 DEY 320 BNE LOOP2 325 PRINT THE ADDRESS AND A SPACE 330 PADD JSR CRLF 340 LDA CD 350 STA C3 360 JSR P2HEX 370 LDA CC 380 STA C2 390 OK2 JSR P2HEX 400 JSR SPACE 410 LDY 00 415 DO HEX PART OF DUMP 420 LOOP3 LDA CC Y 425 JSR P2HEX 426 JSR SPACE 430 ARE WE PAST END ADDRESS 440 INC C2 450 BNE OK 460 INC C3 470 OK SEC 480 LDA C2 490 SBC CE 500 LDA C3 510 SBC SCF 530 BCC FINISH 535 BCS ENDHEX 540 PRINT SPACES FOR REMAIN DER OF LINE 3 users 80 Mega Bytes 8990 WITH DUAL FLOPPIES cTORY BRAND NEW YEAR WARRANTY ON HARD DISK REGULAR 10 990 e 90 Days on Power Supply Floppy Drives Circuit Boards e Configured for Time Share 2 MHZ e Includes 2 Serial Printer Ports with Handshake Improved Cooling and Ball ies dine Chassis Rails o AVAIL WDR 3 MAUL A PROCE Denver Boards with 64K each user and Centronics Parallel Printer Port at DEALER DISCOUNTS AVAILABLE 9990 00 8 HARD DISK SYSTEMS SINGLE BOX TABLE TOP WITH IMPROVED COOLING 10 M B HARD DISK AND 8 FLOPPY DISK 2 USERS AND 2 SERIAL PRINTER PORTS s9990 AS ABOVE WITH 2 MULTI PROCESSOR 64K DENVER BOARDS PLUS CENTRONIC PARALLEL INTERFAC
8. 9600 baud There is no degra dation in printing speed either The physical changes required to implement these new boards involve pulling all the old MnM Software Technologies Inc 416 Hungerford Drive Suite 216 Rockville Maryland 20850 memory processor and multi user serial boards out of the system just leaving the disk and tape controllers Each user gets his own processor memory board simply con nected to a terminal or modem via a three wire RS 232 connection Each board has DIP switches to set the baud rate and board user number The documentation is very clear and each board can be set up in less than a minute No soldering jumpers etc with the possible exception of a resistor on the back plane missing from some systems from OSI Each board has 64K memory not all usable in your programs though running its 6502 at 2 MHz changes are a involved but The software little more still not bad I have had no problems with assembly language programs such as Sanders Sort although the tape back up programs must he run under single user mode There are a number of new FLAG commands added which greatly simplify the 65U paging tech niques for example but do require the elimination of the traditional pokes in your programs DBI provides a list of changes necessary in 65U utilities such as the editor etc If you already own Version 1 43 you ought to be able to coax DBI in
9. Fiz EA NOP 1F13 EA NOP 1F14 EA NOP SQ LEIC 1 9C ZAQ 1E9C E 181F JSR 1F18 ISO 1EAQ 1EAA Z6Q 1EAQ 4C4323 JMP 2343 27A 17AG 17AQ 283 17AQ 4C9R1E JMP 1E9B 25a 320 VIEW MINOR FIX 310 1EAG 1EAG 320 1EAG 4CAZ1E JMP 1EA3 338 340 BREAK POINT FIX z350 360 3 PLAN A OSI LIVES and gets FULL SUPPORT at Community Computers Keywriter New Word Processor Compatible with Single User Multi User and Network Systems Keywriter incorporates standard com mands with powerful features like Mail Merge DMS Compatible Menu Driven Full Screen Editing User Friendly e On Screen Help and Prompts and Formatting Linked Print out of up to Nine Files e Compatible with latest OS 65U Version e Requires 8 Floppy or Hard Disk System Keywriter offers a true full screen editor with four way cursor control at all times Keywriter documentation includes a 60 page Self Teaching Manual 300 Community Computers Since 1977 10 Compiler for 65U A true native code complier Supports all OS 65U features except common varibles 2 10x improvement in speed Compatible with latest version of OS 65U 39 Editor ROM Most powerful Editor ROM available for OSI machines Full four way cursor movement windows keystroke control of special features Also has com munications software for level multi station systems For all C1P C2 C4 C8P Basic in ROM systems exce
10. SUG 5 software upgrade to Planner Plus version 4 02 includes this manual for 150 00 retail Should you desire extra copies of just the manual they can be purchased separately for only 50 00 retail AD CAMPAIGN IN FULL SWING On March 14 Ohio Scientific s three quarter of a million dollar advertising campaign began with weekly half page ads in the national issue of the Wall Street Journal Following this image building thrust additional ads are scheduled to appear in Info World Computerworld ISO World and Inc during the up coming months The response to the Wall Street Journal ads and to the recent insertion in Computer world has been excellent The leads received from these ads are being forwarded to our Regional Sales Managers for distribution FORTRAN COBOL AND BASIC NOW AVAILABLE FOR 300 LINE Three new languages are now available for the 300 multi processing line These lang uages FORTRAN v 3 34 COBOL v 3 0 and BASIC v 4 51 were written by Microsoft and are available separately or com bined in one package MS Languages Ohio Scientific supplies these languages on eight inch diskettes with documentation Running under TurboDOS these languages of fer a multitude of new oppor tunities Retail prices for these languages are FORTRAN 440 COBOL 440 BASIC 285 MS Languages 825 WP 3 3 VERSION 1 01 FIX FOR LEVEL 2 In OS 65U versions 1 43 and 1 44 under Level 2 the new code t
11. increment value is limited to 1 through 9 Use the fol lowing format for the renumber command ZDDDDD I where 2 is the command DDDDD is the line number to start renumbering with and can be from 1 to 65535 and I is the one digit increment Lines 80 and 90 add the routine address to the JUMP TABLE as in the DUMP ROUTINE but this time at the 7z location Lines 120 through storage through 170 initialize some locations Lines 180 370 get the starting line number from the os input buffer one digit at a time and perform an overflow and non digit entry check When a comma is found the program jumps to line 380 to input the increment value and also check for legal digit entry The actual renumbering is done at lines 450 through 830 When the job is done it jumps back to the assembler This can be easily changed to jump to the command mode of the EX MON if you want Lines 920 to 1140 do the decimal to hex con version of the starting line number Here is an example of how to combine source programs which have conflicting line numbers GO TO ASSEMBLER LOAD PROGRAM 40 OF 40 INTO THE WORKSPACE A AS LO OS40 IRE REM GO TO THE EX MON Z5000 5 RENUMBER SOURCE FROM 5000 INCRE MENTING BY 5 AND RETURN TO THE ASSEMBLER P SHIFTK LIST WORKSPACE FILE INTO INDIR ECT FILE SHIFTM CLOSE INDIRECT FILE ILO 0839 LOAD NEXT PROGRAM INTO WORKSPACE lt CNTLOX INDIRECT FILE IS ADDED TO THE WORKSPACE
12. sales tax 23 00 Enclosed Canada and Mexico lst class surface 35 00 Enclosed South and Central America Air Mail 35 00 Enclosed Europe Air Mail 40 00 Enclosed All other Air Mail NAME cece cece cceccccerececcseces STREET cceeeeccccce seesosesoooe CITY seccooososeecosocoooeeoeoo STATE sesessocccocccoocoone e ZIP CODE sesssososesesososocenso COUNTRY sesssessess secre rescence Please send the following back issues I enclose 2 00 ea U S Surface MD residents add 5 sales_tax 2 50 ea Canada and Mexico Surface 3 00 ea South and Central America Surface 3 00 ea Europe Surface 3 50 ea All other Surface we nr r ae Vol 1 1980 JUN 6 SEP 9 NOV 11 DEC 12 Vol 2 1981 JAN 1 FEB 2 MAR 3 APR 4 MAY 5 JUN 6 JUL 7 AUG 8 SEP 9 OCT 10 NOV 11 DEC 12 Vol 3 1982 JAN 1 FEB 2 MAR 3 APR 4 MAY 5 JUN 6 JUL 7 AUG 8 SEP 9 OCT 10 NOV 11 DEC 12 Vol 4 1983 JAN 1 FEB 2 MAR 3 APR 4 MAY 5 JUN 6 JUL 7 AUG 8 A INDEXES ARE INCLUDED IN THE JAN amp DEC 1981 AND DEC 1982 ISSUES 24
13. 198 FRINT PRINTsPRINT What is the name of the POKE2888 8 1 POKEB722 11 INPUT multiple choice fil e you wish to change f1s 12 PRINTSPRINT PRINT What is the name of the s 13 INFUT name of the file in which this will go 26 144 DISK open 6 f1 DISK open 7 F 2H 15 INFUT 46 n 2PRINTH7 In 164 DIMN N 4 174 FORI 1 TON FORA 1T06 INFUT 6 NB 1 A SNEXTA 175 PRINT 28 PRINT PRINT FR INT PRINT IFRINT 176 FORa 1TO6 BL oc ea NEXTa 18 INFUT Is this item ok q rt VAL q 198 TFtOgANDt 7THENINFUTNS i t GOTOL7S 2008 FORA 1T06 PRINT H7 CHR 34 gt sN T A i CHRE 34 218 NEXTa i 299 DISKE CLOSE DISK CLOSE 7 RETURN 300 PRINT PRINT PRINT What is the name nf the POKE2888 4 2POKE8722 2 31 INPUT matching file you w ish to change f1is 3208 FRINTIFRINT PRINT What is the name of the 3 330 INFUT name of the file in which this will go f2 248 DISK open 6 f1 DISK open a7 ef 2 SSG INFUT HS ns PRINTH7 N 368 DIMNG N 3 37 FORI 1 TON FORA 1T02 6 N8 1 A NEXTA 372 IFRIGHT N 1 2 ENINPUT 6 N amp I 3 375 PRINT 28 PRINT PRINTIPR INTEPRINT PRINT 38 FORA 1TO2 PRINTAsNS I A NEXT 39 IFRIGHT N 1 2 1 TH ENPRINTSsN I I 494 INPUT Is this item ok qs t VAL qs 41 IFT gt ANDt lt 4THENPRINT chan ge sn amp i t s INFUTNS 1 7 sGOTOS 75 428 FORa 1T02 440 PRINT 7 CHR 34 n ia CH RE 34 458 NEXT 455 IFRIGHTS NS 1I 2 1
14. FILE RE EM BACK TO EX MON Z5000 5 SAME AS BEFORE P SAME SAME LO 0838 CONTINUE TILL ALL FILES ARE ADDED TOGETHER SAVE FINISHED FILE TO DISK PU SOURCE Be sure that the workspace file doesn t get too big for the memory available for the indirect file or you will get hung up when you try to bring the indirect file back down to the workspace I hope these routines will be of some service to all of you and maybe bring to mind some more routines that would be handy Stay tuned for an easy way to add commands to the OS like DELETE CREATE DIR RENAME COPY while using only 512 to 768 bytes at the top of RAM at least I think I can keep it that small I will write it up in full detail as soon as I have it completed Also if you don t want to type your little fingers off I will sell a copy of the source for the ASCII dump and assembly renumber and the object code linked up to the EX MON for 10 dollars Send S A S E which will hold a disk and check or money order to the above address I0 O1 P 10 GETADR 1A6B 20 CRLF 1A56 30 SPACE 1 BAF 40 HEX 19F2 50 P2HEX 19E9 60 PRINT 2343 70 INCADD 1A85 80 18B3 90 ORIGIN WORD 1F46 100 1F46 110 JSR GETADR 120 JSR CRLF 125 PRINT 6 SPACES 130 LDY 06 140 SP JSR SPACE 150 DEY 160 BNE SP 165 PRINT LOW DIGIT OF AD DRESS 166 ACROSS TOP OF HEX PART 170 LDX CC 180 LDY 10 190 LOOP1 TXA
15. K1TOEC IFF K FSANDFT K KOTHEN1 90 NEXTK PRINT PRINT FILE NOT FOUND PRINT GOTO720 REM QUIT ZZ K DA FA K AA DA RA BUFFER NB LE K EC NEXTK INPUT PRINTER OR CONSOLE OUTPUT Y IPLEFTS Y K1 P THENDV PD GOSUB580 FORK BUFFERTOBUFFER LE 1 C PEEK K IFC 255THEN7 20 PRINT DV CHR C NEXTK AA AA LE DA AA IFAA lt FA ZZ FL 2Z2Z THEN220 GOTO7 20 INPUT DRIVE A B DR IFDR lt gt A ANDDRS lt gt B THEN290 DEVDRS EC K0 FORK KOTO6 4 F K sNEXTK GOSUB520 OF 01 GOSUB580 RT RA OF EC EC K1 IFPEEK RT KOTHEN4 90 NS FORI SKOTOKS NS NS CHRS PEEK RT I NEXTI FS EC N TM PEEK RT K8 TM INT TMAND28 K4 FT EC TM AD PG PEEK RT 9 PG PEEK RT 10 PG PEEK RT 11 Z PG PEEK RT 12 PG PEEK RT 13 PG PEEK RT 14 PA EC AD FL EC SZ IFDA SZ gt HATHENHA DA SZ OF OF 01 IFOF lt PGTHEN3 40 EA EA PG OF K0 DA DA PG IFEA lt ENTHEN3 30 EC EC K1 RETURN REM SETUP FOR DIREC READ DA 25088 RWS R RA 9970 NB PG A 9899 S 9902 OPEN DIREC PASS K1 CLOSE1 EA PG PEEK A PG PEEK A K1 PG PEEK A K2 ES PG PEEK S PG PEEK S K1 PG PEEK S K2 EN EA ES HA EN RETURN REM EXECUTE DISK READ WRITE POKE877 8 192 POKE8779 36 POKE9 435 232 POKE9436 40 DH INT DA F3 RM DA DH F3 DM INT RM F2 RM RM DM F2 DL INT RM F1 RM RM DL F1 POKECB K1 RM POKECB K2 DL POKECB K3 DM POKECB K4 DH POKECB K5 NB INT
16. NB PG PG POKECB K6 INT NB PG POKECB K7 RA INT RA PG PG POKECB K8 INT RA PG ER USR 0 IPER KOTHENRETURN REM REM ERROR PRINTER T PEEK 9832 IFT gt 127THENT T 124 IFT gt 63THENT T 58 PRINT DEVICE CHRS 65 T ERROR ER AT DA POKE 8778 ULSER POKE8779 U2SER REM RESTORE USR X MEMSIZ PEEK 133 14 POKE133 MEMSIZ POKE2073 76 END OSI FORTH OSI FORTH 3 0 is a full implementation of the FORTH Interest Group FORTH for disk based OSI systems C1 C2 C3 C4 C8 Running under OS65D3 it in cludes a resident text editor and 6502 assembler Over 150 pages of docu mentation and a handy reference card are provided Requires 24K 20K C1P Eight inch or mini disk 79 95 Manual only 9 95 OSI FORTH Letters soft ware support newsletter 4 00 year Other Software for Ohio Scientific Computers VIDEO EDITOR Video Editor is a powerful full screen edi tor for disk based C2 C4 C8 systems with the polled keyboard and color video boards b amp w monitor ok Allows full cursor control with insertion deletion and duplication of source for BASIC or OSI s Assembler Editor Unlike versions written in BASIC this machine code editor is co resident with BASIC or the Assembler autoloading into the highest three pages of RAM upon boot Video Editor also provides single keystroke control of sound screen format color and background color Eight inch or mini disk 14 95 Specify amount o
17. Ok sas IFat ANDa STHENINPUTaS a GOTO T44 570 PRINTH 6 q 1 IFRIGHT q 1 1 X THENFRINTH 6 4 2 58 NEXT DISK close 6 RETURN LISTING 2 1 REM TESTV4 100 POKE2972 14 POKE2976 13 6 OTO27 11 L LEN Q 124 FORA 1TOL P FPEEK 22 130 IFP lt 6 THENI 7a 14 IFQR 2THEN1 6g High Resolution Color Graphics Our new Color Plus board provides 256 x 192 Color Plus connects to the standard 48 pin high resolution graphics with 15 colors Two bus or the 16 pin bus 8 bit resolution joystick interfaces are Pricing included Software extensions to OS65 D CP 8 for C8 or C3 computers 195 nea prone i superset of APPLE il CP 4 for C4 computers 5V only 245 pra Pe CUM CP bare Bare board with software 75 G Operating System Generos is a new operating system for OSI DDT Machine language debugger with computers Features include descriptive error single step trace more messages optimized disk usage device TECO Most powerful and widely used independence and text editor ever Currently available for 48K 8 inch systems ASSEM Fast disk based assembler Call or write about availability for other generates relocatable code configurations Cost 85 Our popular MEM board is ideal for MEM includes the following features Partitions for multi user systems High reliability All memory chips in 64K CP M systems when combined with machine screw
18. PROGRAMS PART I By Dave Rich Courtesy of Osmosus News Minneapolis MN 55418 OSI BASIC like all Microsoft BASICs has one thing in com mon with all interpreted lang uages it is slow As a result many articles and let ters have appeared in computer Magazines showing ways to wring the most speed out of Microsoft BASIC that is how to optimize the speed If you are an expert BASIC Programmer this series of articles may not contain any thing new but for those new to BASIC I would like to point out some ways that OSI BASIC programs can be written to make them run faster and often take up less memory Optimization of computer code has two facets which often do not complement one another speed of execution and memory size This article will ex plore ways to achieve the fastest execution times for your programs Often the same techniques will reduce memory Size as well BRANCHING or how do we GOTO there from here Microsoft BASIC has a fairly limited means of locating a line number referenced on a GOTO or GOSUB At the begin ning of each line in memory is encoded the current line num ber and address of the start of the following line This creates a one direction chain or singly linked list for use in locating lines When Microsoft BASIC encounters a GOTO or GOSUB BASIC must begin the search from the first line of the program This is true even if the branch is to the current lin
19. SAVE WP 3 PASS This fix will be effective the next time WP 3 3 is used No the IF PEEK XXXX lt gt THEN is not an error we are as sured OS 65U CD 28 CYLINDER WRAP AROUND FIX Systems utilizing cylinder offsets that accessed cylinder 254 or greater would wrap back to cylinder zero This can be fixed by installing the following correction using the CHANGE program To install this correction follow the CHANGE conversation below and install the cor rection on BOTH the floppy based and hard disk based versions RUN CHANGE PASS OS 65U Disk Change Utility MODE HEX H DEC D H DEVice x ADDRESS OFFSET C00 ADDRESS 34C6 00003 4C6 D8 75 00003 4C7 A2 03 00003 4C8 10 6D 000034C9 A9 03 000034CA 00234 000034CB 2C 60 00003 4CC 80700 00003 4CcD C2 00 000034CE 9D 00 000034CF FF 00 00003 4D0 C1700 000034D1 95200 00003 4D2 80700 00003 4D3 CA 00 000034D4 DO 00 000034D5 F5 00 00003 4D6 E6 ADDRESS 37CE 000037CE 85 A9 000037CF 03 00 000037D0 m 6D 6A 000037D1 03 4C 000037D2 4 34 C6 000037D3 60234 000037D4 A0 X OK The CHANGE conversation is now complete If timesharing is implemented then make the following corrections to the program TSCD07 This cor rection applies to version 3 8 of TSCD07 ONLY LOAD TSCD07 PASS Change line 20873 as follows 20873 DATA 13512 044 REM 34C8 BIT 3403 kill ofst CD 28 SAVE TSCD07 PASS OK This completes the corrections to T
20. amp W FILE MASTER runs under OS65D V3 3 video only Single or dual drive FEATURES User and or pre defined files with coding options formatted screen viewing and inputting find edit update delete amp page Screen quick and format dump Manual included only 55 00 Manual only price applied towards purchase 10 00 ADD ON FEATURES Label print option 45 00 Report generator 45 00 For more information contact BUNIN amp WARD COMPUTER SERVICES P O BOX 895 CHURCH STREET STA NEW YORK NY 10008 212 434 5760 EPROM POWER SUPPLY 12 5 26 Provides 26 volts from available 12 and 5 volts Sufficient to drive programmer for one Eprom Bare board Bag of parts 2 50 3 50 3 00 Post amp Handling Md residents add 5 tax Send U S dollars drawn on a U S Bank to PEEK 65 P O BOX 347 Owings Mills Md 21117 301 363 3268 23 BULK RATE U S POSTAGE t PAID The Unofficial OSI Users Journal Owings Mills MD PERMIT NO 18 P O Box 347 Owings Mills Md 21117 DELIVER TO l 2 Subscription rates for 12 issues one year effective with the July 1981 issue All rates quoted in U S dollars Due to U S bank surcharges all funds payable to PEEK 65 must be in U S Dollars and be drawn on a U S Bank or be an International Money Order Please fill out and return with check or money order 15 00 Enclosed U S Maryland residents add 5
21. on both OS65D3 1 and 3 3 ODDS amp ENDS ON THE EM The maximum number of data bytes per line to be transmit ted using the Save function is stored at 1E31 As sup plied it is 18 but can be changed to anything from 01 A why I don t know to 80 Need a subroutine to do a Carriage return and a line feed to all selected devices Try the one at 1A56 How about a subroutine Print one space to all lected devices Try S1BAF to se Load the X number of SFF Need more spaces register with the Spaces you need up to and JSR 19C8 Do you use the disassembler and want more or less lines disassembled than what is cur rently used Then try chang ing the data at 18DA from 16 to whatever you need up to 80 CREDIT WHERE CREDIT IS DUE DEPT I never could have found the bugs in the system without the help of Software Consultants Disassembly Manual 3 2 of the Disk Operating System Ver sion 3 1 that I have and the 3 2 manual are similar enough that it was easy to see how the DOS works Many thanks to their superb documentation 1a sLISTING 1 ze 3a ACIA ACCESS ROUTINE 40 1FQ D 1FQD 5Q IFAD 2OF6E4 JSR 24F6 6a 3 7a 3 KEYBOARDIC CESS ROUTINE 80 1F18 1F18 92 1F18 ASFD LDA FD 1 1F1A 8DAADF STA DF G 11 1FiD ADQ ADF LDA DFOQ 120 1F a COEF CMP EF 130 1F22 paas BNE SP 140 1FE4 403817 IMP 1738 5A 1F 7 60 SP RTS A 4 1Fia 1F10 1F10 EA NOP iFit EA NOP
22. user friendly than before Check these features against any other data base manager Totally Screen Driven Formatting CRTSET Hard Disk Or Floppy Disk Access one package Forms Processing Single User Time Share Denver Boards Supported Allows Up to 7 Files Open At Once one package AUTOMATIC KEY FILE UPDATES DURING ALL Labets of ANY DESIGN OPERATIONS Uses UNMODIFIED 65U FAST Sort Routines Batch Processing User Defined Data Checking NO NEED TO LEARN ANY COMMAND CODES Record Locking User Defined Menus And MUCH MORE This is a FIELD PROVEN enhancement of our previous release Version 82 2 Over 50 businesses programmers are using the SYSTEMS GENERATOR Isn t it time you quit tinkering with other data base managers just to get them to work as they were designed Move Up to the most powerful data base manager available for OSI hardware Requires OS 65U Version 1 43 or tater Manual Only Credited Toward Purchase SYSTEMS GENERATOR Version 83 1 Upgrade From Version 82 2 An Offer You SHOULDN T Refuse Try the SYSTEMS GENERATOR for 30 days If you don t feel it does the job for you return it to us and we ll refund your money IN FULL no questions asked COMPTROL SYSTEMS 8386 Needlegrass Court Parker CO 80134 303 699 0124 13 However writing machine code DISK to handle the disk drives under OS 65U was a bit beyond p 5 Me eroeriehce eo 1 rolio on 10 REM OS 65U DISK READ WRIT
23. 035 A900 LDA 00 510 2037 8500 STA INDEX my home 301 377 4111 520 2039 AD7A31 LDA BEGIN 1 GET HI BYTE 530 203C 8501 STA INDEX 1 540 203E ADC820 LOOP LDA LINNBR GET LO BYTE OF LINE NUMBER BUBBBSBsasassasaaessessssssasssesess J50 2041 9100 STA INDEX Y STORE IT IN SOURCE eee 560 2043 208620 JSR INCREM THE perme 570 2046 ADC920 Ll LDA LINNBR 1 GET HI BYTE OF LINE NBR _ SYSTEM 580 2049 9100 STA INDEX Y STORE IT IN SOURCE 590 204B 208620 L2 JSR INCREM Announced in the August 83 issue ND once ae ae oo LOOK FOR END OF LINE of Peek 65 CSS offers a high quality reasonably priced set of 620 2052 DOF7 BNE L2 nine programs effectively inte 630 2054 208620 JSR INCREM grated thru menu control assist 640 2057 CC7B31 L4 CPY LAST ing the OS 65U user The SY provides an efficient 650 205A D010 BNE L5 FULL SCREEN ORIENTED approach to 660 205C A501 LDA INDEX 1 Disk and RAM data examination 670 205E CD7C31 CMP CASTEL and modification superzap 680 2061 D009 BNE L5 H 6502 disassembly with Agiantc 690 2063 68 PLA RESTORE ORIGIN DATA pathing and user defined 700 2064 8501 STA INDEX 1 abels and data tables SS ee foe PLA STA INDEX CRT code testing and more 730 2069 4C0313 JMP STASM Details requires 65U with 48K amp 740 206C ADC820 L5 LDA LINNBR INCREMENT LINE NUMBER serial rr Includes 8 diskette 750 206F D8 CLD s montatione fo order please s
24. 080 FORK K1TOEC IFF K FSTHEN7110 been entered assembled and 7090 NEXTK PRINT FILE NOT FOUND PRINT saved 7100 CM K4 01 GOTO130 7110 IFFT K lt gt K1THENK EC NEXTK PRINT NOT A BASIC FILE GOTO7100 You are now ready to run the 7120 DA FA K FL FL K RA BUFFER NB LE program but first a few notes 7121 IFFL lt NBTHENNB FL on how this all hangs to 7130 K EC NEXTK RWS R GOSUB6 010 FL FL NB CM K4 GOTO130 gether This program really 7140 does demonstrate how I program 8000 REM FETCH NEXT TRACK FOR TRANSMISSION much of the time I tend to 8010 DA DA NB IFFL lt NBTHENNB FL develop code piece by piece 8020 FL FL NB RWS R sGOSUB6 010 CM K5 GOTO130 checking each part as I go I 8030 also try to keep many tasks 50000 REM COMMON EXIT ROUTE uniform throughout my work so 50010 REM ERROR PRINTER that I can take pieces from 50020 T PEEK 9832 IFT gt 127THENT T 124 IFT gt 63 THENT T 58 old projects and append them 50030 PRINT DEVICE CHR 65 T ERROR ER AT DA to new ones TRM65U actually 50040 POKE 8778 U1SER POKE8779 U2SER REM RESTORE USR X is a translation of a similar 50050 POKE2073 76 END program I wrote for OS 65D Since BASIC is virtually identical in both operating systems this worked out fine The BEST Just Got BETTER SYSTEMS GENERATOR Version 83 1 Comptrol Systems is pleased to announce the latest release of its SYSTEMS GENERATOR We have reworked this powerful data base manager to be even more flexible and
25. 4096 TH INT TA PG TL TA TH PG 80 DRS A GOSUB5020 FORK K1TOEC IFF K TRMCOD THEN100 90 NEXTK PRINT CAN T FIND TERMINAL CODE GOTO1 40 100 110 120 130 140 150 160 170 180 181 182 190 200 210 1000 1010 1020 1025 1030 1040 1050 1060 1070 1080 1090 1100 1110 1120 1130 1140 2000 2010 2020 2030 3000 3010 3020 3030 3040 4000 4010 4020 5000 5010 5015 5020 5050 5060 5080 5090 5110 5120 5130 5140 5160 5180 5210 5220 5230 5240 5250 5260 5270 5280 5290 6000 6010 6020 DA FA K K EC NEXTK RA 11 4096 RWS R NB 2048 GOSUB6010 INPUT PRESS lt RETURN gt WHEN CARRIER DETECTED Y POKE8778 TL POKE8779 TH CM KO X USR CM IFX KOTHENPOKE133 191 GOTO50040 IFX K1THEN1010 REM TURN SAVE ON IFX K2THEN2010 REM TURN SAVE OFF IFX K3THEN3010 REM WRITE OUT TRACK FOR SAVE IFX K4THEN4010 REM BUFFER DIRTY ON QUIT IFX KS5THEN7010 REM SELECT FILE FOR TRANSMISSION IFX K6THEN8010 REM FETCH NEXT TRACK FOR TRANSMISSION X K0 PRINT UNRECOGNIZED RETURN COMMAND GOTO1 40 REM TURN SAVE ON PRINT PRINT SELECT FILE TO SAVE IN PRINT GOSUB5010 PRINT PRINT DATA FILES AVAILABLE PRINT X K0 FORK K1TOEC IFFT K lt gt KOTHEN1050 PRINTTAB X 13 FS K X X Kl IPX K5THENX KO0 PRINT NEXTK IFX lt gt KOTHENPRINT PRINT INPUT YOUR CHOICE F IFLEN FS gt K6THEN1060 IFLEN FS lt K6THENFS FS GOTO1070 FORK K1TOEC IFFS K F SANDFT K KOT
26. 8779 36 POKE9435 232 POKE9436 40 DH INT DA F3 RM DA DH F3 Listing continued allows you to read from or 6030 DM INT RM F2 RM RM DM F2 write to disk except track 0 6040 DL INT RM F1 RM RM DL F1 to or from any RAM address 6050 POKECB K1 RM POKECB K2 DL POKECB K3 DM POKECB K4 DH The program PRINT provides a 6060 POKECB K5 NB INT NB PG PG POKECB K6 INT NB PG directory and output of TRM65U 6070 POKECB K7 RA INT RA PG PG POKECB K8 INT RA PG data files more on this next 6080 RW KO IFRWS R THENRW KO month After you have cre 6090 IFRWS W THENRW K1 ated all four of these files 6100 ER USR RW POKE8778 TL POKE8779 TH IFER KOTHENRETURN and entered the three BASIC 6110 GOTO50000 programs run a DIRectory pro 6120 gram and write down the disk 7000 REM SELECT FILE FOR TRANSMISSION address of the file MTRMCOD 7010 PRINT PRINT SELECT FILE TO SEND PRINT GOSUB5010 You ll need that address when 7020 PRINT PRINT BASIC FILES AVAILABLE you run DISK to save the mach 7025 PRINT ine code portion of TRM65U 7030 X K0 FORK K1TOEC IFFT K lt gt K1THEN7050 7040 PRINTTAB X 13 FS K 3 X X Kl IFX K5THENX KO0 PRINT Next month we will address and 7050 NEXTK IFX lt gt KOTHENPRINT list the machine code program 7060 PRINT INPUT YOUR CHOICE F IFLEN FS gt K6THEN7 060 TRMCOD But for the moment 7070 IFLEN F lt K6THENFS FS GOTO7070 let s assume that the code has 7
27. CTRL gt Q and X OFF lt CTRL gt S in both directions to prevent loss of data There are two parts to this program The first part is the executive program written in BASIC which handles initialization and all disk communication The second part is the machine code which handles communi cation between the user and the host system TRM65U runs on either video or serial sys tems with 48K of RAM TRM65U DOES NOT support the UTI board however I made an attempt to configure this program for 32K but there just isn t enough room To begin you will need to create four files on an OS 65U diskette Name the first file TRM65U and make it at least 4000 bytes long Name the second file TRMCOD and make it at least 2048 bytes long Name the third file DISK and make it 3500 bytes long Name the final file PRINT and make it 4096 bytes long The executive program in BASIC goes in the file TRM65U The machine code goes in the file TRMCOD And finally the disk read write utility program goes in the file DISK The program DISK is a general purpose utility program that 12 10 P 20 K 30 P TRM65U OKE133 159 CLEAR REM RESERVE HIGH MEMORY 0 0 Kl 1 K2 2 K3 3 K4 4 K5 5 K6 6 K7 7 K8 8 K9 9 KT 10 G 256 F1l PG 1 F2 PG 2 F3 PG 3 O1 16 FS 275968 40 DIMFS 64 FT 64 FA 64 FL 64 CB 9889 50 BUFFER KT 4096 POKE2073 96 REM BUFFER A000 DISABLE C 60 L E 3584 U1SER PEEK 8778 U2SER PEEK 8779 70 TA 11
28. E 6990 00 WA HAL PES PL 0 MULTI PROGESSOR y STO USER w Centronics Printer Port 6490 SPECIAL pEC I AL TYPE 2 USER w 2 Serial Printer Ports s6990 0 e 5 M B Hard Disk 1 8 Floppy e 1 Centronics Parallel Printer Port 00 DBI 2 USER w Centronics Printer Port s7790 1 Serial Printer Port 1 Modem Port ONLY 5990 PROC 3 USER w Centronics amp Serial Printer Ports 8990 09 e 28 1 Multi Processors e Complete Programmer Manual and Software Overlays CLOSE OUTS C4P 8350 C4PMF 699 C4P DMF 48K 51199 CBP DF S1499 C2 OEM 1799 CM 2 S69 CM 10 S89 CM 11 499 CA 9 129 CA 10 1 149 510 CPU 8299 OSI C4P Disk Programs Regular 29 49 NOW 9 each s Call or Write for Bargains List WHERE WE STILL LOVE OS 65U AND SUPPORT IT Space com International 22991 LA CADENA DRIVE LAGUNA HILLS CALIFORNIA 92653 _ ORDER TODAY 714 951 4648 SOME QUANTITIES LIMITED 550 LOOP7 JSR SPACE 10 ASMNUM RENUMBER ASSEMBLY SOURCE CODE 560 JSR SPACE 20 000D CR SOD 570 JSR SPACE TAKE OUT 30 0000 INDEX 00 FOR VIDEO BOARDS 40 3179 BEGIN 3179 580 ENDHEX INY 50 317B LAST 317B 590 CPY 10 60 1303 STASM 1303 600 BMI LOOP7 70 2CE4 BUFBYT 2CE4 630 BPL PASCII 80 1A4E ERROR1 1A4E 660 FINISH INY 90 18D3 180D3 670 CPY 10 100 18D3 E31F WORD SI1FE3 680 BNE LOOP3 110 1FE3 1PFE3 690 PASCII JSR SPACE 120 1FE3 D8 CLD 700 LDY
29. E UTILITY ae PRASIE to nandie that Fortun 30 REM SAVE USER S USR X ADDRESS ately BASIC makes provisions cy UL PEEK 8778 UH PEEK 8779 for passing parameters back z0 z a and ae ee ade aaa 70 REM SET UP DOS READ WRITE VECTOR Sne part tell the other pare 90 POKES778 192 POKE8779 36 REM 24C0 aaa e a ar 110 REM SET UP ISR PUT IN SUBROUTINE of a couple cof thunde abaut 130 POKE 9432 243 POKE 9433 40 E eee on Beg rne 150 REM SET UP ISR GET IN SUBROUTINE destination file MUST be an ee PORE 435 232 PORES436 40 OS 65U data file This is a rai P z safety measure and could be aie EE RES ONE BACE BLOCK j220ht removed from the program by 220 nw a oe Me eta oE A 230 REM GET DISK ADDRESS FROM USER 1000 of the executive program 250 INPUT ENTER DISK ADDRESS FOR READ WRITE DA 260 cond TRM k beach ato es d files 270 REM GET NUMBER OF BYTES FROM USER n N a to be used must be at least 290 PRINT HOW MANY BYTES ARE TO BE READ WRITTEN GOSUB840 NB A 300 neniaunves E EE and fOr 310 REM GET RAM ADDRESS FROM USER TH 330 PRINT FOR THE MEMORY ADDRESS GOSUB840 RA A should be a multiple of 3584 340 n e oath Se Ell whee tt 350 REM GET OPERATION TYPE FROM USER saves data so machine code 370 INPUT READ OR WRITE R W RW RW LEFT RW 1 transfers will require extra 280 IF RW lt gt R AND RWS lt gt W THEN PRINT GOTO 370 gt 390 ene Wee ee Eo only send 400 REM CHECK DA RA AND NB FOR
30. Each user has his own Z80A 4MHZ CPU 64K memory 4 channel DMA and two serial ports A system master pro cessor with a separate CPU 56K of memory 4 channel DMA and 2 serial ports handles all disk and system I O tasks Our separate proprietary 8 Megabit inter processor communications bus provides nearly instan taneous inter processor data transfers Running OSI s proprietary version of the KeyOperator 1 Multi processing operating system allows most of the over 3000 CP M based packages to run together with OSI s KEYBASIC Version 2 0 KeyBasic 2 0 is the 65U BASIC version 1 43 compatible SUPER BASIC language the culmination of your input on 65U extensions and has many many features unavailable in any other language These include Enhanced Extended Input Character oriented Disk I O FIND command with limit CRT Command amp SWAP WHILE WEND KILL MultiByte to MultiByte input translation Semaphore WAIT FOR with time limit Enhanced Extended Output Key Map RANDOMIZE TIMER Selectable Dynamic File Alloca tion RESUME Invisible SPOOLING on 1 to 16 Queues onto 1 to 16 printers Record Locking Extended EDITOR 4 types of Program Chaining with COMMON Verb Upto 15 Disk Channels with individual buffers Subroutine CALL SuperTrace TIME DATE RENAME INSTR Delete Resequence and Renumber In Basic PRINT USING ON TIMER GOTO and editor commands ON ERROR GOTO e ERASE delete
31. FORI z 1TOmas no no l Nt MID STRE NO 2 a1 INPUT 6 cht 0 3Ll ZLEN Q 61 IFRIGHTS 0 1 THENIG LEFT Q6 L 1 INPUT 4 01 Q 1 401g 6228 L LEN Q 630 IF CHS k THENGE NE HOG QR 1 GOTO7S 648 IFLEN CHS gt 23THENPRINTCHR I 64 LEFTS CHS 25 336 OTOS 65 PRINTCHRS 1 64 664 OF NS OH OR 1 678 L LEN O 688 FORA 1 TOL P PEEK 22 694 IFP lt 6 THEN74 amp 7aG IFQR 2THENTS 71 IFP gt 64ANDMIDS Q 48 1 THENGOSUB2 1a GOTO734 728 IFF gt 64ANDMID Q A 1 ANDOR 1 THENFRINT FRINTTAB 26 ye ong 73a PRINTMIDS 0 Aid 74 NEXT 7a PRINTTAR 26 3 GOSUB11I 76 IFOR 1 THENGOSUEZ 1 77 PRINT NEXTI s MA RETURN 788 CA kkk TRUE FALSE xxx FRINTs GOSURS4 798 PRINT Put in the answer blank for true O far false PRINT Bae FORI 1TOtF 81 NO NO 1 N MID STR NO Den 820 INFUTH S q IFRIGHTS q 1 k THENINFUT S O1 830 IFRIGHTS qs 1 THENG MID H O 1 LEN QS L I q1 844 OF NS O s OR 1 GOSUBIIG IF OR 1THENGOSUB214 858 PRINT IFL2466THENPRINT 86a NEXTi RETURN 878 GOSUR 45 REM MULTIPLE CH ODICE 88 GOSUR S8asREM MATCHING 890 GOSUB 78 REM TRUE FALSE cehs LISTING 3 1 REM DATACG WI TH 2 BUFFERS 5 DISKE SE B 1 FRINT 28 PRINT PRINT FRI NT PRINT 1 multiple choice it ems 2 FRINT 2 matching items 3 INFUTi ON VAL i GOSUBI Me s 30A i 4 CLEAR FOKE2888 27 POKE8722 27 GOTO18
32. HEN1110 NEXTK PRINT PRINT FILE NOT FOUND PRINT CM 1 01 GOTO130 DA FA K FL FL K DA RA BUFFER NB LE IF FL DA lt LE THENPRINT FILE TOO SMALL CM 1 01 GOTO130 CM K1l PRINT SAVE IS NOW ON PRINT GOTO130 REM TURN SAVE OFF RWS W GOSUB6010 PRINT CM K2 PRINT SAVE IS NOW OFF PRINT GOTO130 REM WRITE OUT DISK BUFFER FOR SAVE RWS W GOSUB6 010 DA DA LE CM K0 IFDA gt FLTHENCM 0O1 CM CM K3 IFCM gt 127THENPRINT FILE OVERFLOW SAVE OFF GOTO130 REM BUFFER DIRTY ON QUIT RWS W GOSUB6 010 POKE133 191 GOTO50040 REM GATHER DIRECTORY FOR FILE SELECT INPUT DRIVE A B C D DR D ASC DR IFD lt 650RD gt 68THEN5010 DEVDRS EC K0 FORK KOTO6 4 F K NEXTK GOSUB52 40 OF 01 GOSUB6 010 RT RA OF EC EC K1 IFPEEK RT KOTHENS210 NS FORI KOTOK5 NS NS CHR PEEK RT I NEXTI F EC N TM PEEK RT K8 TM INT TMAND28 K4 FT EC TM AD PG PEEK RT 9 PG PEEK RT 10 PG PEEK RT 11 S2 PG PEEK RT 12 PG PEEK RT 13 PG PEEK RT 14 FA EC AD FL EC SZ IFDA SZ gt HATHENHA DA SZ OF OF 01 IFOF lt PGTHEN5060 i EA EA PG OF K0 DA DA PG IFEA lt ENTHEN5050 EC EC K1 RETURN REM SETUP FOR DIREC READ DA 25088 RW R RA 997 0 NB PG A 9899 S 9902 OPEN DIREC PASS K1 CLOSE1 EA PG PEEK A PG PEEK A K1 PG PEEK A K2 ES PG PEEK S PG PEEK S K1 PG PEEK S K2 EN EA ES HA EN RETURN REM EXECUTE DISK READ WRITE POKE8778 192 POKE
33. I miss PRINT USING however When I use the computer long periods of time making key board entries I would like to turn off the Siemans disk drives to eliminate the noise and save drive wear I placed a switch in the AC line to the motors so I could turn them off after start up This dis abled access to the computer so I was not able to continue I do not know if this was caused by a transient in the AC power line when the motors were turned off or by the lack of feed back information that might be needed by the com puter to show the disk drives are functioning I bought a SAMS service manual for the C2 OEM boards but it gives nothing about this question that I can discern Can any one help me with this Some of my programs take a long time to run even with a 2MHZ clock due largely to many disk transfers required I would be interested in lear ning if a BASIC compiler is available for my applications that might make a considerable improvement in running time Earle L Kent Elkhart IN 46516 Kent Disablement of the floppies has been done many times successfully We don t know precisely what you have done but you may be picking up transients that blow the CPU A cheap transient sup pressor may be installed at the feed to the CPU power supply A capacitor across the floppy switch may also do the job In any case the Hot side of the A C to the floppy should be switched A compiler is av
34. INT 1ST PART O F QUESTION 219 IFB 2THENPRINT 2ND PART 0O F QUESTION 220 IFR 3THENPRINT ANSWER A 230 IFB 4THENPRINT ANSWER E 240 IFB 5STHENPRINT ANSWER C 250 IFB 6THENPRINT ANSWER D 26 INPUTAS BR IFB 1 THENAS B A E 270 NEXTR 28 PRINT 28 FORB 1T09 PRIN T NEXT 290 PRINTAS 1 sAS 2 FORIE3T O6 PRINT CHR T 62 AGB I NEXT 300 INPUT ANY CORRECTIONS C IFC gt ANDCS 7THENINPUTAS C GOTO 28a 310 FORB 1T06 PRINT S CHRS 34 A B CHRS 34 NEXT 32 NEXTA DISK CLOSE 6 33a RETURN 34 INPUT HOW MANY MATCHING I TEMS M 35 INPUT FILE NAME CH DISK OPEN 6 CHS 36 PRINT HS M 370 FORI 1TOM 380 INPUT TERM sA 1 INPUT O UESTION A 2 39 IFRIGHT A 2 1 THEN INPUT 2ND PART OF DUES A D 490 PRINT 28 FORQ 1TO1 PRI NT NEXT 410 PRINTIAS 1 PRINTZAS 2 21 FRIGHTS AS 2 1 THENPRINTS AS 3 426 INPUT IS THIS ITEM OK SA IFA gt ANDAS 4THENINPUTAS A GOTO 490 430 FORT 1702 FRINT OS CHRS 34 YAS T CHRS 34 NEXT 44 IFRIGHTS A 2 1 K THEN PRINT 4 AS 3 45 NEXTI 460 DISK CLOSE 6 472 RETURN 48 INPUT HOW MANY TRUE FALSE ITEMS TF 49 INPUT FILE NAME N DISK OPEN N 50 PRINT S TE 519 FORI 1TOTF 52 PRINT QUESTION INPUTQS 1 S3 IFRIGHTS Q 1 1 THEN INPUT SECOND FART 0 2 S4 PRINT 28 sFORQ 1TO1G PRI NT NEXT SS PRINT 1 Q 1 s IFRIGHTS 0 91 THENPRINT 2 Q8 2 S68 INPUT Is this item
35. SCDO7 Should you have any questions and or problems Please call your dealer WP 3 3 VERSION 1 01 FIX PRINT DEVICE 5 In OS 65U versions 1 43 and 1 44 when device 5 the line printer was not ready the system would ring the bell to alert the user The user then had a choice of entering a lt CONTROL gt C to abort the print Or any other key to try the Print again A problem would appear when this not ready occurred and the user typed a lt CONTROL gt C to abort the print The sys tem would hang trying to error out through BASIC s error routines In order to solve this an error routine for aborting the print to device 5 must be added and used instead of BASIC s error routine The following fix adds this error routine to WP 3 3 and in structs WP 3 3 to use this routine FIX First load the WP 3 3 by entering program LOAD WP 3 PASS Enter the following new line in the program to set up the error path 145POKE15945 76 POKE15946 164 POKE 15947 65 After this line is entered the following lines should be typed in the immediate mode These lines are the new error path for WP 3 3 POKE36 260 162 POKE36261 254 POKE36 262 154 POKE36 263 169 POKE36 264 130 POKE36 265 32 POKE36 266 61 POKE36 267 13 POKE36 268 32 POKE36 269 220 POKE36270 17 POKE36271 4 POKE36272 32 POKE36 273 6 Now save the WP 3 entering program by SAVE WP 3 PASS This fix will be effecti
36. The Unofficial OSI Users Journal P O Box 347 Owings Mills Md 21117 301 363 3268 Column One Our plans for the software issue in October are pro gressing Actually of course the entire issue will not be software alone we will not abandon hardware freaks for a whole month But we do plan to devote a large portion of the October issue to descriptions of software available by for PEEK 65 rea ders If you haven t sent in your description of YOUR favo rite gem yet do so right away use the form in the back of the August issue or a reason able photocopy If the response is as good as we expect we will continue to present descriptions of PEEK 65 subscriber s software in future issues as well Let us know about your goodies Speaking of goodies have a look at this issue We have the usual and appreciated technical articles for OSI personal computer users plus a review of the Denver Board modification to OSI s old line of business computers and the first of a series of articles on optimizing Micro soft BASIC This is the kind of all size machine mix we love Keep it up More info from OSI New Users Guides for 230 E and I machines are at the printers Details will be released next month on Keysort OSI special form of Cosort Key File Loader and Microsoft Utilities for the 300 s M80 Micro soft s famous macro assembler will be available for about 200 we re told A new adv
37. VALIDITY 420 IF DA lt 0 OR DA gt 275967 THEN 250 and translate BASIC programs 430 IF RA lt 0 OR RA gt 65536 THEN 330 but most users should have no 36 trouble in adding the ability 22 IF NB lt 0 OR NB gt 65536 THEN 230 ee ii ere ape Pears 460 REM NOW PERFORM CALCULATIONS FOR OPERATION running you have 4 local com 480 DH INT DA 16777216 RM DA DH 16777216 490 DM INT RM 65536 RM RM DM 65536 mands They Bree 500 DL INT RM 256 RM RM DL 256 TEER 510 SCIRE gt B Braue program 520 POKECB 1 RM POKECB 2 DL POKECB 3 DM POKECB 4 DH an Pp 540 POKECB 5 NB INT NB Q Q POKECB 6 INT NB Q lt CTRL gt D Toggle the duplex 3 lt CTRL gt I Toggle SAVE 560 POKECBEJ RA INT RA Q Q POKECB 8 INT RA Q 570 on and off zi lt CTRL gt O Initiate file zee totes a Ree eens ace send routine x Cu i 2 610 IF RWS W THEN RW 1 630 DEV A The program has its own key board polling routine for E ER USR RW video systems which is an 670 REM CHECK FOR ERRORS a aptation of the routine from 690 IF ER THEN GOSUB810 OS 65D V3 3 but without the 700 vaches For BASIE ang a 710 REM RESTORE USER S USR X VECTOR loop has been shortened The 730 POKE 8778 UL POKE 8779 UH Poe nage r 740 ita EE A T 750 REM RESTORE OLD lt CTRL gt C STATUS be used by those who want to 770 POKE 2073 CC get ambitious and write the ae END disk handlers in machine code 800 To start communic
38. YTE 00 00 Longview TX 75605 1150 20C9 00 4 Telephone 214 663 3877 1160 20CA 00 LNMULT BYTE 00 00 after 6 00PM 1160 20CB 00 ree F 1170 20CC OA INCR BYTE SOA Dealer Inquiries Invited DBI ANNOUNCES ANOTHER FIRST FOR THE OSI MACHINE THE SAME PEOPLE WHO BROUGHT YOU THE REVOLUTIONARY DB 1 MULTIPROCESSING ENCHANCEMENT INTRODUCES THE DS 1 SCSI HOST ADAPTER WITH BATTERY BACKED REAL TIME CLOCK 100 YEAR DAY DATE CALENDAR AND 5K RAM The DS 1 allows for many new disk technologies For example the IOMEGAt Alpha 10 a 10 megabyte formatted removable disk or the 5 inch Winchestors The combination of the DS 1 and Alpha 10 are a perfect upgrade for all OSI machines using the 48 pin bus and OS 65U t Operating Systems This combination can also be used for additional storage and backup on hard disk models t ALPHA 10 AND IOMEGA ARE TRADEMARKS OF IOMEGA CORP For Further Information Contact tt OSI AND OS 65U ARE TRADEMARKS OF OHIO SCIENTIFIC INC Dealer Inquires Invited p o box 7276 A denver co 80207 INC 303 364 6987 OS65D EXTENDED MONITOR FIXES AND ODDS amp ENDS FOR Cl1P MINI FLOPPY By Robert Madoux 1577 Poag Rd Edwardsville IL 62025 As many of you know the Load View and Save functions of the OS65D EM do not neces sarily work as supplied on some versions of the Disk Operating System I have 0S65D3 1 and 3 3 I brought this to the attention of the old OSI and was authorized to retur
39. add execution addresses are displayed as the line is processed At the end of the compression the number of bytes saved is displayed CTRL C is disabled during execution of the program 2 REM COMPRESS FOR HEXDOS 7 10 83 continued 4 POKE530 1 PRINTCHR 26 DIMB 72 INPUT Filename F 6 LOAD 4 F LOAD 5 F POKE227 255 AD 2817 AT AD 8 PRINT PRINT Line O add N add 10 TA USR 5 256 USR 5 IFTA 0 THEN30 12 LL USR 5 HL USR 5 LN LL 256 HL P 0 FL 1 14 D USR 5 IFD 3 4THENFL FL 1 16 IFD 142THENFL 0 18 IFD 32ANDFL 1 THEN 4 20 P P 1 B P D IFD gt OTHEN14 22 PRINTCHRS 13 LN TAB 7 AT TAB 14 AD AT TA 24 AD AD P 4 HA INT AD 256 LA AD HA 256 26 PRINT 4 CHRS LA CHR HA CHR LL CHRS HL 28 FORI 1TOP PRINT 4 CHR B I NEXTI GOTO10 30 PRINT 4 CHRS 0 CHRS 0 3 SAVE 4 PRINTCHR 13 TAB 7 AT TAB 14 AD 32 PRINT PRINT PRINTAT AD Bytes saved POKE227 127 POKE530 0 end Jim Hayes 2 Seattle WA 98116 SECOND ANNUAL ROCKY MOUNTAIN COMPUTER SHOW AND SOFTWARE EXPOSITION The Second Annual Rocky Mountain Computer Show and Software Exposition will be held Thursday Saturday Sept 22 24 1983 at the Denver Merchandise Mart Show hours are 10 30 AM to 5 30 PM daily The show features micro computers including business computer systems home and personal computers and video games plus business per sonal e ucational and enter tainment software a
40. ailable see PEEK ad this issue but it has some limitations and it appears that it is the disk that is slowing things down not program execution Con sider programming and or file structure changes to reduce disk accesses i e read write 10 records at a time by keeping them in variables matrix until 10 are accumu lated You might also play with the floppy stepping rate This is accomplished by POKE ing the delay in mili seconds into the right location The range is gene rally between 3 and 9 msec If yours is a Shugart drive better leave it at 9 Most others run well at 5 some faster at 3 For OSU release 6 79 POKE 11895 MS for earlier version it must be determined if location 11895 currently contains 9 IF PEBEK 11895 9 THEN POKE 11895 MS otherwise POKE 11886 MS Peek Staff ek kkk k ED I often write or acquire BASIC programs that for the purpose of readability contain many embedded spaces These spaces each take a byte of memory that may be needed for data They are moreover not neces sary for correct execution of most programs This program written to run under the HEXDOS disk op erating system will eliminate all spaces from BASIC programs except those occurring in REMarks and in literals ed strings The compressed source program is saved in the same file space that was used to store the original program Each line number and the associated original O add and new N
41. anced software course for the 300 s was run and covers 1 75 SEPTEMBER 1983 Vol 4 No 9 INSIDE QMAKER 2 EX MON ADDITIONS 4 OS65D EXTENDED MON 9 NEW DBI BOARDS ll OS 65U SMART TERM PROG 11 OPTIMIZING MICROSOFT 17 in the spring and will be repeated this fall It is for experienced programmers only assembly language techniques for the 300 series Contact your dealer to get into the course We now have our multiuser computer here at PEEK 65 run ning OS 65U V 1 43 We have noted a couple of changes not mentioned that we can find in the documentation First the new directory format instead of just saying XXXX Bytes recoverable meaning some files have been deleted but not repacked to recover the disk space actually LISTS the deleted files marked as deleted Secondly and more impor tantly CREATE now scans the directory for deleted files and when it finds some space into which the new file you are creating will fit sticks it in there rather than always appending it to the end of the disk as before This removes one of the major ob jections to 65U file handling the need to periodically re pack the disk to eliminate space no longer used by deleted files while retaining the major advantage of 65U file handling in that files are still contiguous on disk allowing super fast searching without a lot of thrashing back and forth on the disk Be sure to write us and let us know what
42. anuals are available by themselves and are deductible from full purchase price of software within 60 days after purchase Foreign orders must be paid in U S dollars and drawn on a U S bank or international money order ALLOW 2 WEEKS FOR DELIVERY AFTER RECEIPT OF CHECK OR MONEY ORDER CALL 301 279 2225 11 techniques I wrote this ar ticle in part to respond to that request As some of you may know I am the SYSOP of the Ohio Scientific Special Interest Group on CompuServe There we exchange programs help each other with problems and discuss ideas for new ventures CompuServe users can access a database of pro grams and articles post messages on a bulletin board and even talk directly with other members from every state in the union and Canada The immediacy of this medium allows for a rapid flow of in formation so we can often get the answers to questions over night I think this service compliments PEEK 65 quite well PEEK 65 can cover a given subject in depth and provide much needed infor mation but it is more convenient to use a bulletin board to ask a question or discuss an idea without the time lag of a monthly publi cation So I am submitting this article to help PEEK 65 readers running OS 65U gain more use from not only CompuServe but other bulletin boards TRM65U allows capturing of received data in OS 65U data files and to transmit BASIC programs TRM65U supports the standard ASCII X ON lt
43. ation con 810 PRINT DEVICE A ERROR ER AT ADDRESS DA nect your modem to your system a PRAVISRSTORN anes E ra det lee basso 840 PRINT ENTER THE DECIMAL VALUE OR HEX VALUE PRECEEDED nae oap S p f 850 INPUT BY A A IFLEFTS A 1 THEN880 wait for the carrier detect 460 FORX 1TOLEN A C MID A X 1 IFC lt 0 ORC gt 9 THEN840 ght to light on the modem 70 NEXTX A VAL A RETURN and when it does press i A lt RETURN gt video s st s ma 880 A 0 IFLEN AS lt 2THEN840 h Lo hit 2 SRETURNS gt 890 FORX 2 TOLEN AS C MID A X 1 IFC lt 0 THEN840 AVE wen ge 900 IFC lt 9 THENA A VAL C 16 LEN A X GOTO930 You should now be able to rane 910 IFCS lt A ORCS gt EF THENS 40 to the host system I hope A ASC CS 55 16 LEN AS X you enjoy using this program aac ASAP DSCICS ye A X and if you have any questions T please feel free to contact me on CompuServe either via EMAIL to 70001 1265 or in OSI SIG on page PCS 125 Next month the source code and installation instructions PRINT Listing on page 16 14 OHIO SCIENTIFIC Inc With our new management team OSI is proud to announce the addition of the KeyFamily 390 series MULTI PROCESSING BUSINESS SYSTEMS to our complete line of 200 series timesharing business computers Utilizing state of the art microprocessor technology OSI now offers the highest performance microprocessor based business system available
44. ccesso ries publications services and peripherals Admission is 5 00 for adults and 3 00 for children For more informa tion call or write Northeast Expositions 822 Boylston Street Chestnut Hill MA 02167 Telephone 800 841 7000 or 617 739 2000 within Massachusetts EPROM PROGRAMMER POWER SUPPLY The last issue of PEEK fea tured a construction article for a new EPROM programmer and there will probably be another in a coming issue There is however just one little hitch Virtually all EPROM program mers require a 26 volt supply to power the system That all well and good if you have an 8 floppy system because you can steal it from the floppy power supply But what about those who don t have an 8 floppy It s back to the store for more parts e transformer diodes ca pacitors etc Or is it PEEK wouldn t leave you in a dilemma like that So here is Brian s handy little circuit that makes the required 26 v out of the readily available 12 and 5 volts that everyone has Basically it s a DC to DC converter with a voltage doubling output It is only little but it will give sufficient drive for one EPROM at a time but then most EPROM programmers are Or can be made this way To make things easier for you a 1 1 2 x 2 bare circuit board is now available through PEEK 65 see the ad Better yet for those of you who cannot get to the store easily or want the whole thing a
45. cess to the keyboard that is not needed The change at 1E9C also fixes the Save routine so that it will work properly it did to a certain extent on OS65D3 3 this change is also part of the keyboard fix The rest of the keyboard fix just changes pointers See listing 1 lines 70 through 280 for the complete keyboard fix View has a minor problem it accesses the keyboard twice for every read to the ACIA All that is done is remove the extra keyboard subroutine and move the jump routing below it up in its place See lines 310 and 320 in listing 1 EXTRA BONUS The way the fix above works is to check the keyboard for a pressed space bar just before outputting any character to the Operating System output devices i e CRT Griver ACIA any amp all selected devi ces The extra bonus is that all EM functions that use the O S output devices can be terminated by pressing the space bar Those major func tions are Dump Q disassemb ler Save Load and View There is no need to press the L key to terminate Save pressing the space bar is sufficient Load may termi nate if there is a checksum error in which ERR will print or if a character is detected that is not an ASCII encoded hex digit in which only a will print In either case just rewind the tape a little and press L and the RETURN key One last note on Load The disk Load will not respond to XXXXG at the end of a checksum program that is
46. dit those lines using CTRL I s to get me between the quotes and put the names of the files in those lines Sometimes I add other kinds of test items and line 400 is there to remind me to add the number of those items to NO which is my question counter By running this once then switching the locations of A1 A4 in lines 500 530 you can get two different tests to look identical For the most part I am pleased with this program but on occasion the spacing gets out of whack on long questions That s why I m peeking and poking 22 which as far as I can tell does the same thing as 14 in ROM basic I originally wrote this for my ROM basic but it required much memory and a good garbage collection as well as typing numerous data statements which becomes con fusing late at night The print CHRS statements are control statements for the printer Listing 3 is a program to edit files made by listing 1 It allows changing spelling er rors to be corrected etc Hope these programs are of some use to someone Keep up the good work at Peek 65 LISTING 1 9 DISK SE B 19 REM QMAKER 11 PRINT 13Multiple choice sPRINT 2 Matching 12 INPUT 3 gt True false I 134 ONIGOSUBIS 34 48 14 PRINT 28 GOTO11 15 INPUT FILE NAME A FORE 888 POKE8722 16 FOKE2972 13 POKE2976 13 17 INPUT HOW MANY ITEMS I 184 DISK SE B 19 DISK OPEN 6 A 206 PRINTHS Is FORA 1TOI FORB 1706 IFB 1THENPR
47. e The above search sequence has many implications If BASIC has to chase down a list of line numbers the fewer line numbers to check the better This leads to these sugges tions l Put all high use subrou tines those called often and from all over at the very beginning of the program even ahead of the main program code 2 Use multiple statement lin es wherever possible This one also reduces memory size 3 Avoid REM only lines Their line numbers have to be checked too This also re duces memory size Put your documentation on a separate piece of paper or keep a documented version in addition to the run time version 4 Put low use one time only subroutines at the end of the program The loss in speed when calling them is less important than avoiding having to search past them on more frequent branches 5 If you have code which requires repeated execution i e a loop use FOR NEXT No line search is done If a loop is to be executed a var iable number of times depen dent on some variable within the loop a WHILE loop try something like the following FOR X 0 TO 1 STEP 1 X T gt 25 REM WHILE T lt 25 EFFECTIVE PROCESSING Presents NEXT X Incidentally spaces as in the above should be avoided GOTO a REM Many programmers have a habit of using REM statements as the destination of branches This causes two problems First removal of REMS to speed up t
48. e memory can I add to my mac hine What kind s of boards are necessary What about CP M I know that it is for 280 s but I have read about OSI with it How compatible is it with other manufacturer s disk formats How hard would it be to use a different keyboard with my machine Is OSI going to do anything with the personal market Steve Rydgig Collinsville IL 62234 Steve l I haven t heard of a COBOL which will run on a 6502 under 65D 2 We could write a book about FORTH It is fast logically Organized and seems to really appeal to hard core hackers but it is just about as hard to program in as assembler 3 You can add memory until you get up to the locations used for I O by any of the other boards you use some of which are non OSI Where does the D N floppy controller address the disk Where does your serial I O port live My guess is you can add another 16K D N could tell you more and recommend boards as could Generic and the other fine PEEK 65 advertisers 20 4 CP M runs only on 8080 8085 and 280 machines It will not run on a C4P at all It is written in 8080 Assembler and therefore requires a CPU which will run 8080 instruc tions Your 6502 will not OSI machines which have a 280 Gan usually run CP M As to disk formats CP M is avail able in many different disk formats but that isn t your problem 5 I know of no other manu facturer making OSI Polled key board c
49. e of PEEK 65 Al again asked for articles and further asked authors to describe their programming INTRODUCING OUR NEW PRODUCT LINE The missing tools for the OS 65U system Our products are written in 6502 native code and are compatible with OSU single time share or network modes Floppy or hard disk systems Ky ASM V1 1 ASSEMBLER Virtual source files superfast many extra features including a label table 6129 manual 25 50 pgs Ky COM V1 5 COMPILER Configures itself to V1 2 or 1 42 dynamic variables and arrays DIM A N supports machine language routines at hex6000 last 2 pages in high memory accessible debug with interpreter and compile in 2 3 minutes Protect your valuable source routines gain as much as 2 10 times on average programs in execution speed Supports INPUT and PRINT on the 1 42 system 395 manual 25 110 pgs Ky DEV I ASSEMBLER AND COMPILER TOGETHER 474 manual 40 KEYMASTER I V1 0 The word processing missing link for OS G5U based systems KEYMASTER is screen oriented menu driven simple to use yet highty advanced KEYMASTER contains most of the best features only found in dedicated work processing systems Ask for the features you have been looking for and the answer will most likely be YES To be released in February Introductory price 475 Manual 25 All software comes with license agreement registration card manual binder diskette holder and 8 diskette M
50. ease send a stamped self addressed BUSINESS SIZED envelope to OSMOSUS NEWS D B Baker Editor 3128 Silver Lake Road Minneapolis MN 55418 21 before the next data is received when LOADing For an early model Cl this means 23 characters Has anyone ever produced a version of Missile Command for OSI cassette machines This is the game where you try to defend 3 cities from falling nukes Bruce Showalter Abilene TX 79601 k k k k ED By the way Dick Bramain called you a while back re garding advice on how to change IBM 3740 disk format for CP M to old OSI format Actually this is a project we re both working on I read a review in the March issue of INFOWORLD about a Proxy 80 board sold by Software Federation which is said to have a switch whereby the 470 510 boards can be placed or retained in the card cage along with the new 4 mhz 280 board so that old e g DMS software can still be run But the article was a bit vague since they might just as well have meant something else I m intensely inter ested because I have too much highly customized software that runs under the 6502 CPU to switch to the D N 80 board and swapping boards con stantly is not appealing particularly since I don t trust the strength of the backplane amp 48 pin Molex con nectors Have you heard any thing about this and can you elaborate I m confused by the article primarily because OSI data transfer is asyn
51. ed the true Copyright 1983 by PEEK 65 Inc All Rights Reserved published monthly Editor Al Peabody Technical Editor Brian Hartson Circulation amp Advertising Mgr Karin Q Gieske Production Dept A Fusselbaugh Ginny Mays Subscription Rates US surface IS Canada amp Mexico Ist class 23 So amp Cen America Air 35 Europe Air 35 Other Foreign Air 40 All subscriptions are for year and are payable in advance in US Dollars For hack issues subscriptions change of address or other information write to PEEK 65 P O Box 347 Owings Mills MD 21117 Mention of products by trade name in editorial material or advertisements contained herein in no way constitutes endorsements of the product or products by this magazine or the publisher false so I m not sure how many of those items will fit on a track perhaps 20 25 Listing 2 is my program to print tests from the data files generated from listing l Somewhere between line 1 and 100 an INPUT T line is needed to get the name of that test printed Line 280 has a kind of GET that I dug out of a BEXEC program from 3 3 The pokes in 320 allow me to send info to my serial MX 80 printer at 4800 baud The pokes to 64513 generate under line characters which I haven t been able to print any other way yet 370 440 are for statements to open files and send the program to sub routines 370 390 are spaced as they are to allow me to e
52. either of those chips with a hair dryer to see if the LOAD problem goes away sooner Or he might try interchanging those two chips with two others UD 9 UE 9 Also there is a possibility that the problem is in RAM chips UA B 5 thru UA B 8 In answer to Don Bruechert I m convinced that the best way to choose 300 600 baud is to cut the foil trace between pin 9 of U 63 and W5 Then insert a SPDT switch as follows Left switch pin to U 63 pin 11 center switch pin to W5 right switch pin to U 63 pin 9 This mod does not require any adjustment of R57 However the length of any line being SAVEd must be 1 less than the screen width because the CPU doesn t have time to scroll the screen OSMOSUS provides users of Ohio Scientific computers a facility through which they may exchange information hardware and software ideas or otherwise improve their under standing of computers an their ability to use them Members interests range from begin ner to hard disk systems A monthly newsletter provides technical exchange and short ar ticles of interest to members Recent topics included Disk RPM Timer OS ROM Routines 8 parts and The Unofficial Reasonably Complete OSI Directory 4 parts OSMOSUS is interested in establishing contact exchanging newsletters etc with other OSI user groups Memberships in OSMOSUS are available to those outside our immediate area For further information and a sample newsletter pl
53. else good and bad you find as you use the new releases of the OS Publishing PEEK 65 is like owning a motorcycle and a van or maybe an 18 wheeler Many of our loyal readers and contributors own C1P s Oth ers own multi user business machines with huge hard disks How do we address both groups We almost don t The hackers I use the term as a com pliment send us lots of stuff the business users are so busy trying to make a living they rarely do We are about to change all that with the following Startlingly generous offer Any OSI user who writes an ar ticle on a real live business application which is published in PEEK 65 will win a free one year subscription to PEEK There is only one limitation It must be a new subscription or a renewal for next year on your own This means you can t write 8 business arti cles and get your subscription extended 8 years since who knows what inflation may have done to our prices by then However the subscription is assignable This means if you are a dealer or consultant or programmer as many of our business system users are you can use your prize as a gift to one of your clients and we will be sure he she gets the issue in which your article is published That should be good publicity for you So keep those articles and let ters coming folks aE QMAKER by Steve Rydgig 4 Frontenac R R 2 Collinsville IL 62234 I thought it was about time for me
54. eng 760 2070 18 CLC 1 49 95 COD or foreign add 3 00 770 2071 6DCC20 ADC INCR to css H a oad Sgen STA LINNBR BCC L6 2 Reston va 22051 800 2079 18 CLC EELVTLELTVSUSSSLSLSSSSSESESESESSVIVEB ey pee a INC ES Listing continued 820 207D B003 BCS ERROR 830 207F 4C3E20 L6 JMP LOOP 840 2082 18 ERROR CLC LA 850 2083 4C4ElA JMP ERROR1 AT ST 860 2086 C8 INCREM INY l 870 2087 D005 BNE INCRTS P An A POWERFUL COOLING UNIT 900 208C BOF4 BCS ERROR OSI C3B or C3C 910 208E 60 INCRTS RTS 920 208F 20BE20 MULTLN JSR MULTX2 300 cubic feet per minute 930 2092 ADC920 LDA LINNBR l cools both the PC boards 940 2095 8DCB20 STA LNMULT 1 AND the power supplies 950 2098 ADC820 LDA LINNBR with quiet shock mounted 960 2098 8DCA20 STA LNMULT triple fans 970 209E 20BE20 JSR MULTX2 Ta oi 980 20Al 20BE20 JSR MULTX2 Easily installed in minutes 990 20A4 6DC820 ADC LINNBR no holes to drill 1000 20A7 8DC820 STA LNNBR no chassis relocation 1010 20AA 9006 BCC SECOND 1020 20AC 18 CLC Allows normal PC board 1030 20AD EECB20 INC LNMULT 1 removal or replacement 1040 20B0 BODO BCS ERROR uae 20B2 ADCB20 SECOND LDA LMULT 1 0 20B5 6DC920 ADC LINNBR t1 1070 20B8 8DC920 STA LINNBR 1 SPECIAL OFFER 249 95 1080 20BB BOC5 BCS ERROR 1090 20BD 60 RTS 1100 20BE 18 MULTX2 CLC 1110 20BF 0EC820 ASL LINNBR Send your order to 1120 20C2 2EC920 ROL LINNBR 1 1130 20C5 BOBB BCS ERROR Double Cooler 1140 20C7 60 RTS 418 Hidden Forest North 1150 20C8 00 LINNBR B
55. f RAM SOFT FRONT PANEL Soft Front Panel is a software single stepper slow stepper and debugger emulator that permits easy develop ment of 6502 machine code SFP is a fantastic monitor simultaneously dis playing all registers flags the stack and more Address traps opcode traps traps on memory content and on port and stack activity are all supported This is for disk systems with polled keyboard and color b amp w monitor ok Uses sound and color capabilities of OSI C2 C4 C8 systems not for C1P Eight inch or mini disk 24 95 Specify amount of RAM Manual only 4 95 May be later credited toward software purchase Six page brochure available free upon request TERMINAL CONTROL PROGRAM OSI TCP is a sophisticated Terminal Control Program for editing OS 65D3 files and for uploading and down loading these files to other computers through the CPU board s serial port on OSI C2 C4 and C8 disk based systems with polled keyboards Thirteen editor commands allow full editing of files including commands for sending any text out the terminal port and saving whatever text comes back INDUTL utility included for converting between BASIC source and TCP file text Eight inch or mini disk 39 95 Manual only 2 95 WRITE FOR FREE CATALOG Prices shown are postpaid Specify computer modet amp RAM NEW ADDRESS Technical Products Company P O BOX 2736 Salisbury MD 21801 OPTIMIZING MICROSOFT BASIC
56. file OPEN creates file FIX 16 Digit Precision DEV The KeyFamily 300 series will initially be available in 4 models the 1OMB 330E and 40MB 330I up to 4 users and the 350J JJ up to 8 users These systems will include KeyOperator 1 KeyWord Word Process ing System and KeyBasic ORDER YOUR SYSTEMS NOW from your dealer or OHIO SCIENTIFIC Inc 6515 Main Street Trumbull CT 06611 203 268 3116 15 10 20 30 40 50 60 70 80 90 95 100 110 120 130 140 150 160 170 180 190 200 210 220 230 240 250 260 270 280 290 300 310 320 330 340 350 360 370 380 390 400 410 420 430 440 450 460 470 480 490 500 510 520 530 540 550 560 570 580 590 600 610 620 630 640 650 660 670 680 690 700 710 720 730 740 16 PRINT X PEEK 133 14 POKE133 X CLEAR KO 0 K1l 1 K2 2 K3 3 K4 4 K5 5 K6 6 K7 7 K8 8 K9 9 KT 10 PG 256 F1 PG 1 F2 PG 2 F3 PG 3 O1 16 FS 275968 DIMFS 64 FT 64 FA 64 FL 64 CB 9889 BUFFER PEEK 133 K1 PG LE 3584 U1SER PEEK 8778 U2SER PEEK 8779 DV PEEK 11686 PD K1 IFDV K1 THENPD K5 PRINT FILE PRINTER PRINT GOSUB290 PRINT PRINT DATA FILES AVAILABLE PRINT bd X KO FORK K1TOEC IFFT K lt gt KOTHEN120 PRINTTAB X 13 FS K X X K1 IFX K5THENX K0 PRINT NEXTK IFX lt gt KOTHENPRINT PRINT INPUT YOUR CHOICE FS IFLEN FS gt K6THEN130 IFLEN FS lt K6THENFS F GOTO140 FORK
57. he program can cause unex pected errors Second every time BASIC branches to the line it has to interpret the REM and scan over the rest of the line Avoid branches to REM lines branch to execut able code Next month we will discuss constants structuring pro grams FOR loops and string concatenation NOTES FROM OSI OS 65U VERSION 1 44 FEATURES DISK SYSTEMS MANAGER Ohio Scientific has unveiled OS 65U Version 1 44 to supply users with a powerful Disk Systems Manager Completely compatible with the 1 43 it is the latest version of 65U in a long series of operating system enhancements The Disk Systems Hard Disk Manager allows a hard disk to be broken int separate areas protected from each other by the operating system Utilities facilitate the transfer of programs and data files between systems as well as to and from flceppies or through the network The DSM will support 65U and CP M Manager or A machine language EMULATOR TRACER for the 6502 microprocessor Requires OS 65U Any Version amp Serial Console Needs no Hardware Modifications Not a Breakpoint Utility Displays All Register Contents as Each Instruction is Executed Single Step Mode May be used with 65D Loaded by 65U Excellent Machine Code Debugger and or Educational Too Simplifies Disassembly of Existing Code Informational Packet EMULATOR TRACER 65U 8 Disk amp Instructions Source Code 65D 8 Disk amp Print ou
58. n my disk A week later my disk was returned COD for 12 10 recopying amp 2 post age and handling I tried my newly recopied disk and lo and behold View Load and Save locked up just as before I compared track 0 through track 11 with my other disk it was not sent to OSI and both disks were identical Looks like OSI has a problem with their master disk I was wanting to use the View Load and Save functions so my only recourse was to look at the disassembled EM and try to fix what was wrong The rest of this article is what I have found to fix these functions plus other useful fixes subroutines and miscellaneous information VIEW LOAD amp SAVE FIXES View and Load have two major problems The first is that the ACIA is not accessed at all The second problem is that the keyboard is not ac cessed properly The fix for the first problem is to change the subroutine at 1F0D to the DOS input device 1 subroutine the ACIA routine at 24F6 See listing 1 lines 40 and 50 for this change The keyboard is a bit more complex to fix than the ACIA was First the keyboard access routine has been rewritten See lines 70 through 150 in listing 1 for the keyboard access changes For a good example of the keyboard access routine see the OSI graphics manual Just a reminder that this article is written for a ClP or Super board other OSI computers use different hardware for the keyboard The five NOP s remove a second ac
59. o be used again then enter it 1700 to clear the break table By the way the BP table is O page locations D8 through SFF Locations F0 through SFF store the address of the Break Point Locations D8 through DF store the byte that is replaced with 00 for the Break Point For those of you that don t like this plan for the Break Point fix I have plan B If the ASM and EM are loaded try the command IRE BA You will note that error 7 is printed This is the syntax error message What has happened is that the EM also the ASM loads the Basic reentry vector to the error message What plan B does is to change that RE BA vector from an error message to you guessed to 1738 RE EM will be left to the original 1700 start that will clear the Break Point table RE BA will enter the EM at 1738 where the BP table will not be reset There will be no problems when Basic is reloaded as it will reset all the reentry vectors Basic will set the RE EM and RE ASM vectors to the error 7 message To implement this fix make the following chan ges The byte 2A at 1726 change to 17 and the byte CO at 172B to 38 Use Plan A or Plan B but not both See lines 410 through 440 in listing 1 for Plan B MAKE THE CHANGES PERMANENT IF you woul like to make the change permanent use the listing 2 for reference It would be wise to do this on a duplicate disk first I be lieve this method is free from errors as I have done this
60. o handle the busy signal sent by the node to the work station caused the work station to do a delay and then A New Standard of Excellence FINANCIAL PLANNER A POWERFUL TOOL FOR EVALUATING ALTERNATIVES z Get What If answers for up to 10 displayed problems in e Loan Annuity Analysis e Annuity Due Analysis The first four programs all allow you to solve a named variable after changing another variable let you net t thexdifference between any displayed problems provide selectiva saves to disk give you very more informative printouts based on the Nd solved and much much f15xibility than any e Present Future Value Analysis ene en payments Ce ily pay off annual payment jinreagee by percentages or dollars e Sinking Fund Analysis e Amortization Schedule e Interest Convefsions NAY V2 HARDWARE REQUIF EMENTS 48K OSI dual 84 IO Went terminal system 50 7 FEATURES package allawstegnfiguration to almost all non ANSI terminals AND ust SRS eaion of printer port rA fee 68 a running total of yolk ditire Yransaction to pay off schedules payments by both monthtand y ar and reports YTD totals based on user OS VE ma cadkagip Hiscal years oe RE conversions lets you key in any nominal rate and reports the daily and continuously and allows the print out of interest tables your __ ti effective rate for compounding semi annually quarterly monthly
61. ompatible keyboards and don t know enough about them to tell you how hard it would be for you to make modify one 6 As of now OSI plans to continue selling servicing its present line of personal computers and concentrate on new development on the business market but that includes executive personal computers so who knows 7 Obviously my answer to Many of your questions is I dunno I expect many readers know more than I do on many of these topics I welcome cor rection of errors and dis agreement with opinions Al You asked for comments and ideas for PEEK 65 so here goes Any and all information about OSI and their products is eagerly consumed Please have more How about Cleveland Consumer Computers and Com ponents For a while they were selling bare boards and all sorts of OSI equipment Are they still around and what do they have to offer OSI users For several years I have been corresponding with several dozen OSI users around the world In the last few months I have received too many letters starting Dear Earl Thanks for the program you sent but I have sold my OSI machine and can no longer use it The ranks of OSIers are thin ning rapidly I will send you another grap hics program as soon as I use up the rest of the roll of film MARMEN COMPUTING INC Fire Department Software e DISPATCH e A COMPLETE DISPATCHING SYSTEM FOR OSI MULTIUSER SYSTEMS
62. or given in OSI documentation I write much of my own software this was written on a highly enhanced version of the Aardvark Letter Writer combined with the OSI Word Processor and am very in terested in other utility pro grams suitable for the CIP I am mainly interested in programs for personal use Since PEEK 65 seems to be the only publication devoted to OSI we all depend quite heavily on you As to content my highest interest is software I don t mind ads as long as they are paid ads I don t feel the reader should subsidize free ads called Product Reviews by his subscription price Articles on programming tech niques are fine as are tutorials Hardware articles would be OK if only the author could write them so that a non electronics major could understand them This goes double for those writers who like to play guessing games as to which machine they apply Another idea might be interests and skills a question and answer column like the Readers Feedback in COMPUTE In short you seem to be doing a great tightrope job in try ing to satisfy a wide range of While some of your articles are a bit heavy none are too basic Stanley Harshfield Memphis TN 38115 zeke x LETTERS ED I am responding to C D Lombard s letter in the July issue My guess is he should look for an IC that is not functioning when it is cold maybe UF 9 or UC 9 74LS138 He might try heating
63. or units Then I later fill in the code for each block Another technique is to write the main program first like this 10 REM Program Title 100 GO SUB 1000 REM 200 GO SUB 2000 REM 300 GO SUB 3000 REM 400 GO SUB 4000 REM 500 IF FLAG l1 THEN GOTO 100 REM REPEAT IF NOT DONE 600 END Note this is a general pur pose do everything main Program You need only fill in the REM statements to describe what each subroutine does It is also easy for someone else to follow The program flow is obvious you do not need to dig through Pages of code Now that the main program is done fill in the required subroutine Earl Morris Midland MI 48640 Earl We called Cleveland Consumer Computers amp Components They still have various equipment for sale Dec 82 issue of They also have boards available Check their ad in PEEK 65 some bare Peek Staff k k kkk Organization of Southeastern Minnesota Ohio Scientific UserS OSMOSUS ED This letter is in response for your call for information on a Reader Profile My computer is an OSI Cl1P MF with 32K of memory It is an early 1977 model and is interfaced with a NCR thermo printer Ihave also con nected two Atari joysticks but do not get maximum use from them because the system sometimes hangs when they are used I suspect that this may be somehow related to the incomplete description of the AND operat
64. pt 400 and 500 Rev A B C CPU s Requires some cuts and jumpers 30 e Full Support for OSI Custom Hardware amp Software Service Contracts Available 703 527 4600 2704 N Pershing Dr Arlington Va 22201 Dealer Inquiries Invited 370 1720 1720 380 1720 A9338 LDA 838 390 420 PLAN B 410 1725 1725 420 1725 A938 LDA 38 430 172A 172A 440 172A A917 LDA 17 LISTING 2 THIS IS HOW TO SAVE THE EM BACK ON DISK THIS IS FOR THE S 1 4 IN DISK FIRST EXIT EM BY TYPING EXIT THIS IS THE SAFE WAY AND THEN DO ONE OF THE FOLLOW ING FOR O565D3 1 AFTER A SAVE 10 1 1780 8 AFTEER AX SAVE 11 1 1FQ0 4 FOR 056503 2 t DO NOT HAVE THIS VERSION SOMEONE ELSE WILL HAVE TO CHECK THIS 1 DO HAVE A HUNCH THAT IT IS THE SAME AS OS65D3 1 BUT NOT SURE FOR OS65D3 3 AFTER A GAVE 09 1 1200 8 AFTER Ax SAVE 1 1 1A00 8 Ta Cluster System Software Connect up to 16 or more C1 C2 C4 or C8 systems to any OSI 8 floppy system Fast simple disk printer share system Ideal for schools 500 DMS X DMS compatible database manage ment system with full screen file editor definable reports with specifications editing powerful report formatter fast machine code keyfile sort flexible create and recreate utilities more System is fully driven menu 300 DMS license OSI IBM Double Density Floppy Controller e Replaces 470 board e Fully compa
65. socets the D amp N 80 CPU board Low power consumption Upgrading systems where backplane space Uses 2K x 8 bit memory chips will low power consumption and or low heat accept 2716 type EPROMS dissipation is required Versatile addressing Ne Options include NEW LOW PRICES Bare Solder masked and silkscreened 75 Software and documentation provided OSI compatible floppy disk controller protects against disk crashes caused by power failures Real time clock calendar Date and time 16K 200 with battery backup 24K 250 Disk controller 85 Centronics parallel printer interface 32K 300 Supported by software that automatically 40K 350 Real time clock 65 patches OS65D and OS65U bas See e O t PETERE ERTEN 56K 440 Centronics interface 45 VISA MasterCard personal checks and 64K 490 C O D s all accepted Add 5 per board fo shipping and handling a j Generic 0751451893 To order or for more information contact Com puter Products 503 227 7083 5740 S E 18th Ave Portland OR 97202 Fial Computer 5221 S W Corbett Portland Oregon 97201 15 IFP gt 64ANDMIDS Q A 1 THENGOSUB21 GOTO18 168 IFP gt 64ANDMIDS R A 1 ANDORE gt 1 THENPRINT POKE22 3 178 PRINTMID Q A 1 3 18 NEXT 198 IFQR 1ANDP gt 465THENGOSUB 1 g 200 RETURN 218 PRINTTAB 72 NG 228 IFPEEK 8994 gt 2THENFORO 1 T04 POKE64513 95 NEXT FRINT 2308 IF PEEK 8994
66. t Not Available Separately When ordering include Printer Interface Address and Type EFFECTIVE PROCESSING 1509 12th Street North Fargo North Dakota 58102 Supports Subroutine Labels and Named Memory Locations PRICE 1 00 50 00 15 00 17 systems on one or hard disks multiple Part No Description SUG 1 OS 65U upgrade to cur rent version for CD 7 28 C2 D C3 D 220E 230E and 2301 Retail Price 150 SUG 2 OS 65U upgrade to cur rent version for C3 C CD 23 Retail Price 150 SUG 3 OS 65U upgrade to cur rent version for CD 36 74 for C3 A C3 B C3 C C3 OEM C2 OEM 220C 230C 2501 250J 250JJ Retail Price 150 NEW KEYCALC PLANNER PLUS MANUAL The new 215 page Keycalc manual is now available This new completely revised manual is the result of a years work in our Technical Publications Department With this new manual users can get started with their models almost immediately without extensive training All the information a new user May need to create and use a simple model can be found in the first three chapters From Gander Software This new manual has an ex tensive tutorial section along with a reference guide for the experienced user The Keycalc manual is applic able for all previous releases of Planner Plus Keycalc to gether with the new manual makes a great support tool for those users who have tra ditional Challenger or Master key 200 line systems The
67. t 16 bytes to dump The hex dump is performed in lines 420 to 680 This part also checks for the end of dump address If the dump is for a number of bytes which is not evenly divisible by 16 then spaces are printed till we point to the ASCII part Lines 690 to 810 print the ASCII of the byte then JSR s to a routine in the EX MON which increments the starting address and compares with the ending address If the star ting address is greater then the routine jumps back to the command mode of the EX MON if not it just returns to the calling routine This is how several of the EM routines return to the command mode In my ASCII dump hex codes less than 20 or greater than 7E are printed as a period I figured it would be easier to count them than to count those invisible spaces when figuring which hex code was which ASCII character If you want another character put the hex code for it in line 820 Since the video board only has 64 characters across those users need to delete lines 220 and 570 This makes the hex part a little dense but it will all fit on the screen fairly nicely If you need to look at the hex part only then use the D command but the ASCII routine will sure come in handy for checking the end of source in the workspace or making changes to source with out having to retype entire lines The second routine will renumber the source which is currently in the workspace For reasons of simplicity the
68. t one time there is also a bag of parts to complete the kit Good luck and happy programm ing PEEK 65 AD Must sell OSI C2 8PDF two 8 inch disk drives complete system keyboard 48K RAM BMC green monitor Centronics printer 779 OSU OSD V 3 3 manuals OSI s best WP other software System used infre quently and in excellent con dition Original price over 5000 Will sell for 1500 or best offer In Maryland 301 292 4883 kek kk FOR SALE New 1 C30EM 1 500 00 1 C3D 3 500 00 3 C20EM 1 203 00 1 C2D 2 900 00 2 C8P 1 500 00 1 C4P 2 drive 1 500 00 Im mediate delivery freight COD Micro Software International INC Phone 1 800 843 9838 tk eke Need to sell O S I C3D CPU with hard disk and Okidata printer For more informa tion please call 206 248 3377 and ask for John kk kk Souped up C8P DF with Intertec Intertube II Terminal 2 MHz Excellent condition Unit has 2 Siemens 8 SSSD drives 1 505 board 1 CAl0 X board 3 520 boards for 48 K RAM total 2 RS232 serial ports for terminal and printer lots of software and blank disks 9 notebooks full of documenta tion on software and hardware Hardware software blank disks and documentation for 2000 00 plus freight Bob Bernard 2253 Ringling Blvd Sarasota FL 33577 813 953 5363 OSI AFFORDABLE DATA BASE MANAGER B amp W FILE MASTER FULL FEATURED VERSION NOW RUNS IN 32K B
69. tible with OSI format and IBM single density format e Double density too Up to 2 4 meg storage on standard floppy drives 5 Drive capability software selectable Phase locked integrity Special introductory price insures data 500 loop NEW DBI BOARDS by Tom Stover Star Route Gering NE 69341 Readers of Peek 65 must have seen recent advertisements for a new multi processing board made and sold by DBI P O Box 7276 Denver CO 80207 Their ads claim multi user capability with little speed degradation It s true and they work I installed three of the boards in a C3 B several months ago and just added a fourth board connected to a modem a couple of weeks ago There is virtu ally no degradation regardless of the number of users or the application being run Even with intensive disk opera tions there is almost no perceptible speed loss The user of this system is a multi division company running custom written multiple gene ral ledgers seven different accounts receivable appli cations and inventory control simultaneously including us ing record lock out techniques capable within 65U They have used their OSI for over two years but had been generally unhappy with the speed deg radation under the old time sharing method Individual file sizes run to several million characters An Alloy Engineering tape back up system is also used daily Two serial printers are run at
70. to pro viding the changes already made on disk Support is excellent Since we had an older computer and the fear of new operating system glitches had kept us several versions behind we encountered an unforeseen pro blem The 72 meg hard disk directory wasn t the same as it is under newer versions and it needed to be changed Although they had not en countered this problem before Art Hughes the board design er spent three hours on the phone with me one Saturday afternoon helping get the problem resolved I had one defective board which was re placed with a new one These new boards are breathing new life into the old OSI hard disk systems Especially since OSI has failed to provide upgrades to the new Turbodos versions the DBI boards are an excellent choice The beauty of the 650 file system with the FIND command is hard to match applications can be written which are virtually impossible to write under any other operating system language of which I am aware These boards provide the upgraded speed that has been lacking in multi user systems as well as continuing the record and file locking capability The old OSI equipment with new boards is still viable for serious small business applications Even more impressive they mean that even lowly C2 OEM s could be upgraded to multi user systems OS 65U SMART TERMINAL PROGRAM By Rick Trethewey 8 Duran Court Pacifica CA 94044 In the June issu
71. to put in my two cents worth My machine is a C4P with an additional OSI power supply a D amp N memory and flop py board 32K and MPI B 51 drive and a Shugart SA 400 a serial MX 80 printer and OS65D V3 3 The programs I have enclosed have to do with my school work and arewritten for OS65D V3 3 Listing 1 is a program I call qmaker I use it to prepare test questions It requires 1 buffer and that the files already be created on the diskette For multiple choice questions six inputs are re quired The first is the question The second is the second part of the question If the question fits in 80 characters a lt CR gt must be entered for the second part of the question It then prompts for four answers clears the screen and shows the complete question and waits for a response A lt CR gt or number gt 6 causes the items to be sent to disk A 1l or 2 lets you enter a new lst or second part of the question and 3 6 allows you to change an answer When selecting matching items you first enter the term lt CR gt and the question If the question is longer than 80 characters in the input buf fer a as the last character of that question allows another question line to be input The true false section is similar in that if you can t get the statement in one line ending that line with will allow input of a second line The multiple choice holds about 10 15 items per track the matching 20 25 and I ve just add
72. to say it is not able to be a self starting program BREAK POINT PROBLEM Ever get bit pun intended by the Break Points You enter Break Points in your program trying to debug it and upon reentering the EM after running your program you find the Break Point table has been reset to FFFF s The problem is that some Break Points may still be set in your program TWO FIXES If you reenter the EM at 1738 the Break Point table will not be destroyed To do this type after A GO 1738 instead of RE EM If you wish to make RE EM occur at 1738 instead of 1700 make the following change The byte of 00 at 1721 should be changed to 38 and then saved back on disk via listing 2 See lines 370 and 380 in listing 1 Now when the EM is first loaded and run the Break Point table will be set to SFFFF s subsequent reenters will not change the table Even if you enter the ASM first and then RE EM for the first time it will still take one pass at the EM for this change to work It works easier than it sounds The only problem with this fix is that the Assembler Editor also uses the same memory that the EM uses for Break Point storage If you use the ASM then the Break Point table will be destroyed if you don t use the ASM then the BP table will stay intact If you do use the ASM then eliminate all Break Points by using the E command E1 E2 E8 as needed Now the ASM can be entered and used When the EM is t
73. ve the next time WP 3 3 is used Computer Business Software CBS INTEGRATED BUSINESS SYSTEM FEATURING e Accounts Receivable e Inventory Control Order EntryInvoicing e Accounts Payable e General Ledger e Payroll BUSI CALC An electronic worksheet FEATURING e Local and General Formatting Replication Variable Column Widths Editing e Insertion Deletion of Rows and Columns Protected Entries e Help Screen Flexible Printing e Complete User Manual 3300 South Madely n0 Sioux Falls 8D 67106 1 800 845 9838 19 READER PROFILE ED My machine is a C4P with an additional OSI power supply a D amp N memory and floppy board 32K and MPI B 51 drive and a Shugart SA 400 a serial MX 80 printer and OSD65 v3 3 I have been using a Commodore 64 at the school where I work and yes the graphic and sound capabilities are neat BUT it is a pain to use with two opens for any device and the disk seems almost as slow as my cassette used to be I think that the OSI machines are aS good or better than Commodore s for most of my applications which revolve a round my school work and a bowling league secretary pro gram that I ve written I have a few questions Is it possible for me to run COBOL on my machine I have seen the ads in Peek 65 for Technical Products version of OSI FORTH What are the ad vantages and disadvantages of this language How much mor

Vol 4 No 9

Contents

Download Pdf Manuals

Related Search

Related Contents