Home | Reviews | GUIpedia | Forum | Fun500
trolly | Screen 12 capturing usign bsavehi, there is a code to save and load the screen usign bsave, without usign array
SUB Screen12Save(filename as string) total! = 38400 DEF SEG=&h4000 FOR i = 0 TO 3 OUT &h3ce , 4 OUT &h3cf , i f$ = filename + chr$(i + 48) + ".sc" BSAVE f$ , 0 , total! NEXT i DEF SEG END SUB SUB Screen12Load(filename as string) DEF SEG=&h4000 FOR i = 0 TO 3 OUT &h3c4,2 OUT&h3c5,2^i f$=filename+chr$(i+48)+".sc" bload f$,0 NEXT I DEF SEG END SUB | 2010-10-19 | 3:10 PM |
Dick | Re:Screen 12 capturing usign bsaveI think you have to change def seg=&h4000 to =&ha000 | 2010-10-20 | 3:48 PM |
trolly | Re:Screen 12 capturing usign bsaveho yeah thanks, i'ts a typo | 2010-10-20 | 4:02 PM |
2021 Brandon Cornell