; Data Module
; ---------------------------------------------------------------------------

    ; SECTION Data,DATA_C
    
    ; XDEF    Font8x8
    ; XDEF    EmailList
    ; XDEF    EmailListEnd

    ALIGN 2
Font8x8:
    ; Space (32)
    dc.b $00,$00,$00,$00,$00,$00,$00,$00
    ; ! (33)
    dc.b $18,$18,$18,$18,$18,$00,$18,$00
    ; " (34)
    dc.b $66,$66,$66,$00,$00,$00,$00,$00
    ; # (35)
    dc.b $36,$36,$7F,$36,$7F,$36,$36,$00
    ; $ (36)
    dc.b $18,$3C,$60,$3C,$06,$3C,$18,$00
    ; % (37)
    dc.b $62,$64,$08,$10,$20,$4C,$46,$00
    ; & (38)
    dc.b $38,$44,$44,$38,$44,$44,$38,$00 ; Approx
    ; ' (39)
    dc.b $18,$18,$08,$00,$00,$00,$00,$00
    ; ( (40)
    dc.b $10,$20,$40,$40,$40,$20,$10,$00
    ; ) (41)
    dc.b $20,$10,$04,$04,$04,$10,$20,$00
    ; * (42)
    dc.b $00,$2A,$1C,$7F,$1C,$2A,$00,$00
    ; + (43)
    dc.b $00,$18,$18,$7E,$18,$18,$00,$00
    ; , (44)
    dc.b $00,$00,$00,$00,$18,$18,$08,$10
    ; - (45)
    dc.b $00,$00,$00,$7E,$00,$00,$00,$00
    ; . (46)
    dc.b $00,$00,$00,$00,$00,$18,$18,$00
    ; / (47)
    dc.b $02,$04,$08,$10,$20,$40,$80,$00

    ; 0-9 (48-57)
    dc.b $3C,$42,$42,$42,$42,$42,$3C,$00 ; 0
    dc.b $18,$38,$18,$18,$18,$18,$3C,$00 ; 1
    dc.b $3C,$42,$02,$0C,$30,$40,$7E,$00 ; 2
    dc.b $3C,$42,$02,$1C,$02,$42,$3C,$00 ; 3
    dc.b $0C,$14,$24,$44,$7E,$04,$04,$00 ; 4
    dc.b $7E,$40,$7C,$02,$02,$42,$3C,$00 ; 5
    dc.b $3C,$40,$7C,$42,$42,$42,$3C,$00 ; 6
    dc.b $7E,$02,$04,$08,$10,$20,$40,$00 ; 7
    dc.b $3C,$42,$42,$3C,$42,$42,$3C,$00 ; 8
    dc.b $3C,$42,$42,$3E,$02,$42,$3C,$00 ; 9

    ; : (58)
    dc.b $00,$18,$18,$00,$18,$18,$00,$00
    ; ; (59)
    dc.b $00,$18,$18,$00,$18,$18,$08,$10
    ; < (60)
    dc.b $06,$0C,$18,$30,$18,$0C,$06,$00
    ; = (61)
    dc.b $00,$00,$7E,$00,$7E,$00,$00,$00
    ; > (62)
    dc.b $60,$30,$18,$0C,$18,$30,$60,$00
    ; ? (63)
    dc.b $3C,$42,$04,$08,$10,$00,$10,$00
    ; @ (64)
    dc.b $3C,$42,$4E,$5A,$52,$42,$3C,$00

    ; A-Z (65-90)
    dc.b $18,$24,$42,$42,$7E,$42,$42,$00 ; A
    dc.b $7C,$42,$42,$7C,$42,$42,$7C,$00 ; B
    dc.b $3C,$42,$40,$40,$40,$42,$3C,$00 ; C
    dc.b $78,$44,$42,$42,$42,$44,$78,$00 ; D
    dc.b $7E,$40,$40,$78,$40,$40,$7E,$00 ; E
    dc.b $7E,$40,$40,$78,$40,$40,$40,$00 ; F
    dc.b $3C,$42,$40,$4E,$42,$42,$3C,$00 ; G
    dc.b $42,$42,$42,$7E,$42,$42,$42,$00 ; H
    dc.b $3C,$18,$18,$18,$18,$18,$3C,$00 ; I
    dc.b $06,$06,$06,$06,$06,$46,$3C,$00 ; J
    dc.b $44,$48,$50,$60,$50,$48,$44,$00 ; K
    dc.b $40,$40,$40,$40,$40,$40,$7E,$00 ; L
    dc.b $42,$66,$5A,$42,$42,$42,$42,$00 ; M
    dc.b $42,$62,$52,$4A,$46,$42,$42,$00 ; N
    dc.b $3C,$42,$42,$42,$42,$42,$3C,$00 ; O
    dc.b $7C,$42,$42,$7C,$40,$40,$40,$00 ; P
    dc.b $3C,$42,$42,$42,$52,$4A,$3C,$00 ; Q
    dc.b $7C,$42,$42,$7C,$48,$44,$42,$00 ; R
    dc.b $3C,$40,$40,$3C,$02,$02,$3C,$00 ; S
    dc.b $7E,$18,$18,$18,$18,$18,$18,$00 ; T
    dc.b $42,$42,$42,$42,$42,$42,$3C,$00 ; U
    dc.b $42,$42,$42,$42,$42,$24,$18,$00 ; V
    dc.b $42,$42,$42,$5A,$5A,$66,$42,$00 ; W
    dc.b $42,$24,$18,$18,$18,$24,$42,$00 ; X
    dc.b $42,$42,$24,$18,$18,$18,$18,$00 ; Y
    dc.b $7E,$04,$08,$10,$20,$40,$7E,$00 ; Z

