Parallax BASIC Stamp 2e, Programming Manual

Page: 327 / 353

5: BASIC Stamp Command Reference – STORE
BASIC Stamp Programming Manual 2.0c
•
www.parallaxinc.com
•
Page 325
Demo Program (STORE2.bsp)
DATA @0, 11, 12, 13, 14, 15
Idx VAR WORD
Value VAR BYTE
' -------------------------- Main Routines --------------------------
Main:
GOSUB DisplaySlotsAndReadData
PAUSE 2000
STORE 0 'Switch to READ/WRITE slot 0
GOSUB DisplaySlotsAndReadData
STOP 'Stop execution
' --------------------------- Subroutines ---------------------------
DisplaySlotsAndReadData:
GET 127, Value
DEBUG CR, "Prog Slot: ", DEC1 Value.LOWNIB
DEBUG " R/W Slot: ", DEC1 Value.HIGHNIB, CR, CR
FOR Idx = 0 TO 4
READ Idx, Value
DEBUG "Location: ", DEC Idx, " Value: ", DEC3 Value, CR
NEXT
RETURN
The next Demo Program, StoreAll.bsp, is not related to the previous three
programs. StoreAll.bsp demonstrates the use of the STORE command to
treat contiguous program slots as one block of memory (14 kbytes). This
illustrates one of the most powerful uses of the STORE command.
Demo Program (STOREALL.bsp)
' This program demonstrates the STORE command and how it can be used to "flatten"
' the EEPROM space for applications requiring a lot of storage. This program
' writes to EEPROM locations within program slots 1 though 7 and, thus, has access
' to 14 kbytes of space.
'{$STAMP BS2p} 'STAMP directive (specifies a BS2p)
Idx VAR WORD
Value VAR WORD
' -------------------------- Main Routines --------------------------
Main:
DEBUG "Writing...", CR
PAUSE 2000
FOR Idx = 2048 TO 16383 STEP 32 'Write values to EEPROM
p
2
p
2