BAM: [new] _MAPSET and _MAPGET

[CharlieJV]

An example use case:

Code: (Select All)

INIT:

  _initaudio

  _mapset("A", 1)
  _mapset("B", 2)
  _mapset("C", 3)

MAIN_PROGRAM:

  getselection:
    print "Press one of the following keys: A B C"
    let selection$ = ucase$(input$(1))
    if selection$ < "A" or selection$ > "C" then beep : goto getselection

  on _mapget(selection$) gosub handle_A, handle_B, handle_C

  goto getselection

  end
 
SUBROUTINES: 

  handle_A:
    print "stuff to do for selection A"
    RETURN

  handle_B:
    print "stuff to do for selection B"
    RETURN

  handle_C:
    print "stuff to do for selection C"
    RETURN