home *** CD-ROM | disk | FTP | other *** search
/ ftp.whtech.com / ftp.whtech.com.tar / ftp.whtech.com / club100 / pg / pgxos / xos-c.doc < prev    next >
Text File  |  2006-10-19  |  12KB  |  314 lines
  1. XOS-C.DOC  by Paul Globman (C) 1989
  2.                [72227,1661]
  3.  
  4.  
  5.      XOS - X-bank Operating System
  6.              (cross-bank)
  7.  
  8. XOS is a system of three programs that is designed to run in LOMEM of each of
  9. the T200's 3 RAM banks.  These three programs load/install as one program 
  10. interact with one another in such a way that you can have the software of all 3
  11. banks available in any bank.  XOS uses the first 768 bytes in each bank.
  12.  
  13. XOS runs in the location used by Disk Power 200.  With XOS installed, Disk 
  14. Power cannot be used and any attempt to use it could have disastrous results.
  15.  
  16. Installing XOS is simply a matter of 1) loading XOSLDR.CO and XOSDAT.CO into
  17. the same RAM bank, 2) HAVE AT LEAST 1K FREE RAM IN EACH BANK TO INSTALL XOS, 
  18. 3) run XOSLDR.CO, and 4) run XOSLDR.CO again (the second execution of
  19. XOSLDR.CO is sometimes needed in a cold started system... run it twice at all 
  20. times to insure proper installation).
  21.  
  22. NOTE: XOSLDR.CO and XOSDAT.CO Are available as XOS-C.200, and you will
  23. need HXFER.200 to convert the ASCII files into XOSDAT.CO and XOSLDR.CO.
  24.  
  25.  
  26. XOS was designed to offer cross-bank abilities (as well as other 
  27. enhancements) to the Tandy 200 at the MENU, with BASIC, TEXT, and TELCOM.
  28.  
  29.   ==================================
  30. MENU and TEXT enhancements:
  31.  
  32. XOS will enhance the operation of Menu functions, also offering several TEXT 
  33. utilities like background printing and cross-bank cut/paste.
  34.  
  35. At the Menu, ADRESS and SCHEDL have been made invisible, and the LABEL line
  36. will display up to 7 new functions in addition to the original 3.  The new 
  37. LABEL line will look like this:
  38.  
  39.           Cmd>           Name File     
  40. Bank Back Roms Copy Kill Pste Prnt Menu
  41.  [1]  [2]  [3]  [4]  [5]  [6]  [7]  [8]
  42.  
  43. F2 - REVERSE BANK SWITCHING - press F2 to go to menu of previous bank.
  44.  
  45. F3 - ROMS - press F3 for ROM selection menu.  Modify the use of F3(Roms) with
  46. XOSUTL.BA (provided).
  47.  
  48. F3 - CMD> - press F3 with cursor over BASIC to run a BASIC program.  If the 
  49. cursor is NOT over BASIC, then F3 will run a .CO file.
  50.  
  51. If CAPS LOCK is on, then the file to be executed will default to 3:CMD>.BA or
  52. 3:CMD>.CO, depending upon where the cursor was.
  53.  
  54. If CAPS LOCK is off, then you will be prompted "Cmd>".  Just type in a 
  55. filename (no extension) and press enter.  "3:" is the default bank and needs 
  56. no prefix.  Filename may begin with "1:" or "2:" to indicate file location, if 
  57. not in bank #3.
  58.  
  59. F6 - PASTE BUFFER TRANSFER - move the paste buffer to another bank for 
  60. cross-bank CUT and PASTE operation.
  61.  
  62. F6 - RENAME - rename program or file under cursor.  Allows illegal 
  63. characters and filenames, so use caution.
  64.  
  65. F7 - BACKGROUND PRINTING - press F7 with cursor over DO file.  This duplicates 
  66. SAVE TO LPT: from text.  Once begun, press F7 to abort.  Beep announces 
  67. start and stop of print task.  Printing will be suspended if you switch banks,
  68. switch LOMEM code (F8), or edit a file that is in lower RAM than the file that
  69. is printing.  Backgroung printing will resume when the conditions are restored
  70. to normal.
  71.  
  72. F7 - FILES DISPLAY - press F7 to view the remaining two banks, displayed in 
  73. circular order (1,2,3,1,2), with current bank active for various MENU 
  74. functions.  Shift-F7(File) will restore the normal Menu display.
  75.  
  76. F8 - ADDITIONAL MENU OPTIONS - this will offer the additional options listed 
  77. for F3, F6, and F7.
  78.  
  79.   ===================================
  80. BASIC enhancements:
  81.  
  82. In BASIC, F8 has been re-defined to CALL 40961, which will re-install all XOS 
  83. hooks, should they become dis-engaged.  This can also be accomplished from 
  84. BASIC with the following command...
  85.  
  86. KEY8,"Menu"+chr$(24)+"CALL40961"+chr$(13)
  87.  
  88. XOS will enhance BASIC and M/L capabilities by allowing programmers to
  89. write programs that access other RAM banks.  The BASIC enhancements will 
  90. allow a running program to RUN a BASIC program, LOADM a .CO file, or KILL a 
  91. TEXT.DO file in another bank.
  92.  
  93. The instruction, CALL 41179, will load XBAS-2 into the ALT LCD buffer of the 
  94. current bank.  Once CALLed, 
  95.  
  96. XBAS-2 is used by the BASIC programmer to access files in other banks.  Data 
  97. files (.DO files) in other banks can be KILLed, and BASIC and M/L programs can 
  98. be brought in from other banks and executed in the current bank.
  99.  
  100. Once the BASIC program has executed the "CALL 41179" command, the routines can 
  101. be accessed with the following call:
  102.  
  103.     CALL 63600,CMD,VARPTR(X$)
  104.  
  105. The commands are 7 - KILL FILE.DO
  106.                  8 - LOADM FILE.CO
  107.                  9 - RUN FILE.BA
  108.  
  109. XBAS-2 does internal error checking and will beep if there is a problem.  
  110. XBAS-2 will not execute the wrong instruction and offers the BASIC 
  111. programmer a result descriptor byte so the BASIC program can trap and handle 
  112. problems.  The result descriptor (RD) byte is at 61302, and can be PEEKED 
  113. either before or after a CALL to XBAS-2.
  114.  
  115. KILL FILE
  116. This command is: F$="2:FILE.DO"
  117.                 :CALL63600,7,VARPTR(F$)
  118.  
  119. The RD byte is 0 if the file is found and killed.  The RD byte will retain 
  120. the CMD if the CALL is not sucessful, and a beep will sound.  During program
  121. debugging, a non zero RD means the file was not specified as .DO, the CMD was 
  122. not a seven (7), or the file to be killed, was not found.
  123.  
  124.  
  125. LOADM FILE.CO
  126. This command is: 
  127.  
  128.  F$="2:FILE.CO":CALL 63600,8,VARPTR(F$)
  129.  
  130. If RD=0 then the .CO file was loaded into place and the execution address is
  131. stored at 61303/61304.
  132.  
  133. The load address is stored at 61300/61301.  If these two bytes are both 0 
  134. then the file was not found.  Otherwise 61300/61301 has the load address of the
  135. file and HIMEM has to be cleared for this file to LOADM.
  136.  
  137.  
  138. RUN FILE.BA
  139. This command is: 
  140.  
  141.  F$="2:FILE.BA":CALL 63600,9,VARPTR(F$)
  142.  
  143. Your program will load and run the BASIC program F$, so if the program making 
  144. the call continues, then F$ wasn't found.  The RD would reflect the command 9.
  145.  
  146. For all XBAS-2 commands, the user must check RD and pointer addresses, 
  147. IMMEDIATELY after the CALL 63600.
  148.  
  149. The original XOS offered XBASIC.  To retain the features of XBASIC you must 
  150. store XBASIC.CO in bank #3.  Now the following code is the equivalent of 
  151. LOADM"XBASIC".
  152.  
  153. 10 CALL 41179             'LOADM XBAS-2
  154. 20 X$="3:XBASIC.CO"       'SPECIFY FILE
  155. 30 CALL63600,8,VARPTR(X$) 'LOADM XBASIC
  156. 40 IFPEEK(61302)<>0THEN99 'TEST LOAD
  157.  
  158. Now XBASIC is loaded and CALL 63600 is available with commands 1 thru 6.  A 
  159. simple CALL 41179 will reload XBAS-2 for commands 7,8, and 9.
  160.  
  161. BASIC programs are brought into the unsaved program buffer, and executed by
  162. IPL of the unsaved buffer progradisastIC programs called in by the CMD> 
  163. key should begin with the IPL"" statement to prevent it from unwanted 
  164. execution.
  165.  
  166. Attempts to alter the POWER time setting must be followed by POKE 40962.  Ex:
  167.  
  168.  10  POWER 100:POKE40962,100
  169.  20  POWER CONT:POKE40962,0
  170.  
  171.   =================================
  172. TELCOM enhancements:
  173.  
  174. XOS adds the following to TELCOM's TERM mode...
  175.  
  176.   F6 = display files and bytes
  177.   F6+SHIFT = direct access to TEXT
  178.   F7 = jump to TELCOM in next bank
  179.   F7+SHIFT = jmp TELCOM in prev. bank
  180.  
  181. XOS will allow you to jump from bank to bank while on-line with either
  182. an external or internal modem.  And whichever bank you jump to, the hooks
  183. are active to allow you to switch banks again.
  184.  
  185. The TELCOM hook code runs in the last 15 file slots of the directory of each 
  186. bank.  This means that you can have a maximum of 31 files per bank, instead 
  187. of 46.  From the T200 users I have spoken to, this is not a problem.
  188.  
  189. In return for the 15 file sacrifice you get several excellent TELCOM 
  190. enhancements.
  191.  
  192. NOTE: The first time you enter TELCOM in another bank, you will enter the TERM
  193. mode by pressing F4(Term).  Should you exit this bank, and re-enter it, you 
  194. will have to type TERM<ENTER> if F4(Term) doesn't work.
  195.  
  196. Each time you press F3(Cmd>) at the Menu, the TELCOM hooks will be reset in
  197. all three banks so the XOS features are active, in the same way F8 from BASIC 
  198. restores the XOS menu hook.  Programs that alter the TELCOM hooks can now be 
  199. used without concern.
  200.  
  201.   =================================
  202. YOUR CUSTOM 200
  203.  
  204. I have given XOS the ability to be customized.  F3 comes with "Roms" and 
  205. "Cmd>" as its default utilities.  The "Roms" function key can be made to 
  206. offer direct access to your OPTION ROM(s).
  207.  
  208. The "Cmd>" function key can be made to load and run default programs that are 
  209. named CMD>.BA and CMD>.CO in Bank #3 by maintaining CAPS LOCKed.  Unlocking 
  210. CAPS will allow user input to determine file to run.
  211.  
  212. The following XOSUTL.BA will allow the redefining of F3(Roms) for your 
  213. individual use.  Note... UR-2 may disengage the XOS hook.  BASIC F8 will
  214. restore the XOS hook as it returns to the Menu.  Use this to access the NODE 
  215. ROM and keep XOS engaged.
  216.  
  217. If you run XOSSAV.CO (with XOSDAT.CO in RAM), the current modified F3(Roms) 
  218. will be saved to XOSDAT so future loads of XOSDAT will not require any further
  219. modification.
  220.  
  221.  =====================================
  222. Acknowledgements:
  223.  
  224. James Yi [73327,1653] for part of the LOMEM adjustment code.
  225.  
  226. Randy Hess [73267,552] for beta testing and feedback.
  227.  =====================================
  228.  USE HXFER.CO TO CREATE XOSSAV.CO
  229.  
  230. With XOSDAT.CO on the menu, run XOSSAV.CO to modify XOSDAT so it 
  231. reflects CURRENT status.
  232.  
  233. 70F8480070F811AEF83E0ACD4F6ECAD232CD8C6E2806F3AFCD91F83E04CD91F83E08CD91F8FBC9329CF80100032100A0C50600D5CDB19B7AD112C123130B79B0
  234. C29AF8C9584F534441542E434F00
  235.  
  236. =======================================
  237. 0 REM XOSUTL.BA   Copyright (c) 1989
  238. 5 REM              by Paul Globman
  239. 10 REM Utility Module
  240. 20 M=INSTR("n",CHR$(PEEK(41024)))
  241. 30 IF M<>1 THEN BEEP:MENU
  242. 40 CLS:PRINT:PRINT"You are about to ";
  243. 50 PRINT"modify XOS module #"M:PRINT
  244. 60 PRINT"The label above [F3] is...  ";
  245. 70 FORI=1TO4:P$=P$+CHR$(PEEK(41001+I))
  246. 80 NEXT:PRINTP$:PRINT:PRINT
  247. 90 GOTO 1000
  248. 100 REM -------------------- MAKE F3=X$
  249. 105 FOR I=1 TO 4
  250. 110 POKE 41001+I,ASC(MID$(X$,I,1)):NEXT
  251. 115 RETURN
  252. 1000 REM ------------------------ XOS-1
  253. 1005 RESTORE 1010:X$="Roms":GOSUB100
  254. 1006 FORI=0TO76:READA:POKE41563+I,A
  255. 1007 NEXT:GOTO1020
  256. 1010 DATA 205,150,79,33,56,162,205,204
  257. 1011 DATA 17,42,63,245,34,116,162,42,65
  258. 1012 DATA 245,34,122,162,205,23,155,33
  259. 1013 DATA 11,244,34,63,245,33,79,244,34
  260. 1014 DATA 65,245,33,1,160,34,61,245,175
  261. 1015 DATA 50,30,253,50,72,248,33,140
  262. 1016 DATA 162,229,205,3,139,208,254,5
  263. 1017 DATA 208,245,62,240,33,181,242,1
  264. 1018 DATA 11,0,22,46,190,194,168,162,54
  265. 1019 DATA 0
  266. 1020 PRINT" 1 - TS-DOS
  267. 1030 PRINT" 2 - ANY OTHER ROM
  268. 1040 PRINT" 3 - 8 ROM PACK
  269. 1050 PRINT" 4 - 8 ROM PACK / ROMDISK
  270. 1060 PRINT
  271. 1070 PRINT" 5 - NO ROM
  272. 1080 PRINTSTRING$(30,"-"):PRINT
  273. 1090 PRINT" Option => ";
  274. 1093 O$=INPUT$(1):IFO$=""THEN1095
  275. 1095 O=VAL(O$):IFO<1ORO>5THEN1095
  276. 1098 ON O GOTO 1100,1200,1300,1400,1500
  277. 1100 REM ----------------------- TS-DOS
  278. 1105 RESTORE 1190:POKE41528,0
  279. 1110 FORI=1TO13:READA:POKE41562+I,A
  280. 1120 NEXT:X$="Disk":GOSUB100:MENU
  281. 1190 DATA 175,50,30,253,219,216,230
  282. 1195 DATA 12,246,2,205,239,238
  283. 1200 REM -------------------- OTHER ROM
  284. 1210 REM use for UR-2, SuperRom, ROM2
  285. 1220 POKE41528,0
  286. 1230 FORI=0TO3:POKE41605+I,0:NEXT
  287. 1240 PRINT"Enter 4 character "
  288. 1250 PRINT"         F3 label :";
  289. 1251 LINEINPUTX$
  290. 1260 IF LEN(X$)<>4THEN1250
  291. 1270 GOSUB100:MENU
  292. 1300 REM ----------------------- ROMPAK
  293. 1310 POKE41621,5:GOTO1450
  294. 1400 REM ---------------------- POMPAK+
  295. 1410 POKE41621,6
  296. 1450 REM --------------------- ROM line
  297. 1455 R$="Rom2 UR-2 Super Disk TWrd Romdsk":CLS:PRINT:PRINT:PRINT
  298. 1457 IFO=3THENR$=LEFT$(R$,25)
  299. 1460 PRINT"Create your own ROMs option"
  300. 1461 PRINT"      line below...":PRINT
  301. 1462 PRINT:PRINT"Press <enter> to use sample line...
  302. 1465 PRINT@560,R$:LINEINPUTR2$
  303. 1466 IF R2$=""THEN R2$=R$
  304. 1470 R2$=LEFT$(R2$+SPACE$(32),32)
  305. 1475 FORI=1TO32
  306. 1480 POKE41527+I,ASC(MID$(R2$,I,1))
  307. 1485 NEXT:MENU
  308. 1500 REM ----------------------- NO ROM
  309. 1505 RESTORE 1530
  310. 1510 FORI=1TO3:READA:POKE41562+I,A
  311. 1520 NEXT:X$="    ":GOSUB100:MENU
  312. 1530 DATA 195,129,160
  313.  
  314.