163 lines
4.6 KiB
ArmAsm
163 lines
4.6 KiB
ArmAsm
; 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
|