; Email Structure:
; Offset 0: Type (0=Boss, 1=Colleague, 2=Spam, 3=Virus)
; Offset 1: Unused/Padding
; Offset 2: Sender Ptr
; Offset 6: Subject Ptr
; Offset 10: Body Ptr
; Offset 14: Option1 Ptr
; Offset 18: Option2 Ptr
; Offset 22: Effect1 (Stress change)
; Offset 23: Effect2 (Satisfaction change)

    ALIGN 2
EmailList:
    ; Email 1: Boss - Urgent Report
    dc.b    0, 0
    dc.l    SenderBoss
    dc.l    SubjectBoss1
    dc.l    BodyBoss1
    dc.l    OptYes
    dc.l    OptNo
    dc.b    10, 10      ; Stress +10, Satis +10 (if Yes)
    dc.b    0, -20      ; Stress 0, Satis -20 (if No)

    ; Email 2: Colleague - Coffee?
    dc.b    1, 0
    dc.l    SenderColleague
    dc.l    SubjectColl1
    dc.l    BodyColl1
    dc.l    OptYes
    dc.l    OptNo
    dc.b    -5, 0       ; Stress -5, Satis 0
    dc.b    0, 0        ; Nothing

    ; Email 3: Spam - Win Lottery
    dc.b    2, 0
    dc.l    SenderSpam
    dc.l    SubjectSpam1
    dc.l    BodySpam1
    dc.l    OptDel
    dc.l    OptOpen
    dc.b    0, 0        ; Delete: Good
    dc.b    20, 0       ; Open: Stress +20 (Wasted time)

EmailListEnd:

; Strings
SenderBoss:     dc.b "BOSS",0
SenderColleague:dc.b "DAVE",0
SenderSpam:     dc.b "PRINCE",0

SubjectBoss1:   dc.b "URGENT: Q3 REPORT",0
BodyBoss1:      dc.b "NEED REPORT ASAP.",0
SubjectColl1:   dc.b "COFFEE BREAK?",0
BodyColl1:      dc.b "BREAK ROOM IN 5?",0
SubjectSpam1:   dc.b "YOU WON $$$",0
BodySpam1:      dc.b "CLICK TO CLAIM!!!",0

OptYes:         dc.b "1. YES",0
OptNo:          dc.b "2. NO",0
OptDel:         dc.b "1. DELETE",0
OptOpen:        dc.b "2. OPEN",0

    ALIGN 2