REM Sapphire banner macro library -- © 1995 Straylight

DEF FNbanner_test=0

DEF FNbanner
[ opt 4
  FNalign
.bnr__l
  dcd 0
]
=0

DEF FNbnr__f(f%)
IF !(bnr__l+O%-P%)>=f% THEN ERROR 1,"Banner flags built in wrong order"
!(bnr__l+O%-P%)=!(bnr__l+O%-P%) OR f%
=0

DEF FNbanner_slider(i%)
[ opt 4
  FNbnr__f(bFlag_slider)
  dcd i%
]
=0

DEF FNbanner_count(i%)
[ opt 4
  FNbnr__f(bFlag_counter)
  dcd i%
]
=0

DEF FNbanner_setup(r%)
[ opt 4
  FNbnr__f(bFlag_setup)
  dcd r%
]
=0

DEF FNbanner_sprites(s$)
[ opt 4
  FNbnr__f(bFlag_sprites)
  equs s$+CHR$(0)
  FNalign
]

DEF FNbanner_end=FNalign