Gazoo

Being 6 years younger than you makes me a 'young whippersnapper'? I'd say that we both qualify as 'old farts'.

I have a question about the HxC. Can it be configured so that the SD card contains one and only one floppy image? And I assume that image max size depends on the floppy controller connected to the TI? I have 3 SCSI devices connected to both my TI and Geneve systems, it might be prudent to do away with one of then and replace it with a HxC floppy drive. Maybe it would be easier to pass around an SD card 'floppy' instead of a Cf card 'hard drive' ? Reasonable? G.A.Z.O.O. Thanks,

... and of course the next thing to create is a 90k disk that loads BOOT with no cart and a nice EA5-program-menu configured. Put the disk in any TI with 32k memory and run a TI BASIC program that loads and runs a menu of assembly programs would be cool! BASICLOAD is 10 sectors and BOOT is 50 sectors, so subtract 60 sectors from 358 and you get 298 sectors. So here's the challenge - submit a disk with the BOOT program and a bunch of EA5 programs configured in BOOT. There should be 10 free sectors on the disk to put the BASICLOAD program. Won't that be a cool demo in November! Gazoo

BASGRMLOAD.dsk Can you try this disk, Lee? It apparently works in classic99 with the TI Disk Controller code banked in, so it should work on a real TI. I finally followed Senior Falcon's directions from his original post coupling it with the newest update and it actually worked! (Imagine that ) And if your's and SeniorBirdGuy's assumptions are correct, this should work. The disk contains all the work files and the GROMLOAD program file. You'll have to use another disk with the Ubergrom Grom dump to reload the cart. Thanks Guys! Gazoo

Most TI'ers say that about their hard drives, so replace HXC with SCSI or MFM drive. Walt Howe was the first TI'er I heard say it. ...about 27 years ago. Now I'd never give up my CF SCSI drive, on my Geneve or my TI. Gazoo

Is the memory card on this device (looks like an SD card, correct?) hot swappable? Meaning could I take it out of 1 TI and put it another TI without turning off the power to both? Or does it need to power up with the system like a CF card? Gazoo

