;############## Calcuzap by Patrick Davidson (data structures)

#define rs(size) =rscount \ #define rscount eval(rscount + size) 

;############## High score storage definitions

SCORELEN	=6
NAME_LEN	=26
SCORE_COUNT	=12
ENTRYLEN	=SCORELEN + NAME_LEN + 1
TABLE_SIZE      =ENTRYLEN * SCORE_COUNT
     
#ifdef  TI84CE
high_scores     =saveSScreen+21945-TABLE_SIZE     
#else
high_scores     =statVars
#endif
high_scores_end =high_scores + TABLE_SIZE
last_score      =high_scores_end - ENTRYLEN

;############## Allocation of storage within statVars

#ifdef  TI84CE
#define rscount $D10000         ; inside saveSScreen
#else
#define rscount $8000
#endif

saved_flag      rs(     1)
data_start      rs(     0)
delay_amount	rs(     1)	
bounce_count    rs(     1)
p_x 		rs(     1)
brickthrough	rs(     1)
bonus_type	rs(     1)
bonus_x		rs(     1)
bonus_y		rs(     1)
plimit		rs(     1)
b_type		rs(     1)
b_x		rs(     1)
b_y		rs(     1)
b_xv 	        rs(     1)
b_yv		rs(     1)
b2		rs(     5)
b3		rs(     5)
map		rs(     48)
rand_inc       	rs(     1)
rand_counter    rs(     1)
score_inc	rs(     1)
lives		rs(     1)
level		rs(     1)
hit_corner	rs(     1)
score           rs(     7)
data_end        rs(     0)
wait_count      rs(     WORDLEN)
all_data_end    rs(     0)

#if     rscount > (high_scores)
        .error  "!!!!!!!!!!!!!!!! data structure is oversized"
#endif