AOZ Studio V1 (TBD bugs clean/-> V2)

This all seems to be working in Beta 10.
I can't change the status to closed while it's "In Progress"

Brian Flanagan wrote in #note-5:

Re-tested in 1.0.0 (B8) June 3.
Still fails.
Here's a simpler example:

Open Out 1,"MyFile.dat" ' Should open "MyFile.dat" on default file system.
  Print #1,"test" ' Gets File Not Opened error (ever after Open Out succeeds)
Close 1 ' Close also fails even after Open Out.
Dir ' Should show directory of default file system with "MyFile.dat" in it.

The above fails at Print #1
If that line is commented, then it fails at Close 1
My guess is therefore that probably (although no error was displayed), Open Out probably failed, or failed to do something it needed to to tell the other file commands that the file is open and ready for writing.

I still find it wont write anything if the file exists or not in Beta 10 same as Brian.

The Reading tho works fine from disk.
Note: I did test mine and pauls code again, (Pauls below) it does seam to
say as mine it reads and writes ok but, writing where ok if its working
then it is working in browser cache/memory ok as paul confirms in vivaldi https://discord.com/channels/653893653940404224/777642924275400715/893549838438924298
but yeah not to real disk at all still at this point.
(Nothing writes from application but as brian points out above still that is wip).

..
#splashScreen:false
print "Current directory:";dir$
Open Out 1,"test.txt"
Input "Please enter your name ";name$
Print #1,name$
Close 1
print "File written, now reading..."
name$="blank"
Open In 1,"test.txt"
Input #1,name$
Print "Hello ";name$
Close 1

update: (Nothing writes to application but as brian points out above still that is wip).

Tested writing again, still in Rel 1.0 beta 11 wont write to actual file.

..

#splashScreen:false
Print "Current directory:";dir$       //Application direction for files read/write
print ""
dim mapposloc$(10)                    //(mapposloc) access file can be 10 positions (numbers)


     nextword$=""

                                      //Read.....from a file mapposloc.txt to array mapposloc$().

    Open in 1,"mapposloc.txt"         // Open the (mapposloc) access file

                                       // Sequential file handling

    For n = 1 to 10                    //mapposloc.txt has 10 items
        Input #1,nextword$             // Input from file or read to program memory each item in sequence from file number 1 into nextword, (#1)
        mapposloc$(n) = nextword$      //Place in element n of the array, mapposloc$(n) 1-10
        print nextword$                //print them to see on screen
        wait key
    Next

        print "first bit done, reading in 10 words"

        print ""
        print ""

    Close 1                            // Close the word list file

    print mapposloc$(1)                //now print the words out from array
    wait key
    print mapposloc$(2)                //what we read in
    wait key
    print mapposloc$(3)
    wait key

    print "second bit done,print to screen what we read frist 3 words"

    wait key

    print ""
    print ""

                                    //Write....To a file. (Does not work at this time to disk)
                                    //Seams like it works but it auctualy does not write to the file.


                                    //2) Write from array mylist() to wordlist.txt  //(10 words)

Open out 1,"wordlist.txt"             //Open the file for writing too

// Sequential file handling

For n = 1 to 10                   //Word list has 10 items
nextword$=mapposloc$(n)           //Element n or number from the array, mylist$
Print #1,nextword$                //Write to wordlist.txt or overwrite the old one if exists
Print nextword$                   //Print on screen nextword writing to file
  wait key
Next

    print "third bit done,write 10 files to file"

Close 1                               //Close the word file



end