tox_von
New Member
Posts: 8
|
 |
« Reply #7 on: October 07, 2008, 04:00:21 AM » |
|
This is what i did for the bsave,bload thing and it causes the dos memory error sometimes 2nd or third load.
BSAVE
DIM sprite1(1 TO 675) SCREEN 13
FOR y = 1 TO 13 FOR x = 1 TO 15 READ clr PSET (x, y), clr NEXT: NEXT GET (1, 1)-(15, 13), sprite1
DEF SEG = VARSEG(sprite1(1)) BSAVE "sprite1.GRH", VARPTR(sprite1(1)), 2700 DEF SEG
'grass DATA 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10 DATA 10,10,10,10,10,10,10,10,10,10,10,02,10,10,10 DATA 10,10,10,10,10,10,10,10,10,10,02,10,10,10,10 DATA 10,10,10,02,10,10,10,02,10,10,02,10,10,10,10 DATA 10,10,10,10,02,10,02,10,10,10,10,10,10,10,10 DATA 02,10,10,10,02,10,02,10,10,10,02,10,10,10,10 DATA 10,02,10,10,02,10,02,10,10,02,10,10,02,10,10 DATA 10,10,02,02,10,02,10,10,10,02,10,02,10,10,10 DATA 10,10,10,10,10,10,10,10,10,02,10,02,10,10,10 DATA 02,02,10,10,02,10,10,10,02,02,02,10,10,10,10 DATA 10,10,02,02,10,10,10,10,10,10,10,10,10,10,10 DATA 10,10,10,10,10,10,02,02,10,10,10,10,10,10,10 DATA 10,10,10,10,10,10,02,10,10,10,10,10,10,10,10
BLOAD
DIM sprite1(1 TO 60) SCREEN 13 DEF SEG = VARSEG(sprite1(1)) BLOAD "sprite1.GRH", VARPTR(sprite1(1)) DEF SEG PUT (100, 10), sprite1
|