jchase1970

Hi, It's time for a new contest. This one is inspired from how I used the classic 99 emulator when using Harry Wilhems Basic Compiler.

I use a open classic 99 emulator for the basic code. A open emulator for editor assembler. And a open emulator for the loader.

So I have all three instances open and share the same files between the three instances of Classic 99. It is like having 3 TI994/a connected to the same disk drive.

So the challenge for this contest is to see who can be the most creative with file sharing. Use any language you want. Different languages for difference instances if you want. But you must send information thru a file from one instance of Classic 99 to at least one other instance of Classic 99.

You can use as many instances of Classic 99 as you want as long as it is at least 2.
I dont want to just see a data base either, I'm hoping to see emulated server/ client functions for games or maybe something displayed on one instance based on what happens on the other instance. Maybe a game with graphics in one instance and data in another.


To show you what I mean I have created 2 basic programs, One you input a string and then the other displays it.
Run this one in one Classic 99 window to enter a string.

10 OPEN #1:"DSK1.FILE",UPDATE
20 INPUT "ENTER A STRING:":A$
30 PRINT #1:A$
40 CLOSE #1
50 GOTO 10

Run this in another Classic 99 window to display what you entered in the other one.

10 OPEN #1:"DSK1.FILE",UPDATE
20 INPUT #1:A$
30 PRINT A$
40 CLOSE #1
50 GOTO 10

Good luck and think outside the BOX on this one.
John

Ok So I was looking though some programs on the gamebase files and I come across one that got me thinking about this. First off I know nothing about how to imbed ML in XB, the only time I have done it is with a loader that loads in the compiled basic progams I make.

So Im looking at the file DRAGON[fix].zip in the disks folder in gamebase and the XB LOAD file on that disk is this program

0 !**********************
1 !*				    *
2 !*    Generated By    *
3 !*    SysTex  V1.0    *
4 !*	  (C) 1985	  *
5 !*   By Barry Boone   *
6 !*				    *
7 !**********************
8 CALL INIT :: CALL LOAD(8196,254,0)
9 CALL LINK("SLOAD")
100 CALL CLEAR :: CALL SCREEN(9) :: FOR I=0 TO 12 :: CALL COLOR(I,16,5) :: NEXT I :: CALL LINK("CHARDF")
120 DISPLAY AT(1,1):"This program may be freely  distributed. I translated itfrom Microsoft Basic to TI  Extended Basic. Although"
130 DISPLAY AT(5,1):"many hours of typing and    translation were expended,  I do not ask for money.": :"I would ask, however, if you"
140 DISPLAY AT(10,1):"have any programs which you have written or translated, and would like to share,":"I would appreciate a copy.  I am particularly interested"
150 DISPLAY AT(15,1):"in UTILITY type pgms. in anylanguage(Basic, Assembly,   Forth, Pascal)."
160 DISPLAY AT(20,1):"Ken Woodcock":"4701 Atterbury St.":"Norfolk, Va. 23513": :"	 <press any key>"
170 CALL KEY(0,K,S) :: IF S THEN RUN "DSK1.STORY0" ELSE 170

The CALL LINK("CHARDF") is a program to redefine the char sets.
So the question is, is there a way to pull that out save it and reuse it in another program?


 DRAGONfix.zip   30.34K   1 downloads

Merry Christmas friends, I have had a terrible year and have had this all but done for months. I have forced myself to finish tonight to give everyone here a little Christmas gift. I hope you enjoy and I hope its debugged!!!!!





RUN QP/F in extended basic

 QP.zip   8.47K   13 downloads

Thanks, John