OK while you all are b*tching about the models back to the frame rates...
why in hell is this:
if dayCycle<-490
if file exist("Data\Prefs.txt")
open to read 1,"Data\Prefs.txt"
read string 1,a$ : marinaFriend=val(a$)
read string 1,a$ : marinaEnergy=val(a$)
read string 1,a$ : marinaHunger=val(a$)
read string 1,a$ : marinaHygene=val(a$)
read string 1,a$ : marinaBank=val(a$)
read string 1,a$ : marinaBeth=val(a$)
read string 1,a$ : marinaLisa=val(a$)
read string 1,a$ : marinaZag=val(a$)
read string 1,a$ : marinaClothes=val(a$)
read string 1,a$ : lisaFriend=val(a$)
read string 1,a$ : lisaEnergy=val(a$)
read string 1,a$ : lisaHunger=val(a$)
read string 1,a$ : lisaHygene=val(a$)
read string 1,a$ : lisaBank=val(a$)
read string 1,a$ : lisaBeth=val(a$)
read string 1,a$ : lisaMarina=val(a$)
read string 1,a$ : lisaZag=val(a$)
read string 1,a$ : lisaClothes=val(a$)
close file 1
endif
endif
if my<20 and mx<20 and mouseClick()=1
if file exist("Data\Prefs.txt") then delete file "Data\Prefs.txt"
open to write 1,"Data\Prefs.txt"
write string 1,str$(marinaFriend)
write string 1,str$(marinaEnergy)
write string 1,str$(marinaHunger)
write string 1,str$(marinaHygene)
write string 1,str$(marinaBank)
write string 1,str$(marinaBeth)
write string 1,str$(marinaLisa)
write string 1,str$(marinaZag)
write string 1,str$(marinaClothes)
write string 1,str$(lisaFriend)
write string 1,str$(lisaEnergy)
write string 1,str$(lisaHunger)
write string 1,str$(lisaHygene)
write string 1,str$(lisaBank)
write string 1,str$(lisaBeth)
write string 1,str$(lisaMarina)
write string 1,str$(lisaZag)
write string 1,str$(lisaClothes)
close file 1
endif
in the main loop?
Send it off to a sub or a function along with a lot of other stuff in the main loop. Less clutter and easier to read main loop.
And is it opening, reading, and writing those every loop?
Soon to come...
Dark IDE, New IDE for DarkBASIC Pro!
Two plug-ins, A Time/Date and New File commands.