Just so everyone is aware, there is no big secret to the verification program. The source is posted below. It's pretty simple, it reads every byte of Grom in the cart (except the last two) and adds them together in a running total. It then reads the last two bytes of Grom and compares them to the previously calculated sum. (thank you Insane Multitasker for showing me a similar procedure for the MDOS crc check!) It then adds all the words in the Rom and compares that sum against 2 valid values (yes there are 2 Rom versions, the difference is insignificant) The code is uncommented for the most part but should be pretty easy to see what's going on (I generally don't comment my code if it's painfully obvious what's going on). If both checks pass, you get a green screen. If not, there's something wrong with the cart or your system. Note that I was having problems with this until I reseated every connection in my system, all pbox cards, 'foot', everything! So if you're having problems, don't immediately think there's something wrong with the cart, it could very possibly be that there's something wrong with your TI. Gazoo DEF START Show where program starts. REF VSBW,VWTR,VMBW,KSCAN START B @START1 Go to actual start of program. VALUE1 DATA >0000 VALUE2 DATA >0000 VALUE3 DATA >C892 VALUE4 DATA >0000 VALUE5 DATA >C88F UNDER DATA >00FF,>0000,>0000,>0000 WR BSS >20 H03 BYTE >03 MSG1 TEXT 'CARTRIDGE GROM VERIFIER ' TEXT '-----------------------' MSG2 TEXT 'Calculating...' MSG3 TEXT 'Extended Basic v2.7 Suite ' TEXT 'Cartridge Grom is verified.' MSG4 TEXT 'compromised!' MSG5 TEXT 'Do not use the cartridge until ' TEXT 'the problem is resolved!' MSG6 TEXT '< Press space bar to exit >' MSG1A TEXT 'CARTRIDGE ROM VERIFIER ' TEXT '---------------------- ' MSG3A TEXT 'Extended Basic v2.7 Suite ' TEXT 'Cartridge Rom is verified. ' EVEN START1 LWPI WR Load workspace. LI R0,>0180 Set VDP register 1. BLWP @VWTR LI R0,>0707 Set VDP register 7. BLWP @VWTR LI R0,>0380 Get ready to load color table. LI R1,>1010 Set reg. 1 to color >10. TABLE BLWP @VSBW Load 1 byte. INC R0 Increment one byte. CI R0,>03A0 Done yet? JNE TABLE No, load another byte. LI R0,>0968 LI R1,UNDER LI R2,8 BLWP @VMBW NOP LI R0,>0024 LI R1,MSG1 LI R2,55 BLWP @VMBW NOP LI R0,>0084 LI R1,MSG2 LI R2,14 BLWP @VMBW NOP LI R0,>01E0 Set VDP register 1. BLWP @VWTR LI R1,>9800 MOV R1,@>83FA CLR R0 CLR R2 LI R1,>6000 MOVB R1,@>9C02 SWPB R1 MOVB R1,@>9C02 SWPB R1 LI R0,>A000 LOOP1 MOVB @>9800,R2 SWPB R2 A R2,@VALUE1 CLR R2 DEC R0 CI R0,>0000 JNE LOOP1 LI R1,>9808 MOV R1,@>83FA CLR R0 CLR R2 LI R1,>6000 MOVB R1,@>9C02 SWPB R1 MOVB R1,@>9C02 SWPB R1 LI R0,>A000 LOOP2 MOVB @>9808,R2 SWPB R2 A R2,@VALUE1 CLR R2 DEC R0 CI R0,>0000 JNE LOOP2 LI R1,>980C MOV R1,@>83FA CLR R0 CLR R2 LI R1,>6000 MOVB R1,@>9C02 SWPB R1 MOVB R1,@>9C02 SWPB R1 LI R0,>6000 LOOP3 MOVB @>980C,R2 SWPB R2 A R2,@VALUE1 CLR R2 DEC R0 CI R0,>0000 JNE LOOP3 LI R1,>9814 MOV R1,@>83FA CLR R0 CLR R2 LI R1,>6000 MOVB R1,@>9C02 SWPB R1 MOVB R1,@>9C02 SWPB R1 LI R0,>2000 LOOP4 MOVB @>9814,R2 SWPB R2 A R2,@VALUE1 CLR R2 DEC R0 CI R0,>0000 JNE LOOP4 LI R1,>9810 MOV R1,@>83FA CLR R0 CLR R2 LI R1,>6000 MOVB R1,@>9C02 SWPB R1 MOVB R1,@>9C02 SWPB R1 LI R0,>1FFE LOOP5 MOVB @>9810,R2 SWPB R2 A R2,@VALUE1 CLR R2 DEC R0 CI R0,>0000 JNE LOOP5 MOVB @>9810,R2 SWPB R2 MOVB @>9810,R2 SWPB R2 C @VALUE1,R2 JEQ GOOD B @BAD GOOD LI R0,>0082 LI R1,MSG3 LI R2,59 BLWP @VMBW NOP B @START2 BAD LI R0,>0081 LI R1,MSG3 LI R2,49 BLWP @VMBW NOP LI R0,>00B3 LI R1,MSG4 LI R2,12 BLWP @VMBW NOP LI R0,>00E1 LI R1,MSG5 LI R2,56 BLWP @VMBW NOP LI R2,>FFFF MOV R2,@VALUE4 START2 LI R0,>0184 LI R1,MSG1A LI R2,55 BLWP @VMBW NOP LI R0,>01E4 LI R1,MSG2 LI R2,14 BLWP @VMBW NOP LI R2,>6000 LOOP6 MOVB *R2,*R2 LI R0,>6000 LOOP7 MOV *R0,R1 A R1,@VALUE2 INCT R0 CI R0,>8000 JNE LOOP7 INCT R2 CI R2,>6080 JNE LOOP6 C @VALUE2,@VALUE3 JEQ GOOD1 C @VALUE2,@VALUE5 JEQ GOOD1 B @BAD1 GOOD1 LI R0,>01E2 LI R1,MSG3A LI R2,59 BLWP @VMBW NOP CLR R0 C R0,@VALUE4 JEQ GOOD2 LI R0,>0708 Set VDP register 7. BLWP @VWTR B @PRESS GOOD2 LI R0,>0703 Set VDP register 7. BLWP @VWTR B @PRESS BAD1 LI R0,>0708 Set VDP register 7. BLWP @VWTR LI R0,>01E1 LI R1,MSG3A LI R2,49 BLWP @VMBW NOP LI R0,>0212 LI R1,MSG4 LI R2,12 BLWP @VMBW NOP LI R0,>0241 LI R1,MSG5 LI R2,56 BLWP @VMBW NOP PRESS LI R0,>02E2 LI R1,MSG6 LI R2,27 BLWP @VMBW NOP KLOOP MOVB @H03,@>8374 KLOOP1 BLWP @KSCAN Check for keypress. MOVB @>837C,R0 JEQ KLOOP1 CLR R1 MOVB @>8375,R1 CI R1,>2000 Quit JEQ QUIT B @KLOOP QUIT CLR @>837C LWPI >83E0 BLWP @>0000 Go bye-bye. END

You're both good men.

There's a test that should answer a few questions. Flash a cart on a standard TI system. I would assume that the cart verifies ok here. Try the verification of that same cart on a CF7/Nano system. I'm betting it doesn't verify. Flash a cart on a CF7/Nano system. Does it verify? Try the verification of that same cart on a standard TI system. Does it verify? Gazoo

Yes, it was originally tested by loading Disk Manager 1000, which is a 2 segment program. It currently sits at memory location >3000, so it won't load anything that overwrites it. But as the universal EA5 loader that was developed a few years ago overcame that problem by using scratchpad, this can too. Gazoo

I've been testing by using the original Basic program, which was quite a bit longer because it contained character set data, and just patching in a new program image with a hex editor where the original one was. I make sure the length of the original Basic program is maintained by padding it. It loads the program and a bunch of zeros after it, but what's the harm. It's a much quicker process as I only have to assemble one program instead of 2. Gazoo

Contrast out of adjustment? Try the June cart instead.

Things you need to know about BOOT. To edit the menu press F5. The menu entry goes next to the menu number. The path and filename go on the line below that. Press F9 to save the BOOT and BOOU files back to disk. DSK1 is the default path. Reload BOOT. You will now see the menu page that you edited as installed. Follow the same procedure for the other 2 menu pages. Gazoo

It's been reported that the BWG code works. Thanks Atrax! I was able to verify that it works with a Myarc FDC with 80 track eprom. Gazoo

Those 22 standard TI disk controller guys need to get some new eproms! Gazoo

060715XB27.dsk I got it to work, don't know what happened first time around. This works ok with the TI controller, could someone please check the other devices? Gazoo Source: DEF START Show where program starts. AORG >3000 START B @START1 Go to actual start of program. PAB DATA >0500,>0FF0,>0000,>2000 Data for PAB BYTE >00 FILENM BYTE >0D Length byte, pathname.filename TEXT 'DSK1.GROMLOAD ' EVEN VDPWA EQU >8C02 VDP WRITE address register VDPRD EQU >8800 VDP READ DATA REGISTER BUFFER EQU >0FC0 PABADR EQU >0F80 CFNANO DATA >AA3F,>FF11,>0300 BWG DATA >AA3F,>FD11,>0300 CHECK DATA >0000 WR BSS >20 Save space for workspace. START1 LWPI WR Load workspace. CLR @>837C LI R0,>3FF8 Get word at v>3FF8 LI R1,CHECK LI R2,>0002 BLWP @VMBR MOV @CHECK,R1 CI R1,>AA03 Check for CFNANO JNE NEXT not found LI R1,>37CF Restore highest available VDP MOV R1,@>8370 LI R0,>37D0 Restore additional data LI R1,CFNANO LI R2,>0005 BLWP @VMBW B @MOVEON Move on NEXT LI R0,>3FFF Get byte at v>3FFF LI R1,CHECK BLWP @VSBR CLR R1 MOVB @CHECK,R1 CI R1,>AA00 Check for BWG JNE NEXT1 not found LI R1,>37D5 Restore highest available VDP MOV R1,@>8370 LI R0,>37D6 Restore additional data LI R1,BWG LI R2,>0005 BLWP @VMBW B @MOVEON Move on NEXT1 LI R0,>37D8 Restore additional data for other DSRs LI R1,CFNANO same data as CF7/nano LI R2,>0005 BLWP @VMBW LI R1,>37D7 >37D7 = highest available VRAM MOV R1,@>8370 save value MOVEON LI R0,>0000 Set VDP register 0. BLWP @VWTR LI R1,>E000 MOVB R1,@>83D4 LI R0,>01E0 Set VDP register 1. BLWP @VWTR LI R0,>0200 Set VDP register 2. BLWP @VWTR LI R0,>030E Set VDP register 3. BLWP @VWTR LI R0,>0401 Set VDP register 4. BLWP @VWTR LI R0,>0717 Set VDP register 7. BLWP @VWTR LI R0,>0380 Get ready to load color table. LI R1,>1717 Set reg. 1 to color >17. TABLE BLWP @VSBW Load 1 byte. INC R0 Increment one byte. CI R0,>03A0 Done yet? JNE TABLE No, load another byte. FILE1 LI R0,PABADR Set up PAB LI R1,PAB LI R2,26 BLWP @VMBW LI R6,PABADR+9 MOV R6,@>8356 BLWP @DSRLNK Load the program DATA 8 NOP LI R0,>0FF6 Move the program to Ram LI R1,>A000 LI R2,>1FFA BLWP @VMBR NOP B @>A000 Execute the program *********************************************************** * UTILITIES * *********************************************************** SET DATA >2000 SAVE DATA 0 REGS BSS 32 EVEN VMBW DATA REGSV,V1 REGSV DATA 0,0,0,>8C02 DATA >8C00,0,>8800,0 DATA >4000,>8000,0,0 DATA 0,0,0,0 V1 MOV R13,R7 MOV *R7+,R0 MOV *R7+,R1 MOV *R7+,R2 SWPB R0 MOVB R0,*R3 SWPB R0 SOC R8,R0 MOVB R0,*R3 NOP V2 MOVB *R1+,*R4 DEC R2 JNE V2 RTWP VSBW DATA REGSV,V3 V3 MOV R13,R7 MOV *R7+,R0 SWPB R0 MOVB R0,*R3 SWPB R0 SOC R8,R0 MOVB R0,*R3 NOP MOVB *R7,*R4 RTWP VWTR DATA REGSV,V4 V4 MOV *R13,R0 SOC R9,R0 SWPB R0 MOVB R0,*R3 SWPB R0 MOVB R0,*R3 RTWP VSBR DATA REGSV,V5 V5 MOV R13,R7 MOV *R7+,R0 SWPB R0 MOVB R0,*R3 SWPB R0 MOVB R0,*R3 NOP MOVB *R6,*R7 RTWP VMBR DATA REGSV,V6 V6 MOV R13,R7 MOV *R7+,R0 MOV *R7+,R1 MOV *R7+,R2 SWPB R0 MOVB R0,*R3 SWPB R0 MOVB R0,*R3 V7 MOVB *R6,*R1+ DEC R2 JNE V7 RTWP DSRLNK DATA REGSD,D1 REGSD DATA 0,0,0,0,0 DEVA DATA 0,0,0,0,0,0,0,0,0,0,0 DCRU DATA 0 DSENT DATA 0 DLEN DATA 0 DPAB DATA 0 DVERS DATA 0 DEV DATA 0,0,0,0 PERIOD TEXT '.' HEXAA BYTE >AA DFLAG DATA 0 D1 CLR @DFLAG MOV *R14+,R5 SZCB @SET,R15 MOV @>8356,R0 MOV R0,R9 AI R9,-8 BLWP @VSBR MOVB R1,R3 SRL R3,8 SETO R4 LI R2,DEV D2 INC R0 INC R4 C R4,R3 JEQ D3 BLWP @VSBR MOVB R1,*R2+ CB R1,@PERIOD JNE D2 D3 MOV R4,R4 JEQ D88 CI R4,7 JGT D88 CLR @>83D0 MOV R4,@>8354 MOV R4,@DLEN INC R4 A R4,@>8356 MOV @>8356,@DPAB D4 LWPI >83E0 CLR R1 LI R12,>0F00 D5 MOV R12,R12 JEQ D55 SBZ 0 D55 AI R12,>0100 CLR @>83D0 CI R12,>2000 JEQ DX MOV R12,@>83D0 SBO 0 LI R2,>4000 CB *R2,@HEXAA JNE D5 A @DEVA,R2 JMP D66 D6 MOV @>83D2,R2 SBO 0 D66 MOV *R2,R2 JEQ D5 MOV R2,@>83D2 INCT R2 MOV *R2+,R9 MOVB @>8355,R5 JEQ D77 CB R5,*R2+ JNE D6 SRL R5,8 LI R6,DEV D7 CB *R6+,*R2+ JNE D6 DEC R5 JNE D7 D77 INC R1 MOV R1,@DVERS MOV R9,@DSENT MOV R12,@DCRU BL *R9 JMP D6 SBZ 0 LWPI REGSD MOV R9,R0 BLWP @VSBR SRL R1,13 JNE D9 RTWP D8 LWPI REGSD D88 CLR R1 D9 SWPB R1 MOVB R1,*R13 SOCB @SET,R15 RTWP DX MOV @DFLAG,@DFLAG JNE D8 SETO @DFLAG LI R12,>0F00 JMP D5 *********************************************************** END

If you plug the same cart into a stock TI system, does it validate ok? I don't think it's the chips, might be the 32k that's attached. Gazoo

Neither of the 2 versions that check for the TI controller as the 3rd step work. Would it still work properly if the TI controller was checked for as the first step? Gazoo

Do your FCTN and 6 keys both work? What's the date on the credits screen? If it's May 13th, then the F6 verification program is there. Maybe your upgrade didn't take. Gazoo

060715XB27.dsk This version of BASICLOAD should work with all controllers, except maybe the 2 odd ones Ksarul mentioned. That is, if I understood the info provided. Tested so far with TI Controller. Gazoo The current source code is below: DEF START Show where program starts. AORG >3000 START B @START1 Go to actual start of program. PAB DATA >0500,>0FF0,>0000,>2000 Data for PAB BYTE >00 FILENM BYTE >0D Length byte, pathname.filename TEXT 'DSK1.GROMLOAD ' EVEN VDPWA EQU >8C02 VDP WRITE address register VDPRD EQU >8800 VDP READ DATA REGISTER BUFFER EQU >0FC0 PABADR EQU >0F80 CFNANO DATA >AA3F,>FF11,>0300 BWG DATA >AA3F,>FD11,>0300 CHECK DATA >0000 WR BSS >20 Save space for workspace. START1 LWPI WR Load workspace. CLR @>837C LI R0,>3FF8 Get word at v>3FF8 LI R1,CHECK LI R2,>0002 BLWP @VMBR MOV @CHECK,R1 CI R1,>AA03 Check for CFNANO JNE NEXT not found LI R1,>37CF Restore highest available VDP MOV R1,@>8370 LI R0,>37D0 Restore additional data LI R1,CFNANO LI R2,>0005 BLWP @VMBW B @MOVEON Move on NEXT LI R0,>3FFF Get byte at v>3FFF LI R1,CHECK BLWP @VSBR CLR R1 MOVB @CHECK,R1 CI R1,>AA00 Check for BWG JNE NEXT1 not found LI R1,>37D5 Restore highest available VDP MOV R1,@>8370 LI R0,>37D6 Restore additional data LI R1,BWG LI R2,>0005 BLWP @VMBW B @MOVEON Move on NEXT1 LWPI >83E0 Load workspace. CLR R0 LI R1,>D237 37D2 swapped MOVB R1,*R15 SWPB R1 MOVB R1,*R15 now it's in the right order MOVB @>8800,R0 get byte CI R0,>AA00 is it AA? JEQ YAYSAV LI R1,>37D8 37D8 YAYSAV DEC R1 MOV R1,@>8370 save value LWPI WR MOVEON LI R0,>0000 Set VDP register 0. BLWP @VWTR LI R1,>E000 MOVB R1,@>83D4 LI R0,>01E0 Set VDP register 1. BLWP @VWTR LI R0,>0200 Set VDP register 2. BLWP @VWTR LI R0,>030E Set VDP register 3. BLWP @VWTR LI R0,>0401 Set VDP register 4. BLWP @VWTR LI R0,>0717 Set VDP register 7. BLWP @VWTR LI R0,>0380 Get ready to load color table. LI R1,>1717 Set reg. 1 to color >17. TABLE BLWP @VSBW Load 1 byte. INC R0 Increment one byte. CI R0,>03A0 Done yet? JNE TABLE No, load another byte. FILE1 LI R0,PABADR Set up PAB LI R1,PAB LI R2,26 BLWP @VMBW LI R6,PABADR+9 MOV R6,@>8356 BLWP @DSRLNK Load the program DATA 8 NOP LI R0,>0FF6 Move the program to Ram LI R1,>A000 LI R2,>1FFA BLWP @VMBR NOP B @>A000 Execute the program *********************************************************** * UTILITIES * *********************************************************** SET DATA >2000 SAVE DATA 0 REGS BSS 32 EVEN VMBW DATA REGSV,V1 REGSV DATA 0,0,0,>8C02 DATA >8C00,0,>8800,0 DATA >4000,>8000,0,0 DATA 0,0,0,0 V1 MOV R13,R7 MOV *R7+,R0 MOV *R7+,R1 MOV *R7+,R2 SWPB R0 MOVB R0,*R3 SWPB R0 SOC R8,R0 MOVB R0,*R3 NOP V2 MOVB *R1+,*R4 DEC R2 JNE V2 RTWP VSBW DATA REGSV,V3 V3 MOV R13,R7 MOV *R7+,R0 SWPB R0 MOVB R0,*R3 SWPB R0 SOC R8,R0 MOVB R0,*R3 NOP MOVB *R7,*R4 RTWP VWTR DATA REGSV,V4 V4 MOV *R13,R0 SOC R9,R0 SWPB R0 MOVB R0,*R3 SWPB R0 MOVB R0,*R3 RTWP VSBR DATA REGSV,V5 V5 MOV R13,R7 MOV *R7+,R0 SWPB R0 MOVB R0,*R3 SWPB R0 MOVB R0,*R3 NOP MOVB *R6,*R7 RTWP VMBR DATA REGSV,V6 V6 MOV R13,R7 MOV *R7+,R0 MOV *R7+,R1 MOV *R7+,R2 SWPB R0 MOVB R0,*R3 SWPB R0 MOVB R0,*R3 V7 MOVB *R6,*R1+ DEC R2 JNE V7 RTWP DSRLNK DATA REGSD,D1 REGSD DATA 0,0,0,0,0 DEVA DATA 0,0,0,0,0,0,0,0,0,0,0 DCRU DATA 0 DSENT DATA 0 DLEN DATA 0 DPAB DATA 0 DVERS DATA 0 DEV DATA 0,0,0,0 PERIOD TEXT '.' HEXAA BYTE >AA DFLAG DATA 0 D1 CLR @DFLAG MOV *R14+,R5 SZCB @SET,R15 MOV @>8356,R0 MOV R0,R9 AI R9,-8 BLWP @VSBR MOVB R1,R3 SRL R3,8 SETO R4 LI R2,DEV D2 INC R0 INC R4 C R4,R3 JEQ D3 BLWP @VSBR MOVB R1,*R2+ CB R1,@PERIOD JNE D2 D3 MOV R4,R4 JEQ D88 CI R4,7 JGT D88 CLR @>83D0 MOV R4,@>8354 MOV R4,@DLEN INC R4 A R4,@>8356 MOV @>8356,@DPAB D4 LWPI >83E0 CLR R1 LI R12,>0F00 D5 MOV R12,R12 JEQ D55 SBZ 0 D55 AI R12,>0100 CLR @>83D0 CI R12,>2000 JEQ DX MOV R12,@>83D0 SBO 0 LI R2,>4000 CB *R2,@HEXAA JNE D5 A @DEVA,R2 JMP D66 D6 MOV @>83D2,R2 SBO 0 D66 MOV *R2,R2 JEQ D5 MOV R2,@>83D2 INCT R2 MOV *R2+,R9 MOVB @>8355,R5 JEQ D77 CB R5,*R2+ JNE D6 SRL R5,8 LI R6,DEV D7 CB *R6+,*R2+ JNE D6 DEC R5 JNE D7 D77 INC R1 MOV R1,@DVERS MOV R9,@DSENT MOV R12,@DCRU BL *R9 JMP D6 SBZ 0 LWPI REGSD MOV R9,R0 BLWP @VSBR SRL R1,13 JNE D9 RTWP D8 LWPI REGSD D88 CLR R1 D9 SWPB R1 MOVB R1,*R13 SOCB @SET,R15 RTWP DX MOV @DFLAG,@DFLAG JNE D8 SETO @DFLAG LI R12,>0F00 JMP D5 *********************************************************** END

There seems to be confusion on where to check for the >AA. For the BWG, should v>37D6 (Insane) or v>3FFF (Lee) be checked? For the CF/Nano, should v>37D0 (Insane) or v>3FF8 (Lee) be checked? I've got code that should work, just need to plug in the proper 2 values. Gazoo

Yes, immediately after you post the working code. GughZoo

Just in case anyone doesn't see the relevance of this process, the idea is to get an EA5 program to load from TI BASIC from any device. Once that works, then all the imagineers can devise a universal EA5 loader from TI BASIC. Cool, Baby! Gazzzooooo

It's mind boggling that someone actually discovered something like that. --- deep bow --- Gazoo

None of them actually compare to the first episode of The Outer Limits, 'Galaxy Being'. My favorite scifi episode of all time. Gaz