[72637,1710] K85ROM.01 06-May-87 5750 Accesses: 72 The following is a list of the addresses of various BASIC functions and commands. The first column is the name of the command/function, the second is the Model 100 address, and the third is the address in the Kyotronic 85 (Model 100 look-a-like). I garnered this information from a disassembly of the Ky85 ROM and a partial disassembly of the M100 rom I found on DL8. Amazingly, the table of BASIC keywords and the table listing the addresses of the machine code are in the same place on the Ky85 as on the M100. Hopefully, more information will follow as I get further into disassembling the Ky85 ROM. So far, I owe a great debt to Robert D. Covington, whose disassembly of the M100 ROM is invaluable to me. Dave Anderson [72637,1710] April 6, 1987 ----------------------------------------------------- BASIC KEYWORD ! Addresses ! ! M100 ! ! ----------------------------------------------------- END ! 409F ! 407B ! FOR ! 0726 ! 072D ! NEXT ! 4174 ! 4150 ! DATA ! 096E ! 09A5 ! INPUT ! 0CA3 ! 0CAA ! DIM ! 478B ! 4741 ! READ ! 0CD9 ! 0CE0 ! LET ! 09C3 ! 09CA ! GOTO ! 0936 ! 093D ! RUN ! 09F0 ! 0916 ! IF ! 0B1A ! 0B21 ! RESTORE ! 407F ! 405B ! GOSUB ! 091E ! 0925 ! RETURN ! 0966 ! 096D ! REM ! 09A0 ! 09A7 ! STOP ! 409A ! 4076 ! WIDTH ! 1DC3 ! 1D86 ! ELSE ! 09A0 ! 09A7 ! LINE ! 0C45 ! 0C4C ! EDIT ! 5E51 ! 5B59 ! ERROR ! 0B0F ! 0B16 ! RESUME ! 0AB0 ! 0AB7 ! OUT ! 110C ! 1113 ! ON ! 0A2F ! 0A36 ! DSKO$ ! 5071 ! 5020 ! OPEN ! 4CCB ! 4C81 ! CLOSE ! 4E28 ! 4DDE ! LOAD ! 4D70 ! 4D26 ! MERGE ! 4D71 ! 4D27 ! FILES ! 1F3A ! 1F05 ! SAVE ! 4DCF ! 4D85 ! LFILES ! 506F ! 501E ! LPRINT ! 0B4E ! 0B55 ! DEF ! 0872 ! 0879 ! POKE ! 12B8 ! 1294 ! PRINT ! 0B56 ! 0B5D ! CONT ! 40DA ! 40B6 ! LIST ! 1140 ! 1147 ! LLIST ! 113B ! 1142 ! CLEAR ! 40F9 ! 40D5 ! CLOAD ! 2377 ! 234F ! CSAVE ! 2280 ! 2258 ! TIME$ ! 19AB ! 1975 ! DATE$ ! 19BD ! 1987 ! DAY$ ! 19F1 ! 19BD ! COM ! 1A9E ! 1A6A ! MDM ! 1A9E ! 1A6A ! KEY ! 1BB8 ! 1B81 ! CLS ! 4231 ! 420D ! BEEP ! 4229 ! 4205 ! SOUND ! 1DC5 ! 1D8E ! LCOPY ! 1E5E ! 1E29 ! PSET ! 1C57 ! 1C20 ! PRESET ! 1C66 ! 1C2F ! MOTOR ! 1DEC ! 1DB5 ! MAX ! 7F0B ! 7BBB ! POWER ! 1419 ! 1422 ! CALL ! 1DFA ! 1DC3 ! MENU ! 5797 ! 54A4 ! IPL ! 1A78 ! 1A44 ! NAME ! 2037 ! 2008 ! KILL ! 1F91 ! 1F63 ! SCREEN ! 1E22 ! 1DEB ! NEW ! 20FE ! 20CF ! TAB( ! 7979 ! 7979 ! TO ! 7C7C ! 7C7C ! USING ! 507F ! 507F ! VARPTR ! 3C46 ! 3C46 ! STRING$ ! 2832 ! 2832 ! INSTR ! 7B7A ! 7B7A ! DSKI$ ! 35BA ! 3593 ! ----------------------------------------------------- In case you haven't noticed yet, all of the addresses are given in hexadecimal. Other misc. notes: The keyword table, keyword address table and BASIC error messages are at the same locations in ROM. Start Stop Keyword table 0080 0261 Keyword address table 0262 02F2 Error msgs 031C 035A ------------------------------------------ BASIC Messages M100 Ky85 ' Error',00h 03EA 03F2 ' in ',00h 03F1 03F9 'Ok',cr,lf,00h 03F6 03FD 'Break',00h 03FB 0402 So far, this is all I've found (one night's worth of work, really). Next, the fun stuff begins; comparing M100 BASIC code to Ky85 code. Stay tuned! [76703,4062] KYOINF.002 26-Apr-87 2097 Accesses: 129 #: 146112 S15/Kyotronics 85 21-Apr-87 15:05:55 Sb: #Kyotronic 85 Fm: Tony Anderson 76703,4062 To: All I have spoken to Dave Williamson at D.L. Liquidators in Wichita, about the Kyotronic-85, and have gleaned the following additional information, which will be of interest to the growning Kyo-group. The Kyotronic-85's were manufactured about 2 1/2 years ago, for the Asian and European Markets. Only 40,000 units were made. D.L. Liquidators imported 1500 units from Hong Kong, and there are virtually no more to be had in blocks of more than a few machines. The largest single block still around is 1500 units in the hands of the Chinese Government, who are not interested in letting go of them. D.L. has contacted the company that originally manufactured them, and there is little-to-no interest in tooling up again to produce more units. There is a remote possibility that D.L. may try to get the rights to the computer, and have another manufacturer make them. This would involve a minimum of 10,000 units or so, and costs would be more than the original units, produced in late 1984. It would involve considerable capital expense, so don't look for it in the immediate future. Of the 1500 originally obtained, only a handfull are left. So if you want one, best hurry! There is a possibility that a new ROM will be produced for the American market, providing rights can be obtained for so few units; and would probably involve an upgrade fee for installing it. Ultra Soft Innovations (Canada) is reportedly producing a version of DISK POWER for the Kyo-TDD disk drive combination, and a machine-specific version of TEXT POWER. - To be announced soon. (Read it here first!) Next month, D.L.'s advertising in Computer Shopper will feature the TravelCOM external modem for the Kyo (and others), at $99.95. And reportedly, there are some additional programming efforts toward producing additional software for the Kyo. Dave will soon be online here, and hopefully will have some additional tips for the benefit of the Kyo group. [71266,125] KYROM1.EQU 27-Jul-87 2990 Accesses: 45 KYROM1.EQU ---------- Copyright 1987 -- P.C. Wheeler This is from the front end of one of my (successful!) ASM files for the KC-85. More data will follow as I accumulate it, hopefully with more structure. ; ;ROM equates for Kyo-85 (M100 vals in comments in parens) ; CLRFNK EQU $5784 ;($5A79) clr f-key tbl MOV1 EQU $576D ;($5A62) DE --> HL LOCK EQU $421B ;($423F) scroll lock CLS EQU $420D ;($4231) clear screen DSPFIL EQU $567D ;($5970) dsp fil on mnu SETCRS EQU $56D6 ;($59C9) set cursor mnu EMPTY EQU $5825 ;($5B1A) '-.-' msg PRTSTR EQU $5763 ;($5A58) string to lcd SETCUR EQU $4258 ;($427C) set curs posit FREMEM EQU $7B5C ;($7EAC) free bytes SHOWTD EQU $5A78 ;($5D70) time-date KYREAD EQU $6EF2 ;($7242) scn kbd BEEP EQU $4205 ;($4229) beep MENU EQU $54A4 ;($5797) menu ROM2 EQU $55D0 ;($58C3) unk ROM5 EQU $55F8 ;($58EB) unk ROM4 EQU $55EF ;($58E2) unk ROM3 EQU $55E8 ;($58DB) unk ROM1 EQU $55C3 ;($58B6) unk SETSER EQU $17C8 ;($17E6) com on SPCMSG EQU $5C53 ;($5F4B) '..Space Bar.' WTSPC EQU $5C37 ;($5F2F) wait space bar SETINT EQU $730A ;($765C) set int to 1Dh RCVX EQU $6A75 ;($6D6D) ck rs for char RV232C EQU $6A86 ;($6D7E) chr fm rcv que SD232C EQU $6B3A ;($6E32) snd w x-on-off PRTINT EQU $39AD ;($39D4) prt 16 bit int CRLF EQU $41FE ;($4222) prt crlf MPYINT EQU $36FE ;($3725) mpy signd int FREMSG EQU $7C48 ;($7F98) 'bytes free' ADDR2 EQU $57EF ;($5AE4) file ads + 1 ADDR EQU $57EE ;($5AE3) get file ads ERAEOL EQU $4239 ;($425D) erase to eol INLIN EQU $45F8 ;($4644) get kbd line ROM6 EQU $05FA ;($05F3) unk ROM7 EQU $207A ;($20A9) unk DELCHR EQU $68A7 ;($6B9F) delete char ROM8 EQU $2104 ;($2134) unk ROM9 EQU $2119 ;($2146) unk KILTX2 EQU $1F90 ;($1FBF) kill file + 1 ROM10 EQU $1FAA ;($1FD9) unk ROM11 EQU $1FE8 ;($2017) unk MAKHOL EQU $6875 ;($6B6D) ins spaces ROM12 EQU $4DD8 ;($4E22) unk ROM13 EQU $2211 ;($2239) unk GETCH EQU $12D4 ;($12CB) wait for chr TOUPR EQU $0FF0 ;($0FE9) lc to uc ROM14 EQU $56F2 ;($59E5) unk ROM15 EQU $209D ;($20CC) unk ; ;RAM equates ; CSRY EQU $F640 ;($F639) Hor curs posit CSRX EQU $F641 ;($F63A) Ver curs posit ERROR EQU $F659 ;($F652) Bas error trap STAT EQU $F662 ;($F65B) Comm stat LINENO EQU $F681 ;($F67A) FFFF if no pgm LINBUF EQU $F68C ;($F685) Bfr for kb lin UNSAV EQU $F98B ;($F99A) Unsav BA addr EDITBA EQU $F9A0 ;($F9AF) edit attr byte LBLON EQU $FAB4 ;($FAAD) lbl lin enable RAM1 EQU $FAD4 ;($FACE) unknown RAM2 EQU $FADE ;($FAD8) unknown STDO EQU $FBC0 ;($FBAE) strt DO store STCO EQU $FBC2 ;($FBB0) strt CO store TOPFIL EQU $FBC4 ;($FBB2) end of top fil STAR EQU $FBC6 ;($FBB4) strt arr store STUN EQU $FBC8 ;($FBB6) 1st unusd byte CURBA EQU $FCA5 ;($FC93) current BA pgm RAM3 EQU $FCB9 ;($FCA7) unknown ALT1 EQU $FDA1 ;($FDA1) BEGALT + E1h ALT2 EQU $FDD7 ;($FDD7) BEGALT + 117h ALT3 EQU $FDEE ;($FDEE) BEGALT + 12Eh ALT4 EQU $FDEF ;($FDEF) BEGALT + 12Fh KBUFN EQU $FF6B ;($FFAA) chrs in kb buf Phil Wheeler -- 71266,125 7/27/87