mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-08-31 07:40:16 +00:00
These tests use a variety of sample code (with some of the larger files removed, so they are not complete!) and verifies that they all compile successfully.
1194 lines
55 KiB
QBasic
1194 lines
55 KiB
QBasic
CHDIR ".\programs\samples\thebob\animax"
|
||
|
||
DEFINT A-Z
|
||
DECLARE SUB PrintSTRING (x, y, Prnt$, Font)
|
||
DECLARE SUB Interval (Length!)
|
||
DECLARE SUB DrawBOX (x, y, xx, yy, FlipFLOP)
|
||
|
||
DIM Box(10000)
|
||
DIM SHARED FontBOX(26000)
|
||
DIM TitleBOX(1000)
|
||
DIM ExBOX(1000)
|
||
DIM ToolBOX(1000)
|
||
DIM BBox(400)
|
||
DIM CBox(1 TO 672)
|
||
TYPE RecentTYPE
|
||
PName AS STRING * 8
|
||
FName AS STRING * 130
|
||
END TYPE
|
||
DIM Recent(1 TO 6) AS RecentTYPE
|
||
|
||
RESTORE HueDATA
|
||
Index = 1
|
||
FOR DStrings = 1 TO 10
|
||
READ h$
|
||
FOR n = 1 TO LEN(h$)
|
||
CBox(Index) = ASC(MID$(h$, n, 1)) - 35
|
||
Index = Index + 1
|
||
NEXT n
|
||
NEXT DStrings
|
||
DEF SEG = VARSEG(CBox(1))
|
||
BSAVE "anihues.bsv", VARPTR(CBox(1)), 1344
|
||
DEF SEG
|
||
OPEN "recent.axd" FOR RANDOM AS #1 LEN = LEN(Recent(1))
|
||
FOR n = 1 TO 6
|
||
Recent(n).PName = SPACE$(8)
|
||
Recent(n).FName = SPACE$(130)
|
||
PUT #1, n, Recent(n)
|
||
NEXT n
|
||
CLOSE #1
|
||
|
||
SCREEN 12
|
||
GOSUB Setpalette
|
||
'Create images from DATA
|
||
MaxWIDTH = 211
|
||
MaxDEPTH = 479
|
||
x = 0: y = 0
|
||
RESTORE PixDATA
|
||
DO
|
||
READ DataSTRING$
|
||
FOR n = 1 TO LEN(DataSTRING$)
|
||
Char$ = MID$(DataSTRING$, n, 1)
|
||
IF Char$ = CHR$(225) THEN Char$ = CHR$(160)
|
||
SELECT CASE Char$
|
||
CASE "!"
|
||
n = n + 1
|
||
a$ = MID$(DataSTRING$, n, 1)
|
||
Count = ASC(a$) + 68
|
||
CASE "#"
|
||
n = n + 1
|
||
B$ = MID$(DataSTRING$, n)
|
||
FOR I = 1 TO LEN(B$)
|
||
t$ = MID$(B$, I, 1)
|
||
IF t$ = "#" THEN EXIT FOR
|
||
c$ = c$ + t$
|
||
NEXT I
|
||
Count = VAL("&H" + c$)
|
||
n = n + LEN(c$)
|
||
c$ = ""
|
||
CASE ELSE
|
||
Count = ASC(Char$) - 60
|
||
END SELECT
|
||
n = n + 1
|
||
Colr = VAL("&H" + MID$(DataSTRING$, n, 1))
|
||
FOR Reps = 1 TO Count
|
||
PSET (x, y), Colr
|
||
x = x + 1
|
||
IF x > MaxWIDTH THEN x = 0: y = y + 1
|
||
NEXT Reps
|
||
NEXT n
|
||
LOOP UNTIL y > MaxDEPTH 'DATA drawing loop ends here --------------------
|
||
GET (16, 10)-(37, 35), ExBOX
|
||
GET (173, 0)-(182, 68), FontBOX
|
||
FOR x = 295 TO 335 STEP 10
|
||
PUT (x, 0), FontBOX, PSET
|
||
NEXT x
|
||
GET (300, 0)-(337, 67), FontBOX: PUT (300, 0), FontBOX
|
||
LINE (295, 0)-(300, 68), 0, BF
|
||
FOR y = 0 TO 400 STEP 68
|
||
PUT (300, y), FontBOX, PSET
|
||
NEXT y
|
||
GET (65, 0)-(116, 203), FontBOX: PUT (65, 0), FontBOX
|
||
PUT (337, 0), FontBOX, PSET
|
||
GET (117, 0)-(168, 203), FontBOX: PUT (117, 0), FontBOX
|
||
PUT (337, 204), FontBOX, PSET
|
||
GET (169, 0)-(211, 407), FontBOX: PUT (169, 0), FontBOX
|
||
PUT (391, 0), FontBOX, PSET
|
||
GET (156, 410)-(201, 477), FontBOX: PUT (156, 410), FontBOX
|
||
FOR y = 0 TO 400 STEP 68
|
||
PUT (434, y), FontBOX, PSET
|
||
NEXT y
|
||
GET (300, 0)-(300, 407), FontBOX: PUT (390, 0), FontBOX, PSET
|
||
GET (479, 0)-(479, 407), FontBOX: PUT (389, 0), FontBOX, PSET
|
||
GET (149, 304)-(152, 439), FontBOX: PUT (149, 304), FontBOX
|
||
PUT (431, 0), FontBOX, PSET
|
||
GET (156, 304)-(162, 407), FontBOX: PUT (156, 304), FontBOX
|
||
PUT (330, 304), FontBOX, PSET
|
||
FileNAME$ = "Book" + SPACE$(4)
|
||
FOR n = 1 TO 8
|
||
FontBOX(n) = ASC(MID$(FileNAME$, n, 1))
|
||
NEXT n
|
||
RESTORE Setpalette
|
||
FOR n = 9 TO 56
|
||
READ FontBOX(n)
|
||
NEXT n
|
||
FontBOX(57) = 12
|
||
Index = 58
|
||
x = 300: y = 0
|
||
FOR Index = 58 TO 18043 STEP 1635
|
||
GET (x, y)-(x + 89, y + 67), FontBOX(Index)
|
||
PUT (x, y), FontBOX(Index)
|
||
y = y + 68
|
||
IF y > 400 THEN x = x + 90: y = 0
|
||
NEXT Index
|
||
DEF SEG = VARSEG(FontBOX(0))
|
||
BSAVE "book.axb", VARPTR(FontBOX(1)), 19678 * 2&
|
||
DEF SEG
|
||
GET (0, 159)-(30, 174), TitleBOX
|
||
Index = 0
|
||
FOR y = 0 TO 160 STEP 20
|
||
GET (45, y)-(63, y + 14), ToolBOX(Index)
|
||
Index = Index + 100
|
||
NEXT y
|
||
DEF SEG = VARSEG(ToolBOX(0))
|
||
BSAVE "anitools.bsv", VARPTR(ToolBOX(0)), 1800
|
||
DEF SEG
|
||
Index = 0
|
||
FOR y = 0 TO 80 STEP 20
|
||
GET (0, y)-(10, y + 8), BBox(Index)
|
||
Index = Index + 50
|
||
NEXT y
|
||
FOR y = 100 TO 120 STEP 20
|
||
GET (0, y)-(15, y + 14), BBox(Index)
|
||
Index = Index + 75
|
||
GET (0, 140)-(30, 153), Box 'minimize/maximize buttons
|
||
GET (22, 0)-(28, 6), Box(150) 'screw
|
||
NEXT y
|
||
LINE (0, 0)-(64, 174), 0, BF
|
||
GET (13, 444)-(54, 453), FontBOX(10000): PUT (13, 444), FontBOX(10000)
|
||
GET (58, 444)-(87, 453), FontBOX(10200): PUT (58, 444), FontBOX(10200)
|
||
GET (91, 444)-(133, 453), FontBOX(10400)
|
||
GET (110, 444)-(133, 453), FontBOX(10600): PUT (91, 444), FontBOX(10400)
|
||
GET (54, 453)-(140, 462), FontBOX(10800): PUT (54, 453), FontBOX(10800)
|
||
PUT (53, 453), FontBOX(10600)
|
||
GET (13, 453)-(76, 462), FontBOX(11200): PUT (13, 453), FontBOX(11200)
|
||
Index = 12000
|
||
FOR x = 14 TO 104 STEP 10
|
||
IF x = 24 THEN Hop = -1 ELSE Hop = 0
|
||
GET (x + Hop, 462)-(x + 2 + Hop, 470), FontBOX(Index)
|
||
PUT (x + Hop, 462), FontBOX(Index)
|
||
Index = Index + 20
|
||
NEXT x
|
||
|
||
GOSUB GetFONT
|
||
CLS
|
||
|
||
LINE (0, 0)-(639, 17), 0, BF
|
||
LINE (30, 0)-(119, 16), 8, BF
|
||
LINE (0, 18)-(639, 40), 7, BF
|
||
LINE (0, 41)-(639, 41), 0
|
||
LINE (0, 411)-(639, 479), 7, BF
|
||
LINE (0, 411)-(639, 411), 15
|
||
'Tool bar
|
||
LINE (497, 20)-(497, 38), 8
|
||
LINE (498, 20)-(498, 38), 15
|
||
LINE (324, 28)-(326, 30), 0, BF
|
||
LINE (322, 26)-(328, 32), 0, B
|
||
FOR x = 313 TO 558 STEP 25
|
||
IF x = 488 THEN x = 508
|
||
LINE (x, 20)-(x + 24, 39), 8, B
|
||
LINE (x, 20)-(x + 23, 20), 15
|
||
LINE (x, 20)-(x, 38), 15
|
||
NEXT x
|
||
'Work area
|
||
LINE (0, 41)-(150, 479), 7, BF
|
||
LINE (0, 41)-(150, 41), 8
|
||
LINE (0, 42)-(150, 42), 15
|
||
LINE (151, 41)-(151, 410), 0
|
||
LINE (631, 43)-(639, 479), 7, BF
|
||
LINE (631, 41)-(639, 41), 8
|
||
LINE (631, 42)-(639, 42), 15
|
||
LINE (631, 42)-(631, 411), 15
|
||
LINE (154, 44)-(629, 409), 0, B
|
||
LINE (153, 43)-(628, 408), 7, B
|
||
PSET (153, 43), 15
|
||
PSET (153, 408), 15
|
||
PSET (628, 43), 15
|
||
PSET (628, 408), 15
|
||
'Coordinates box
|
||
LINE (19, 455)-(129, 473), 8, BF
|
||
LINE (21, 457)-(129, 471), 15, BF
|
||
LINE (129, 455)-(129, 473), 15
|
||
LINE (20, 473)-(129, 473), 15
|
||
LINE (20, 456)-(128, 472), 7, B
|
||
LINE (132, 463)-(146, 463), 7
|
||
'Status Bar blurbs box
|
||
LINE (280, 455)-(550, 473), 8, B
|
||
LINE (281, 473)-(550, 473), 15
|
||
LINE (550, 455)-(550, 473), 15
|
||
'Film strip graphic begins
|
||
LINE (15, 48)-(134, 407), 0, B
|
||
LINE (15, 48)-(133, 406), 8, BF
|
||
FOR y = 47 TO 404 STEP 17
|
||
IF y = 268 THEN y = 265
|
||
LINE (18, y)-(26, y + 5), 0, BF
|
||
LINE (19, y + 1)-(26, y + 5), 7, BF
|
||
LINE (122, y)-(129, y + 5), 0, BF
|
||
LINE (123, y + 1)-(129, y + 5), 7, BF
|
||
NEXT y
|
||
LINE (12, 44)-(136, 48), 7, BF
|
||
LINE (12, 407)-(136, 412), 7, BF
|
||
FOR y = 50 TO 381 STEP 70
|
||
IF y = 190 THEN y = 198
|
||
NEXT y
|
||
'Run control buttons
|
||
LINE (14, 414)-(135, 434), 0, B
|
||
LINE (15, 415)-(134, 415), 15
|
||
LINE (15, 433)-(134, 433), 8
|
||
LINE (134, 415)-(134, 433), 8
|
||
LINE (15, 415)-(15, 433), 15
|
||
FOR x = 38 TO 110 STEP 24
|
||
LINE (x, 414)-(x, 433), 8
|
||
LINE (x + 1, 415)-(x + 1, 433), 15
|
||
NEXT x
|
||
'Clock frame
|
||
LINE (563, 455)-(625, 473), 8, B
|
||
LINE (563, 473)-(625, 473), 15
|
||
LINE (625, 455)-(625, 473), 15
|
||
'Frame indicator
|
||
LINE (2, 191)-(149, 264), 7, BF
|
||
LINE (2, 190)-(149, 190), 15
|
||
LINE (3, 265)-(148, 265), 0
|
||
LINE (2, 191)-(2, 264), 15
|
||
LINE (149, 190)-(149, 265), 8
|
||
PUT (6, 194), Box(150), PSET
|
||
PUT (139, 194), Box(150), PSET
|
||
PUT (6, 255), Box(150), PSET
|
||
PUT (139, 255), Box(150), PSET
|
||
LINE (28, 192)-(121, 263), 8, BF
|
||
LINE (28, 192)-(121, 263), 15, B
|
||
LINE (28, 192)-(28, 262), 0
|
||
LINE (28, 192)-(120, 193), 0, B
|
||
LINE (30, 194)-(119, 261), 8, BF
|
||
LINE (124, 220)-(146, 235), 8, BF
|
||
LINE (124, 220)-(146, 235), 0, B
|
||
LINE (124, 235)-(146, 235), 15
|
||
LINE (146, 220)-(146, 235), 15
|
||
PrintSTRING 130, 222, "00", 1
|
||
'Color bar section
|
||
LINE (151, 423)-(190, 434), 8, B
|
||
LINE (151, 434)-(190, 434), 15
|
||
LINE (190, 423)-(190, 434), 15
|
||
LINE (152, 424)-(189, 433), 0, BF
|
||
CDATA:
|
||
DATA 0,8,7,15,1,2,3,4,5,6,9,10,11,12,13,14
|
||
RESTORE CDATA
|
||
FOR x = 200 TO 612 STEP 26
|
||
IF x = 304 THEN x = 321
|
||
READ Colr
|
||
LINE (x, 423)-(x + 23, 434), Colr, BF
|
||
LINE (x, 423)-(x + 23, 434), 0, B
|
||
LINE (x, 434)-(x + 23, 434), 15
|
||
LINE (x + 23, 423)-(x + 23, 434), 15
|
||
IF Colr > 9 THEN
|
||
PUT (x + 8, 413), FontBOX(12020)
|
||
Hop = 1
|
||
ELSE
|
||
Hop = 0
|
||
END IF
|
||
Colr$ = RTRIM$(STR$(Colr))
|
||
Num = VAL(RIGHT$(Colr$, 1))
|
||
PUT (x + 10 + Hop, 413), FontBOX(12000 + Num * 20)
|
||
NEXT x
|
||
PSET (14, 437), 15
|
||
DRAW "D5R34BR53R34U5"
|
||
PSET (200, 438), 15
|
||
DRAW "D4R25BR51R25U4BR20D4R118BR73R118U4"
|
||
PUT (54, 438), FontBOX(10000)
|
||
PUT (156, 438), FontBOX(10200)
|
||
PUT (229, 438), FontBOX(10400)
|
||
PUT (443, 438), FontBOX(11200)
|
||
PUT (147, 459), FontBOX(10800)
|
||
LINE (132, 463)-(142, 463), 15
|
||
P$ = "Check here for descriptions of the various functions"
|
||
PrintSTRING 290, 458, P$, 1
|
||
PUT (60, 1), TitleBOX, PSET
|
||
PUT (60, 218), TitleBOX, PSET
|
||
FOR y = 2 TO 16 STEP 2
|
||
LINE (313, y)-(586, y), 8
|
||
NEXT y
|
||
PUT (592, 2), Box, PSET
|
||
PUT (624, 2), BBox(250), PSET
|
||
ToolX:
|
||
DATA 342,366,391,416,441,466,511,536,560
|
||
RESTORE ToolX
|
||
FOR Index = 0 TO 800 STEP 100
|
||
READ x
|
||
IF x = 536 THEN y = 23 ELSE y = 22
|
||
PUT (x, y), ToolBOX(Index), PSET
|
||
NEXT Index
|
||
Index = 0
|
||
FOR x = 22 TO 118 STEP 24
|
||
PUT (x, 420), BBox(Index), PSET
|
||
Index = Index + 50
|
||
NEXT x
|
||
PrintSTRING 19, 24, "File", 1
|
||
PrintSTRING 60, 24, "Edit", 1
|
||
PrintSTRING 100, 24, "Color", 1
|
||
PrintSTRING 148, 24, "Special", 1
|
||
PrintSTRING 205, 24, "Help", 1
|
||
LINE (155, 45)-(626, 406), 7, BF
|
||
LINE (155, 45)-(626, 406), 15, B
|
||
LINE (155, 406)-(626, 406), 8
|
||
LINE (626, 45)-(626, 406), 8
|
||
LINE (166, 56)-(615, 395), 8, BF
|
||
LINE (165, 55)-(616, 396), 15, B
|
||
LINE (165, 55)-(616, 55), 0
|
||
LINE (165, 55)-(165, 396), 0
|
||
FOR y = 24 TO 38
|
||
FOR x = 30 TO 60
|
||
xx = x * 5 + 166
|
||
yy = y * 5 + 56
|
||
LINE (xx, y * 5 + 56)-(xx + 4, yy + 4), POINT(x + 30, y + 194), BF
|
||
NEXT x
|
||
NEXT y
|
||
LINE (169, 59)-(611, 392), 0, B
|
||
LINE (170, 60)-(610, 391), 0, B
|
||
LINE (174, 64)-(606, 387), 0, B
|
||
LINE (175, 65)-(605, 386), 0, B
|
||
PrintSTRING 142, 3, "untitled", 0
|
||
PrintSTRING 37, 459, "Pixel", 1
|
||
PrintSTRING 65, 459, "x:", 1
|
||
PrintSTRING 95, 459, "y:", 1
|
||
FOR y = 50 TO 338 STEP 70
|
||
IF y = 190 THEN y = 194
|
||
IF y = 264 THEN y = 268
|
||
LINE (30, y)-(119, y + 67), 0, B
|
||
LINE (32, y + 2)-(117, y + 65), 0, B
|
||
LINE (34, y + 4)-(115, y + 63), 0, B
|
||
PUT (60, y + 24), TitleBOX, PSET
|
||
NEXT y
|
||
FileCOUNT = 0
|
||
DEF SEG = VARSEG(FontBOX(0))
|
||
FOR y = 0 TO 360 STEP 120
|
||
GET (0, y)-(639, y + 119), FontBOX
|
||
PUT (0, y), FontBOX
|
||
FileCOUNT = FileCOUNT + 1
|
||
FileNAME$ = "Animax!" + LTRIM$(STR$(FileCOUNT)) + ".BSV"
|
||
BSAVE FileNAME$, VARPTR(FontBOX(0)), 19681 * 2&
|
||
NEXT y
|
||
DEF SEG = VARSEG(FontBOX(0))
|
||
BLOAD "animssb.fnt", VARPTR(FontBOX(0))
|
||
BLOAD "animssr.fnt", VARPTR(FontBOX(4700))
|
||
DEF SEG
|
||
DrawBOX 100, 100, 378, 216, 0
|
||
GOSUB BoxTOP
|
||
FOR x = 124 TO 284 STEP 80
|
||
LINE (x, 177)-(x + 70, 200), 0, B
|
||
DrawBOX x + 1, 178, x + 69, 199, 0
|
||
NEXT x
|
||
PrintSTRING 112, 107, "Animax!", 0
|
||
PrintSTRING 162, 139, "The currently loaded file has been", 1
|
||
PrintSTRING 162, 152, "altered. Do you wish to save changes?", 1
|
||
PrintSTRING 150, 183, "Yes", 1
|
||
PrintSTRING 233, 183, "No", 1
|
||
PrintSTRING 303, 183, "Cancel", 1
|
||
PUT (126, 138), ExBOX, PSET
|
||
GET (100, 100)-(378, 216), Box
|
||
PUT (100, 100), Box
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "anibox5.bsv", VARPTR(Box(0)), 16400
|
||
DEF SEG
|
||
DrawBOX 100, 100, 184, 254, 0 '164
|
||
PrintSTRING 112, 108, "New", 1
|
||
PrintSTRING 112, 122, "Open", 1
|
||
PrintSTRING 112, 136, "Save", 1
|
||
PrintSTRING 112, 150, "Save As", 1
|
||
PrintSTRING 112, 173, "1", 1
|
||
PrintSTRING 117, 173, ".", 1
|
||
PrintSTRING 112, 187, "2.", 1
|
||
PrintSTRING 112, 201, "3.", 1
|
||
PrintSTRING 112, 215, "4.", 1
|
||
LINE (103, 166)-(181, 166), 8
|
||
LINE (103, 167)-(181, 167), 15
|
||
LINE (103, 231)-(181, 231), 8
|
||
LINE (103, 232)-(181, 232), 15
|
||
PrintSTRING 112, 238, "Exit", 1
|
||
GET (100, 100)-(184, 254), Box(0)
|
||
PUT (100, 100), Box(0)
|
||
DrawBOX 200, 100, 252, 156, 0
|
||
PrintSTRING 212, 108, "Undo", 1
|
||
PrintSTRING 212, 122, "Copy", 1
|
||
PrintSTRING 212, 136, "Paste", 1
|
||
GET (200, 100)-(252, 156), Box(3420)
|
||
PUT (200, 100), Box(3420)
|
||
DrawBOX 300, 100, 386, 142, 0
|
||
PrintSTRING 312, 108, "Select Palette", 1
|
||
PrintSTRING 312, 122, "Edit Colors", 1
|
||
GET (300, 100)-(386, 142), Box(4220)
|
||
PUT (300, 100), Box(4220)
|
||
DrawBOX 400, 100, 497, 156, 0
|
||
PrintSTRING 412, 108, "Flip Horizontally", 1
|
||
PrintSTRING 412, 122, "Flip Vertically", 1
|
||
PrintSTRING 412, 136, "Negative Image", 1
|
||
GET (400, 100)-(497, 156), Box(5350)
|
||
PUT (400, 100), Box(5350)
|
||
DrawBOX 100, 200, 196, 256, 0
|
||
PrintSTRING 112, 208, "Instructions", 1
|
||
PrintSTRING 112, 222, "Load Demo File", 1
|
||
PrintSTRING 112, 236, "About Animax!", 1
|
||
GET (100, 200)-(196, 256), Box(6834)
|
||
PUT (100, 200), Box(6834)
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "animnus.bsv", VARPTR(Box(0)), 16640
|
||
DEF SEG
|
||
'WinicoCL.BSV
|
||
DrawBOX 100, 100, 379, 230, 0
|
||
DrawBOX 110, 128, 370, 222, 1
|
||
GOSUB BoxTOP
|
||
PrintSTRING 110, 107, "Animax! " + " Instructions", 0
|
||
LINE (300, 106)-(318, 118), 7, BF
|
||
PSET (303, 112), 0
|
||
DRAW "E5D3R6D4L6D3H5br2p0,0"
|
||
LINE (325, 106)-(343, 118), 7, BF
|
||
PSET (340, 112), 15
|
||
DRAW "H5D3L6D4R6D3E5bl2p15,15"
|
||
RESTORE HelpDATA
|
||
DEF SEG = VARSEG(Box(0))
|
||
FOR Page = 1 TO 10
|
||
IF Page = 2 THEN PAINT (305, 113), 15, 7
|
||
IF Page = 10 THEN PAINT (338, 113), 0, 7
|
||
LINE (111, 129)-(368, 220), 15, BF
|
||
y = 133
|
||
FOR Reps = 1 TO 7
|
||
Font = 1: yy = 0: xx = 0
|
||
IF Page = 6 THEN
|
||
IF Reps = 1 THEN Font = 0 ELSE Font = 1
|
||
IF Reps = 2 THEN yy = 2
|
||
IF Reps = 1 OR Reps = 2 THEN xx = -4
|
||
IF Reps = 4 OR Reps = 5 THEN yy = -5
|
||
LINE (143, 162)-(169, 217), 7, BF
|
||
LINE (143, 188)-(169, 191), 15, BF
|
||
DrawBOX 145, 164, 167, 185, 0
|
||
DrawBOX 145, 194, 167, 215, 0
|
||
PUT (147, 167), ToolBOX(700), PSET
|
||
PUT (147, 197), ToolBOX(800), PSET
|
||
END IF
|
||
READ h$
|
||
PrintSTRING 124 + xx, y + yy, h$, Font
|
||
y = y + 12
|
||
GET (100, 100)-(379, 230), Box
|
||
FileNAME$ = "AxHELP" + LTRIM$(STR$(Page)) + ".BSV"
|
||
BSAVE FileNAME$, VARPTR(Box(0)), 18400
|
||
NEXT Reps
|
||
NEXT Page
|
||
DEF SEG
|
||
DrawBOX 100, 100, 379, 230, 0
|
||
GOSUB BoxTOP
|
||
PrintSTRING 112, 107, "About Animax!", 0
|
||
PrintSTRING 124, 135, "Animax! 2.1", 0
|
||
PrintSTRING 242, 136, "(Freeware)", 1
|
||
PrintSTRING 124, 156, "Program type:", 1
|
||
PrintSTRING 242, 155, "Graphics/Animation Utility", 1
|
||
PrintSTRING 124, 167, "Program & Graphics by:", 1
|
||
PrintSTRING 242, 167, "Bob Seguin 2000 - 2007", 1
|
||
PrintSTRING 124, 179, "Language:", 1
|
||
PrintSTRING 242, 179, "QBasic 1.1", 1
|
||
PrintSTRING 124, 198, "Email:", 1
|
||
PrintSTRING 242, 198, "BOBSEG@sympatico.ca", 1
|
||
GET (100, 100)-(379, 230), Box
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "axhelp11.bsv", VARPTR(Box(0)), 18400
|
||
DEF SEG
|
||
DrawBOX 100, 100, 379, 178, 0
|
||
GOSUB BoxTOP
|
||
PrintSTRING 110, 107, "Animax!", 0
|
||
PUT (112, 134), ExBOX, PSET
|
||
DrawBOX 321, 135, 368, 159, 0
|
||
LINE (320, 134)-(369, 160), 0, B
|
||
PrintSTRING 339, 142, "OK", 1
|
||
PrintSTRING 152, 135, "Sorry, your file (or its path) could", 1
|
||
PrintSTRING 152, 147, "not be found. Please try again.", 1
|
||
GET (100, 100)-(379, 178), Box
|
||
LINE (142, 135)-(312, 159), 7, BF
|
||
PrintSTRING 142, 135, "Sorry, the file name you entered is in", 1
|
||
PrintSTRING 142, 147, "use by another file. Please try again.", 1
|
||
GET (142, 135)-(312, 159), Box(5535)
|
||
LINE (142, 135)-(312, 159), 7, BF
|
||
PrintSTRING 148, 135, "Sorry, the file you requested is not", 1
|
||
PrintSTRING 148, 147, "a properly formatted Animax! file.", 1
|
||
GET (142, 135)-(312, 159), Box(6650)
|
||
LINE (142, 135)-(312, 159), 7, BF
|
||
PrintSTRING 142, 135, "Please save the currently loaded file", 1
|
||
PrintSTRING 142, 147, "or select 'New' before loading demo.", 1
|
||
GET (142, 135)-(312, 159), Box(7765)
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "anibox4.bsv", VARPTR(Box(0)), 8880 * 2
|
||
DEF SEG
|
||
LINE (100, 100)-(379, 178), 0, BF
|
||
DrawBOX 100, 100, 379, 230, 0
|
||
GOSUB BoxTOP
|
||
PrintSTRING 112, 107, "Edit Colors", 0
|
||
FOR x = 272 TO 324 STEP 51
|
||
DrawBOX x, 202, x + 46, 225, 0
|
||
LINE (x - 1, 201)-(x + 47, 226), 0, B
|
||
NEXT x
|
||
PrintSTRING 279, 208, "Cancel", 1
|
||
PrintSTRING 340, 208, "OK", 1
|
||
DrawBOX 320, 164, 370, 197, 1
|
||
LINE (321, 165)-(369, 196), 1, BF
|
||
RESTORE CDATA
|
||
READ a, B, c, d
|
||
FOR y = 140 TO 150 STEP 10
|
||
FOR x = 110 TO 330 STEP 44
|
||
DrawBOX x, y, x + 39, y + 8, 1
|
||
READ Colr
|
||
LINE (x + 1, y + 1)-(x + 38, y + 7), Colr, BF
|
||
NEXT x
|
||
NEXT y
|
||
PrintSTRING 110, 125, "Click color to edit", 1
|
||
PrintSTRING 110, 164, "R", 1
|
||
PrintSTRING 110, 176, "G", 1
|
||
PrintSTRING 110, 188, "B", 1
|
||
FOR y = 169 TO 193 STEP 12
|
||
DrawBOX 125, y - 1, 285, y + 1, 1
|
||
LINE (126, y)-(285, y), 0
|
||
PSET (285, y - 1), 8
|
||
NEXT y
|
||
PrintSTRING 110, 208, "Adjust sliders, click OK to accept", 1
|
||
GET (100, 100)-(379, 230), Box(500)
|
||
DrawBOX 100, 300, 115, 308, 0
|
||
LINE (104, 301)-(104, 307), 15
|
||
LINE (111, 301)-(111, 307), 8
|
||
GET (100, 300)-(115, 308), Box(9700)
|
||
GET (144, 189)-(159, 197), Box(9800)
|
||
PUT (100, 300), Box(9700)
|
||
PUT (100, 100), Box(500)
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "anibox3.bsv", VARPTR(Box(500)), 18800
|
||
DEF SEG
|
||
SelectionDATA:
|
||
DATA "DOS Default", "Crayons", "Pastels", "Floral", "Nature"
|
||
DATA "Grayscale", "Half-Gray", "Half-Blue", "Half-Violet", "Half-Beige"
|
||
DATA "Metals", "Paper & Ink", "Wood", "People", "Military"
|
||
DrawBOX 100, 100, 379, 210, 0
|
||
GOSUB BoxTOP
|
||
PrintSTRING 112, 107, "Select Palette", 0
|
||
RESTORE SelectionDATA
|
||
FOR x = 118 TO 290 STEP 86
|
||
FOR y = 134 TO 200 STEP 14
|
||
LINE (x, y)-(x + 4, y + 4), 15, B
|
||
READ Selection$
|
||
PrintSTRING x + 11, y - 3, Selection$, 1
|
||
NEXT y
|
||
NEXT x
|
||
GET (100, 100)-(379, 210), Box(500)
|
||
PUT (100, 100), Box(500)
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "anibox2.bsv", VARPTR(Box(500)), 15544
|
||
DEF SEG
|
||
DrawBOX 100, 100, 379, 198, 0
|
||
LINE (108, 126)-(370, 144), 15, BF
|
||
LINE (108, 126)-(370, 144), 0, B
|
||
LINE (108, 146)-(372, 146), 15
|
||
LINE (372, 126)-(372, 146), 15
|
||
GOSUB BoxTOP
|
||
FOR x = 274 TO 325 STEP 51
|
||
DrawBOX x, 160, x + 46, 183, 0
|
||
LINE (x - 1, 159)-(x + 47, 184), 0, B
|
||
NEXT x
|
||
PrintSTRING 281, 166, "Cancel", 1
|
||
PrintSTRING 342, 166, "OK", 1
|
||
PrintSTRING 112, 107, "Open", 0
|
||
PrintSTRING 114, 160, "File names must be 8 characters", 1
|
||
PrintSTRING 114, 171, "or less. You may include a path.", 1
|
||
GET (100, 100)-(379, 198), Box(500)
|
||
GOSUB BoxTOP
|
||
PrintSTRING 112, 107, "Save", 0
|
||
GET (112, 107)-(156, 118), Box(7500)
|
||
GOSUB BoxTOP
|
||
PrintSTRING 112, 107, "Save As", 0
|
||
GET (112, 107)-(156, 118), Box(7800)
|
||
LINE (100, 100)-(379, 198), 0, BF
|
||
DEF SEG = VARSEG(Box(0))
|
||
BSAVE "anibox1.bsv", VARPTR(Box(500)), 15200
|
||
DEF SEG
|
||
'Finish up
|
||
LINE (5, 5)-(634, 474), 8, B
|
||
LINE (8, 8)-(631, 471), 8, B
|
||
LINE (200, 180)-(439, 290), 8, B
|
||
LINE (197, 177)-(442, 293), 8, B
|
||
PrintSTRING 247, 212, "The graphics files for ANIMAX!", 1
|
||
PrintSTRING 243, 226, "have been successfully created.", 1
|
||
PrintSTRING 246, 250, "You can now run the program.", 1
|
||
|
||
a$ = INPUT$(1)
|
||
END
|
||
|
||
BoxTOP:
|
||
LINE (104, 104)-(375, 121), 0, BF
|
||
FOR y = 105 TO 121 STEP 2
|
||
LINE (224, y)-(352, y), 8
|
||
NEXT y
|
||
DrawBOX 357, 106, 371, 119, 0
|
||
PSET (360, 109), 0
|
||
DRAW "F7rH7BD7nE7lE7"
|
||
RETURN
|
||
|
||
GetFONT:
|
||
'Stores two fonts in single array (see PrintSTRING sub program).
|
||
Index = 2
|
||
FOR y = 206 TO 454 STEP 14
|
||
FOR x = 0 TO 140 STEP 14
|
||
GET (x, y)-(x + 11, y + 11), FontBOX(Index)
|
||
PUT (x, y), FontBOX(Index)
|
||
Index = Index + 50
|
||
IF Index = 188 * 50 + 2 THEN EXIT FOR
|
||
NEXT x
|
||
NEXT y
|
||
FontBOX(0) = 50
|
||
FontBOX(1) = 4
|
||
FontBOX(4700) = 50
|
||
FontBOX(4701) = 4
|
||
FontBOTTOM = 211
|
||
FOR Index = 2 TO 187 * 50 + 2 STEP 50
|
||
GOSUB ReduceFONT
|
||
NEXT Index
|
||
DEF SEG = VARSEG(FontBOX(0))
|
||
BSAVE "animssb.fnt", VARPTR(FontBOX(0)), 9400
|
||
BSAVE "animssr.fnt", VARPTR(FontBOX(4700)), 9400
|
||
DEF SEG
|
||
RETURN
|
||
|
||
ReduceFONT:
|
||
LINE (0, 200)-(20, 220), 0, BF
|
||
PUT (0, 200), FontBOX(Index)
|
||
x1 = -1: x2 = -1
|
||
FOR x = 0 TO 20
|
||
FOR y = 200 TO 220
|
||
IF POINT(x, y) <> 0 AND x1 = -1 THEN x1 = x
|
||
NEXT y
|
||
NEXT x
|
||
FOR x = 20 TO 0 STEP -1
|
||
FOR y = 200 TO 220
|
||
IF POINT(x, y) <> 0 AND x2 = -1 THEN x2 = x
|
||
NEXT y
|
||
NEXT x
|
||
GET (x1, 200)-(x2 + 1, FontBOTTOM), FontBOX(Index)
|
||
RETURN
|
||
|
||
Setpalette:
|
||
DATA 0,0,0,21,21,21,13,9,20,0,0,0,63,0,0,11,11,23,63,61,60,42,42,42,21
|
||
DATA 21,21,63,43,0,43,30,60,0,63,63,59,55,59,0,0,42,58,54,54,63,63,63
|
||
RESTORE Setpalette
|
||
OUT &H3C8, 0
|
||
FOR n = 1 TO 48
|
||
READ Intensity: OUT &H3C9, Intensity
|
||
NEXT n
|
||
RETURN
|
||
|
||
HelpDATA:
|
||
DATA "Animax is designed for the creation of animated"
|
||
DATA "sequences for use in QBasic programs. The images"
|
||
DATA "produced by this program are 90 pixels wide by"
|
||
DATA "68 pixels deep. This size is entirely appropriate"
|
||
DATA "since most animation is used in only small areas of"
|
||
DATA "a larger image -- for example, a fire crackling in"
|
||
DATA "in a fireplace or an animated character sprite."
|
||
DATA "The frame you are working on is displayed in"
|
||
DATA "the film gate to the left of the screen. Work is"
|
||
DATA "done in the large center screen work area. The"
|
||
DATA "icons across the top of this work area allow"
|
||
DATA "you to select a variety of useful drawing tools"
|
||
DATA "while the run controls on the lower left allow"
|
||
DATA "manipulation of the frames created."
|
||
DATA "Certain drawing functions (Box, Circle, Elipse,"
|
||
DATA "Line and Mask) can only be used at three times"
|
||
DATA "magnification. For these operations, the work"
|
||
DATA "area will switch automatically to this reduced"
|
||
DATA "size when the tool is selected."
|
||
DATA "NOTE: Watch the status window at the bottom of"
|
||
DATA "the screen for the tool/run control's description."
|
||
DATA "It is important to keep in mind when working,"
|
||
DATA "that you are actually drawing the small frame"
|
||
DATA "on the left, not the large image in the work"
|
||
DATA "area. After certain operations, the large drawing"
|
||
DATA "area will switch from a relatively detailed image"
|
||
DATA "to a magnified image of the frame. Aliasing will"
|
||
DATA "become more pronounced. This is normal."
|
||
DATA "To create a new frame, simply go to the last frame"
|
||
DATA "in the sequence and press the frame advance"
|
||
DATA "button. There are a total of 16 frames possible in"
|
||
DATA "an Animax! (.AXB) file. This should be sufficient"
|
||
DATA "for any animated action cycle. .AXB files are"
|
||
DATA "BSAVE'd for rapid loading. When opening or sav-"
|
||
DATA "ing, the extension .AXB is added automatically."
|
||
DATA "Specialty Tools:"
|
||
DATA "Right-click anywhere in work area to 'pick up' color.",""
|
||
DATA "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Toggles between 3x and 5x magnifi-"
|
||
DATA "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>cation of the frame being worked on."
|
||
DATA "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Click any color in the image and all"
|
||
DATA "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>instances of it change to pen color."
|
||
DATA "Copy and Paste can be used with or without the"
|
||
DATA "Mask tool. If you click Copy without masking, the"
|
||
DATA "entire frame is copied and can be pasted into an-"
|
||
DATA "other frame. If you copy a masked area it can only"
|
||
DATA "be pasted to the same location in another frame."
|
||
DATA "You can also locate a pasted image using a mask,"
|
||
DATA "but only from and to the frame being worked on."
|
||
DATA "In order to use .AXB files, you must first understand"
|
||
DATA "how these files are structured. Information is held"
|
||
DATA "in an integer array. The first 8 integers hold the"
|
||
DATA "ASCII values of the file's name. The next 48 hold"
|
||
DATA "the palette (RGB) intensity values in order from"
|
||
DATA "attribute 0 to 15. Element 57 holds the number of"
|
||
DATA "frames in the total sequence (1-16)."
|
||
DATA "From element 58 to the end of the file is individual"
|
||
DATA "frame information at 1635 integers per frame. For
|
||
DATA "example, Array(58) will PUT the first frame,"
|
||
DATA "Array(1693) the second, etc. The minimum array"
|
||
DATA "size necessary for a 16 frame sequence is 26217.",""
|
||
DATA "Formula: ArraySIZE = 8 + 48 + 1 + Frames * 1635"
|
||
DATA "Animax! can also be used as a drawing utility for"
|
||
DATA "detailed SCREEN 12 images involving custom colors,"
|
||
DATA "or to refine existing images created elsewhere."
|
||
DATA "If you understand the structure of the .AXB file"
|
||
DATA "you can GET images to an array in 90x68 'chunks'"
|
||
DATA "and save them with the extension .AXB, then load"
|
||
DATA "the file in Animax! to refine these images."
|
||
HueDATA:
|
||
DATA "###b8bM#M88b##Gbb#8b8MMM88<#M##?#bP#bC#b##M8#bbb###bSbWGWVVbMMbbbZbbMMM"
|
||
DATA "M88<MbMCWCbZMbSGbMMWBBbbb###bbMbb##b##M#bL8bBWMMM88<b##M##[MbI#AMWb88bb"
|
||
DATA "bb###bb#8b8#C##8#ZZb8CbMMM88<WMCMC8bP?bC#b##M8#bbb###___[[[WWWSSSOOOKKK"
|
||
DATA "MMM888GGGCCC???;;;777333bbb###bb##S###bb##___ZZZMMM88<UUUPPPKKKFFFAAA<<"
|
||
DATA "<bbb###bb##S###bb##?Ib;E_MMM88<7A[3=W/9S+5O'1K#-Gbbb###bb##S###bb##bIb_"
|
||
DATA "E_MMM88<[A[W=WS9SO5OK1KG-Gbbb###bb##S###bb##bUP_RMMMM88<\OJWJETGBQD?NA<"
|
||
DATA "K>9bbb###_[_UQUUIFK:<bZMbUCMMM88<bM#ZC#]C8Z9/NOU:<Gbbb###/PS7/M##Cb//__"
|
||
DATA "_bZbMMM88<UZbZbZbb]bZN]M;WG3bbb###bZR]M?WG7M8'WIII15MMM88<ZUKPKASIAE;=U"
|
||
DATA "QOIECbbb###_ZG_PASS]#8M[C<Q<7MMM88<G59=-/b]WbZSbUMbOGbbb###ZZb88M##bb##"
|
||
DATA "ZUMSMCMMM88<MC8C8-WWBMM8CC-88-bbb"
|
||
PixDATA:
|
||
DATA "@7=8@7=8J7?0b7!O5?7>8?7>8I7=0?F=0Y7@0@7<>5=2<>5>7?8>7?8H7=0?F=0=F=0W7>0=F"
|
||
DATA ">0@7<>5=2v5=7E5=7@8=7@8H7=0>F=0>F=0V7>0=F?0@7<>5?2r5=2=E>6=7=2C5F8H7=0=F"
|
||
DATA "=0?F=0U7>0=F?0A7<41>5@2q5?E?6D5=7@8=7@8I7=0?F=0V7=0=F?0B7!=2>1=2?E@6=EC2>7"
|
||
DATA "?8>7?8J7?0V7A0C7<43>2=7=1l2AEA6=7B2?7>8?7>8f7=0=F?0D7<44>2>6=7i2=1=2AEA6=EB2"
|
||
DATA "@7=8@7=8e7=0=F?0E7<45>2>6=7i2=7AEB6=7A2n7=0=F?0F7<46>5D2?6=7g5=2BE?6=D>6=EA5"
|
||
DATA "N7=8L0=8I7=0=F?0G7<47>3E2@6f3=1=2AEA6=D>6=7@3M7=0MF=0=8H7@0H7<48>3E2=7?6=1e3"
|
||
DATA "=2=7AE?6=D=6=D>6=E@3L7=8OF=0=8F7@0I7<49>3F2=7?6=7e3=2BE@6=D=6=D>6=7?3L7=0"
|
||
DATA "DF?0DF=0=8F7>0K7<4B>3G2=7@6d3=1=2BE?6=D=6=D=6=D=6=E?3L7=0DF?0DF=0=8W7<57>3H2"
|
||
DATA "@6=1c3=2=7BE@6>D=6=D>6=7>3L7=0DF?0DF=0=8W7=3=2?3=2=3?2=3=2?3=2=3?2=3=2"
|
||
DATA "?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2=3=2?3=2=3?2=3=2?3=2=3I2@6=7=2=3?2"
|
||
DATA "=3=2?3=2=3?2=3=2=3=2=3?2=3=2?3=2=3?2=3=2?3>2BEA6=D=6=D?6=E=2=3L7=0DF?0"
|
||
DATA "DF=0=8W7C2?3C2?3C2?3C2?3C2?3E2?3P2@6=7>2?3C2?3A2?3C2?3A2=1=2BEB6>D@6>2"
|
||
DATA "L7=0DF?0DF=0=8W7=3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3"
|
||
DATA "=2=3=2A3=2=3=2=3=2=3=2A3=2=3=2=3B2=9D2=7@6=2A3=2=3=2=3=2A3=2=3=2A3=2=3"
|
||
DATA "=2=3=2A3=2=3=2=3=2=7BE?6=D?6>D?6=7=3L7=0DF?0DF=0=8W7>3?2C3?2C3?2C3?2C3"
|
||
DATA "?2E3?2C3D2=9F2@6=1B3?2C3=2C3?2C3@2CE@6=D>6=D=6=D>6=E=3L7=0DF?0DF=0=8W7"
|
||
DATA ">3=2=3=2C3=2=3=2C3=2=3=2C3=2=3=2C3=2=3=2E3=2=3=2C3=2=3A2=9G2@6=7B3=2=3"
|
||
DATA "=2C3=2C3=2=3=2C3=2=3=1=2BE@6>D?6>D?6=3?7>8G7=0DF?0DF=0=8W7>3?2C3?2C3?2"
|
||
DATA "C3?2C3?2E3?2C3B2=9H2@6=7B3?2C3=2C3?2C3@2BEA6>D>6=D=6=D>6@7?8F7=0DF?0DF"
|
||
DATA "=0=8F7I0@7=3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2"
|
||
DATA "A3=2=3=2=3=2=3=2A3=2=3A2=9>2=9E2=7@6=1@3=2=3=2=3=2A3=2=3=2A3=2=3=2=3=2"
|
||
DATA "A3=2=3=1=2=7BEA6=D=6=D>6=D=6=D>6?7@8E7=0DF?0DF=0=8F7=0G7=0@7=3>2=3>2A3"
|
||
DATA ">2=3>2A3>2=3>2A3>2=3>2A3>2=3>2A3=2=3>2=3>2A3B2=9>2=9G2@6=1@3>2=3>2A3?2"
|
||
DATA "A3>2=3>2A3>2=1=2DE?6=D=6>D>6=D=6=D>6?7A8D7=0DF?0DF=0=8F7=0G7=0@7=3=2?3"
|
||
DATA "=2A3=2?3=2A3=2?3=2A3=2?3=2A3=2?3=2A3=2=3=2?3=2A3A2=9K2@6=7@3=2?3=2A3=2"
|
||
DATA "=3=2A3=2?3=2A3=2=3>2EE?6=D=6>D>6=D=6=D=6?7B8C7=0DF?0DF=0=8F7=0G7=0@7>2"
|
||
DATA "?3?2=3?2?3?2=3?2?3?2=3?2?3?2=3?2?3?2=3A2?3?2=3B2=9?2=9H2@6=7=1=3?2?3?2"
|
||
DATA "=3?2=3?2=3?2?3?2=3?2=3=1=2EE?6=D=6=D=6=D>6=D>6?7A8D7=0DF?0DF=0=8F7=0G7"
|
||
DATA "=0@7z3@2=9C2=9E2=7@6=1]3=2=1FE?6=D=6>D>6=D>6?7@8E7=0OF=0=8F7=0G7=0@7z3"
|
||
DATA "?2=9?2=9?2=9G2@6=7^3=1=2FE?6>D=6=D>6=D=6?7?8F7=0OF=0=8F7=0G7=0@7y3@2=9"
|
||
DATA ">2=9?2=9H2@6=7=1^3=2FE?6=D=6>D>6=D=6?7>8G7=0DF?0DF=0=8F7=0G7=0@7C3>2=3"
|
||
DATA "[2O3@2=9B2=9I2A6=7^3=1=2FE?6=D=6>D?6L7=0DF?0DF=0=8F7=0G7=0@7B3?2=3\2L3"
|
||
DATA "=2=3?2=9?2=9>2=9J2=E@6=7_3=2FE@6>D=6=D>6L7=0DF?0DF=0=8F7=0G7=0@7B3?2=3"
|
||
DATA "\2L3=2=3B2=9?2=9G2=1=2?E@6=2^3=1=2FE?6=D=6>D>6L7=0DF?0DF=0=8F7=0G7=0@7"
|
||
DATA "E2=3m2=3A2=9K2=1=2BE>6=1`2FE@6>D=6=D=6L7=0OF=0=8F7=0G7=0@7F2=3l2=3D2=9"
|
||
DATA "G2=1=2DE=6=7_2=1=2EE@6=D=6=D>6L7=8=0MF>0=8F7I0@7F2=3l2=3O2=1=2EE=7=1a2"
|
||
DATA "FE@6=D=6=D=6M7O0=8X7A4A2=3B2B9>2>9=2=9>2C9B2I4>2=3B2=9G2=1=2EE=7b4=1=2"
|
||
DATA "EEA6=D>6N7N8Y7A4A2=3^2H4>2=3A2=9G2=1=2=7EE=7=6=7`4=1=2FE@6=D>6}7>9?3=2"
|
||
DATA "=9?2=3D2=9=2>9=2=9?2>9=2>9=2=9=2=9D2E9?3>2=3@2=9H2=1=7EE=7?6a9=1=2EEA6"
|
||
DATA "=D=6}7>4?3=9@2=3E2>9=2B9=2=9=2=9>2?9D2D4?3>2=3?2=9H2=1=2EE=7@6=7`4=3=2"
|
||
DATA "FE@6=D=6}7>4?3=9=2=9>2=3_2D4?3>2=3K2=1=2EE=7B6_4>3=1=2EEB6}7>4?3=2=9?2"
|
||
DATA "=3`2C4?3>2=3J2=1=2EE=7C6=7^4?3=2FEA6=8@7=8w7>4?3=2=9?2=3`2C4?3>2=3I2=1"
|
||
DATA "=2EE=7E6^4?3=1=2EEA6>8?7>8i7A0D7>4?3=9@2=3a2B4?3>2=3H2=1=2EE=7F6=7\4A3"
|
||
DATA "=2EEA6?8>7?8f7>0A7>0B7>4?3=9@2=3a2B4?3>2=3G2=1=2=7DE=7H6\4A3=1=2EE@6@8"
|
||
DATA "=7@8d7=0E7=0A7>4?3=9A2=3a2A4?3>2=3G2=1=7DE?D=6>DD6=7[4B3=2EE@6F8c7=0E7"
|
||
DATA "=0A7>4?3B2=3a2A4?3>2=3F2=1=2DE@7H6[4B3=1=2EE?6@8=7@8c7=0G7=0@7>4?3B2=3"
|
||
DATA "b2@4?3>2=3E2=1=2EE=7AD=6=D>6>D=6=D>6=7Y4D3=2EE?6?8>7?8d7=0G7=0@7>4?3B2"
|
||
DATA "=3b2@4?3>2=3D2=1=2EEA7I6Y4D3=1=2EE>6>8?7>8e7=0G7=0@7>4?3B2=3c2>4@3>2=3"
|
||
DATA "C2=1=2EEC7H6=7X4E3=2EE>6=8@7=8f7=0G7=0@7>4?3B2=3c2>4@3>2=3B2=1=2EED7I6"
|
||
DATA "W4F3=1=2DE>6l7=0G7=0@7>4?3B2=3d2=4@3>2=3A2=1=2=7DEE7I6=7V4G3=2EE=6m7=0"
|
||
DATA "E7=0A7>4?3@2>1=3c1=2=4@3>2=3A2=1=7DE>7=DA7=D=7=D=6>D?6=DB6V4G3=1=2EEm7"
|
||
DATA "=0E7=0A7>4?3?2=1e3>2=4@3>2=3@2=1=2DE=D=7?D=7?D=7@D=6=D=6?DA6=7U4H3=2EE"
|
||
DATA "n7>0A7>0B7>4?3?2=1e2?4@3>2=3?2=1=2DEI7J6T4I3=1=2DEp7A0D7>4?3>2=1>3d7?4"
|
||
DATA "@3>2=3>2=1=2EEI7J6=7S4J3=2DE}7>4?3>2=1=3=7dE?4@3>2=3=2=1=2EEK7J6S4J3=1"
|
||
DATA "=2CE}7>4?3=2=1>3dE=7?4@3>2=3=1=2EEL7J6=7Q4L3=2CE}7>4@3=1>3dE=7>4A3>2>3"
|
||
DATA "=2DEM7J6=7Q4L3=1=2BE}7>4?3=2=1>3dE=1>4A3>2=1=2DE=7[E=7Q4M3=2BE}7>4?3=2"
|
||
DATA "=1>3dE?4A3=2=1>3?E=7`E=7Q4M3=1=2AE}7>4?3=2?3dE=1>4B3=1>3=7=E=7aE=7P4O3"
|
||
DATA "=2AE>7=8@7=8u7>4C3dE=7>4B3=1?3cE=7P4O3=1=2>3>E>7=8?7>8h7@0E7>4@3=2>3=7"
|
||
DATA "cE=7=1=4B3=1=2>3cE=7=2O4P3=1=2?3>7=8>7?8g7=0@7=0D7>4D3=7cE=2=4C3=1?3cE"
|
||
DATA "=2N4R3=1=2>3>7=8=7@8f7=0B7=0C7>4A3=2?3cE>2C3?2=3=7bE>2M4R3>1=2=3>7B8f7"
|
||
DATA "=0B7=0C7>4B3>2>3d2E3g2M4T3=1=2>7=8=7@8e7=0D7=0B7>4D3?2<>3e4>3>7=8>7?8e7"
|
||
DATA "=0D7=0B7!O4>7=8?7>8e7=0D7=0B7!O4>7=8@7=8e7=0D7=0B7!O5m7=0D7=0B7!O5n7=0"
|
||
DATA "B7=0C7!O5n7=0B7=0C75>2<>5o7=0@7=0D75=2=C=7=1<>5p7@0E7<45>2>6=C=7=1<>2}7<>2A6"
|
||
DATA "=7<>2}7<>2C6=7<>2}7<>2D6p2=E=6M2}7~5>2D6m5=1=7>E>6L5}7}3?2D6m3=7?E?6K3}7}3"
|
||
DATA "?2D6l3=1=7?E@6J3>7=8@7=8u7}3?2D6l3=7?EA6=7I3>7>8?7=8u7}3?2D6l3=7?E?6=D"
|
||
DATA ">6I3>7?8>7=8o7=0A7|3@2D6k3=1@E@6=D>6H3>7@8=7=8n7=0B7=3=2?3=2=3?2=3=2?3"
|
||
DATA "=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2=3=2?3=2=3?2=3A2D6=3=2=3"
|
||
DATA "?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2=3=2=3?2=3=2?3=2=3?2=3=2=3=7@EA6=D=6=E=3"
|
||
DATA "?2=3=2?3=2=3>7B8m7=0C7C2?3C2?3C2?3C2?3C2?3E2?3B2D6?2?3C2?3C2?3A2?3C2?3"
|
||
DATA ">2=1=7?E@6=D>6=D=6=E?3C2>7@8=7=8l7=0D7=3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2"
|
||
DATA "=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2=3=2A3A2D6=3=2A3=2=3=2=3=2A3=2"
|
||
DATA "=3=2=3=2A3=2=3=2A3=2=3=2=3=2A3=2=7@E?6=D=6=D>6=D=E=7?3=2=3=2=3=2=3>7?8"
|
||
DATA ">7=8k7=0E7>3?2C3?2C3?2C3?2C3?2E3?2B3A2D6=2C3?2C3?2C3=2C3?2C3=7@E@6=D=6"
|
||
DATA "=D=6=D>6@3?2>3>7>8?7=8j7=0F7>3=2=3=2C3=2=3=2C3=2=3=2C3=2=3=2C3=2=3=2E3"
|
||
DATA "=2=3=2B3A2D6=2C3=2=3=2C3=2=3=2C3=2C3=2=3=2B3=1AE>6=D>6=D=6=D=6=D=6=E?3"
|
||
DATA "=2=3=2>3>7=8@7=8i7=0G7>3?2C3?2C3?2C3A2A3?2E3?2A3?2=9>2D6=2C3?2C3?2C3=2"
|
||
DATA "C3?2B3=7@E@6=D>6>D?6>E>3?2>3p7=0H7=3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2"
|
||
DATA "A3B2@3=2=3=2=3=2A3=2=3=2=3=2=3=2@3>2=9?2D6=3=2A3=2=3=2=3=2A3=2=3=2=3=2"
|
||
DATA "A3=2=3=2A3=2=3=2=3=2@3=1=7@E?6=D=6=D>6>D@6=7=2=3=2=3=2=3o7=0I7=3>2=3>2"
|
||
DATA "A3>2=3>2A3>2=3>2=3G2?3>2=3>2A3=2=3>2=3>2@3>2=9?2D6>2A3>2=3>2A3>2=3>2A3"
|
||
DATA "?2A3>2=3>2@3=7AE@6>D>6=D=6=D@6>2=3>2=3n7=0J7=3=2?3=2A3=2?3=2A3=2=3K2?3"
|
||
DATA "=2?3=2A3=2=3=2?3=2?3>2=9@2D6=3=2A3=2?3=2A3=2?3=2A3=2=3=2A3=2?3=2?3=1=7"
|
||
DATA "BE@6>D>6=D=6=D?6=E?3=2=3m7=0K7>2?3?2=3?2?3?2=3S2?3?2=3A2?3?2=3>2=9@2D6"
|
||
DATA "=3?2=3?2?3?2=3?2?3?2=3?2=3?2=3?2?3@2=7DE?6=D=6=D>6=D=6=D?6=7>3>2l7=0L7"
|
||
DATA "K3T2R3C2D6f3=1=7EE?6=D=6=D>6>D?6=E@3}7G3Y2P3>2=9=2=9?2D6f3=7FE@6>D?6>D"
|
||
DATA "?6=7?3}7F3Q2>9C2P3>2=9=2=9?2D6f3=7GE@6>D>6=D=6=D>6=E?3}7C3>2=3L2>9=2=9"
|
||
DATA "G2O3>2=9@2=1>E=CA6f3>2GE?6=D=6=D>6=D=6=D>6=E>3}7B3?2=3H2>9=2=9K2N3>2=9"
|
||
DATA "=2=9?2=7AE=C>6g3=1=2FE@6=D=6=D>6=D=6=D=6=E=7=3}7B3?2=3D2?9C2>9H2M3>2=9"
|
||
DATA "=2=9?2=7DEI6[3=1=2FE@6>D?6>D>6=E=3}7E2=3A2>9C2=9=2>9\2=9=2=9?2=1EEI6=7"
|
||
DATA "[2=1FE@6=D=6=D?6>D>6=7KF=0d7?0B7F2=3E2@9`2=9=2=9?2=7EE=D=6=D=6CD?6]2FE"
|
||
DATA "@6=D=6=D>6=D?6=E=FI7=8=0c7=0>F=0B7F2=3D2=9E2>9=2=9W2=9A2=7DEK6=7[2=1=2"
|
||
DATA "FE@6=D=6=D>6=D>6=E=FI7=8=0b7=0>F?0A7A4A2=3J2=9=2=9L2I4>2=9=2=9?2=1EE?D"
|
||
DATA "=6>D>6>D=6?D>6\4=1FEA6=D=6=D@6=E=FI7=8=0a7=0?F>7>0@7A4A2=3F2=9=2=9P2I4"
|
||
DATA ">2=9A2=7EEL6=7\4=2FE@6=D>6=D@6=F?7>0@7>0>7=8=0^7>F=0@F?7>0?7>9?3A2=3C2"
|
||
DATA "?9S2=1D9@3@2=9?2=7DE=6GD=6=D=6=D>6\9=1=2FE@6=D=6=D@6=F@7>0>7>0?7=8=0\7"
|
||
DATA "?F=0?F=0=7=F?7>0>7>4?3=9@2=3A2=9X2D4@3C2=1EEN6=7\4=1=2EEA6=D=6=D?6=FA7"
|
||
DATA "@0@7=8=0\7>F=0@F?7=F?7>0=7>4?3=9@2=3^2=1C4@3C2=7EEO6\4=1=2FEA6=D@6=FB7"
|
||
DATA ">0A7=8=0[7>F>0=F=0>7=FC7=0=7>4?3A2=3_2C4@3C2=7DEP6=7[4=3=1=2FE@6=D@6=F"
|
||
DATA "A7@0@7=8=0[7>F=7?0?7=FA7>0=7>4?3=9@2=3_2C4@3B2=1EEQ6[4>3=1FEE6=F@7>0>7"
|
||
DATA ">0?7=8=0[7>F?7=0@7=F?7>0>7>4?3=9@2=3_2=1B4@3B2=7DEAD>6>D>6>D=6>D=6?D>6"
|
||
DATA "=7Y4@3=2FED6=F?7>0@7>0>7=8=0[7>F@7=0B7>0?7>4?3=9@2=3`2B4@3B2=7DES6Y4@3"
|
||
DATA "=1=2FEC6=FI7=8=0[7>FA7=0@7>0@7>4?3=9A2=3_2=1A4@3A2=1EEHD=6>D=6>D=6=D?6"
|
||
DATA "=7X4A3=2FEC6=FI7=8=0[7>FB7=0>7>0A7>4?3B2=3`2A4@3A2=7DEU6W4B3=1=2FEB6=F"
|
||
DATA "J8=0[7>FC7?0B7>4?3B2=3Z2?1>7B4@3A2=7DEED=6AD=6=D>6>D=6=D>6=7V4C3=1=2FE"
|
||
DATA "A6L0Y7BFJ7>4?3B2=3V2?1?7>E=7B4@3@2=1EEV6V4D3=2FEA6}7>4?3B2=3R2?1?7BE=7"
|
||
DATA "A4A3@2=1DE>6>DS6=7T4E3=1=2FE@6}7>4?3B2=3N2?1?7GE=7@4A3@2=7DEX6T4F3=1=2"
|
||
DATA "FE?6}7>4?3Q2?1?7KE=7@4A3?2=1=7CE=FX6=7S4G3=1=2EE?6}7>4?3N2>1?7OE=7@4A3"
|
||
DATA "?2=1CE=7=E=6>D=6=D>6=DA6=D=6=D=6>D?6=DB6R4I3=2FE>6}7>4?3L2=1>7TE@4A3?2"
|
||
DATA "=7CE=7=E>D=6>D=6?D=6?D=6@D=6=D=6?DA6=7Q4I3=1=2FE=6K0=Fm7>4?3I2=1>7RE@F"
|
||
DATA "=7@4A3>2=1=7CE=7=EZ6Q4J3=1=2EE=6=0J8=F[7>0=F>0=F>0=F>0=F>0@7>4?3?2=3A2"
|
||
DATA "=1>7RE?7=EAF@4A3>2=1CE?7Z6=7O4L3=2FE=0=8H7>F[7=0H7=0@7>4?3@2=3=2=1>7QE"
|
||
DATA "D7AF=7?4A3>2=1CE?7[6O4L3=1=2EE=0=8H7>F[7=FH7=F@7>4?3?2=1=3=7OEI7=EAF?4"
|
||
DATA "A3=2=1=7BE@7=EZ6=7N4M3=1=2DE=0=8H7>F[7=0H7=0@7>4@3=2=1=3=7LEN7AF=7>4A3"
|
||
DATA "=2=1=7BE@7=EZ6=7M4O3=1=2CE=0=8?7>0@7>0=7>F[7=0H7=0@7>4?3=2>3>7HE=7=EA7"
|
||
DATA "PE=7>4A3=2=1BE=7_E=7M4P3=2CE=0=8@7>0>7>0>7>F[7=FH7=F@7>4?3=2=1=3>7CE=7"
|
||
DATA "=E>7XE=7>4A3=2=1fE=7M4P3=1=2BE=0=8A7@0?7>F[7=0H7=0@7>4?3=2=1=3>7cE=7>4"
|
||
DATA "A3=2=1=3eE=7M4Q3=1=2AE=0=8B7>0@7>F[7=0H7=0@7>4@3=2=3>7cE=7>4B3=1>3=E=7"
|
||
DATA "bE=7L4S3=1=2@E=0=8A7@0?7>F[7=FH7=F@7>4@3=2>3=7cE=7=2=4B3=1?3cE=7=2K4S3"
|
||
DATA "=1=2>E>3=0=8@7>0>7>0>7>F[7=0H7=0@7>4A3=2=3>7cE=2=4C3=1?3cE=2K4T3=1>2>3"
|
||
DATA "=0=8?7>0@7>0=7>F[7=0H7=0@7>4A3=2>3=7cE>2C3=2=1>3cE>2I4V3=1>2=3=0=8H7>F"
|
||
DATA "[7=FH7=F@7>4B3>2>3d2D3>2=3=1d2I4W3>1=3=0=8JF[7=0H7=0@7>4D3?2m3?2c3I4Z3"
|
||
DATA "LF[7>0=F>0=F>0=F>0=F>0@7!H4C3}7!O4}7!O5}7!O5}7!O5}7s5=D<>5KF=0KF^7r5=7=2"
|
||
DATA "<22>5=FI7=8=0=FI7=8M7I0@7r2=7=2E6<45>2=FI7=8=0=F>7E8>7=8M7D0@F=0@7r2=7=2E6=D"
|
||
DATA "<22>2=FI7=8=0=F>7E8>7=8M7>0?F?0@F=0@7r2=7=2E6=7<>2=FI7=8=0=F>7=8CF=8=F=7=8"
|
||
DATA "M7>0>F@0@F=0@7r2=7=2E6=E<>2=FI7=8=0=F>7=8=FB7=8=F=7=8M7>0=F=0=F?0@F=0@7"
|
||
DATA "r5=7=2F6<46>5=FI7=8=0=F>7=8=FB7=8=F=7=8M7A0=F>0@F=0@7r3=7=2F6<46>3=FI7=8=0=F"
|
||
DATA ">7=8=FB7=8=F=7=8M7B0=7=0@F=0@7r3=7=2F6<46>3=FI7=8=0=F>7=8=FB7=8=F=7=8M7C0"
|
||
DATA "=7@F=0@7\3=2Q3=7=2F6<46>3=F@7A8=F?7=8=0=F>7=8=FB7=8=F=7=8M7=0CF=0=F=0=F=0"
|
||
DATA "@7Z3@2P3=7=2F6<46>3=F@7A8=F?7=8=0=F>7=8=FB7=8=F=7=8M7=0DF>0=F=0@7Y3A2=7O3"
|
||
DATA "=7=2F6<46>3=FA7AF?7=8=0=F>7E8=F=7=8M7=0CF?0=F=0@7=3=2?3=2=3?2=3=2?3=2=3?2"
|
||
DATA "=3=2?3=2=3C2=6=2=3?2=3=2?3=2=3?2=3=2=3=2=7=2F6=3=2=3?2=3=2?3=2=3?2=3=2"
|
||
DATA "?3=2=3?2=3=2?3=2=3?2=3=2=3=2=3?2=3=2?3=2=3?2=3=2=6=D=3=2=3?2=3=2?3=2=3"
|
||
DATA "?2=3=2?3=2=3=FI7=8=0=FI7=8M7=0GF=0@7C2?3C2?3J2>7=2?3C2?3@2=1=2FE?2?3C2"
|
||
DATA "?3C2?3C2?3A2?3C2?3=2=E>6=7>2?3C2?3C2=FJ8=0=FJ8M7I0@7=3=2=3=2=3=2A3=2=3"
|
||
DATA "=2=3=2A3=2=3H2=6A3=2=3=2=3=2A3=2=3=2=1=2FE=3=2A3=2=3=2=3=2A3=2=3=2=3=2"
|
||
DATA "A3=2=3=2=3=2A3=2=3=2A3=2=3=2=3=2A3@6=7A3=2=3=2=3=2A3=2=3=2=3=2=3}7>3?2"
|
||
DATA "C3?2C3I2=6=7A3?2E3=1=2FE=2C3?2C3?2C3?2C3=2C3?2A3=EB6=7@3?2C3?2>3}7>3=2"
|
||
DATA "=3=2C3=2=3=2B3J2=7=6A3=2=3=2E3=1=2FE=2C3=2=3=2C3=2=3=2C3=2=3=2C3=2C3=2"
|
||
DATA "=3=2A3E6=7>3=2=3=2C3=2=3=2>3}7>3?2C3?2A3L2=6A3?2E3=1=2DE=C=E=2C3?2C3?2"
|
||
DATA "C3?2C3=2C3?2@3=E?6=DC6=7?2C3?2>3}7=3=2=3=2=3=2A3=2=3=2=3=2>3N2>7?3=2=3"
|
||
DATA "=2=3=2A3=2=3=2=1=2FE=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2A3"
|
||
DATA "=2=3=2=3=2>3=2A6>DC6=7=3=2A3=2=3=2=3=2=3}7=3>2=3>2A3>2=3>2=3F2=9E2=6?3"
|
||
DATA ">2=3>2A3=2=3=2=1=2FE>2A3>2=3>2A3>2=3>2A3>2=3>2A3?2A3>2=3>2=3=2=E@6=D>6"
|
||
DATA "=DC6=7=2A3>2=3>2=3=8?FC8=FN8=F=8]7=3=2?3=2A3=2?3G2=9F2=6=7>3=2?3=2A3=2"
|
||
DATA "=3=2=1=2FE=3=2A3=2?3=2A3=2?3=2A3=2?3=2A3=2=3=2A3=2?3=2=3=2@6=D=6>D=6>D"
|
||
DATA "C6=7@3=2?3=2=3AFB8=FN8=F=8]7>2?3?2=3?2>3F2>9G2=7=6?2?3?2=3A2=1=2FE=3?2"
|
||
DATA "=3?2?3?2=3?2?3?2=3?2?3?2=3?2=3?2=3?2?3?2A6>D=6>D=6>DC6=7?2?3>2AFU8=F=8"
|
||
DATA "]7H3F2>9J2=6=1J3=1=2FEo3=E@6=D>6=D>6=DG6=7B3AFU8=F=8M7=0F7=0@7G3E2>9?2"
|
||
DATA ">9G2>7J3=1=2FEn3=2B6>D=6>D=6>DG6=7@3=F?8=F=8?F>8=F=8@F>8?F>8>F=8>F=8=F"
|
||
DATA "=8M7=0F7=0@7E3E2=9A2=9J2=6=1I3=1=2FEn3=ED6=D>6>D=6>DF6=7?3=F?8=F=8@F=8"
|
||
DATA "=F=8AF=8@F=8>F=8>F=8=F=8L7?0>7=F>7=F>7=0=F=0?7D3E2=9@2=9L2>7I3=1=2FEm3"
|
||
DATA "=2@6=DA6>D>6=D>6>DE6=7>3AF=8@F=8=F=8AF=8@F=8>F=8>F=8=F=8L7?0=7BF=7=0=F"
|
||
DATA "=0?7B3=2=3C2=9@2=9B2>9F2=7=6I3=1=2FEm3=EA6=D=6=D@6=D>6>D>6>DD6=7=3AF=8"
|
||
DATA "@F=8=F=8AF=8@F=8>F=8>F=8=F=8L7?0=7=0=F>0=F=0=7=0=F=0?7B3=2=3B2=9?2>9B2"
|
||
DATA "=9I2=6=7H3=1=2FES6U3=2A6=D=6=D>6=D?6>D>6>D>6=DD6=7AF=8=F>8=F=8=F=8=F=8"
|
||
DATA "=F=8=F@8=F?8=F?8=F=8K7=0=F?0=7=0>7=0=7=0?F=0>7C2=3E2=9A2=9=2=9J2=7=6H2"
|
||
DATA "=1=2FES6=7T2=EB6=D>6=D=6=D@6>D>6=D>6>DC6=F?8=F=8=F>8=F=8=F=8=F=8=F=8=F"
|
||
DATA ">8?F?8=F?8=F=8K7=0=F?0B7=0?F=0>7C2=3G2=9=2=9N2=7=6=7G2=1=2FE>D=6@D=6=D"
|
||
DATA "=6=D=6=D=6CD?6T2=E@6=D>6>D@6=D@6=D>6>D>6>DA6=F?8=F=8=F>8=F=8=F=8=F=8=F"
|
||
DATA "=8=F=8=F>8=F?8=F?8=F=8J7=0=FA0@7=0AF=0=7C2=3H2=9P2=1=6G2=1=2FET6=7R2?E"
|
||
DATA "@6>D>6>D=6=D=6=D@6>D>6>DC6=F?8=F=8=F>8=F=8=F=8=F=8=F=8=F=8@F=8>F=8>F?8"
|
||
DATA "J7C0@7=0AF=0=7A4>2=3E2?9P2=1=6=E=1F4=1=2FE?D>6?D=6?D=6>D>6>D=6?D>6Q4=2"
|
||
DATA "@EA6>D>6=D@6=D@6>D>6=DB6=F?8=F=8=F>8=F=8=F=8=F=8=F=8=F=8@F=8>F=8>F?8J7"
|
||
DATA "C0@7=0AF=0=7A4>2=3C2>9Q2>1=2=E>6F4=1=2FEU6=7P4BEB6=D>6>D=6=D=6>D@6=D>6"
|
||
DATA ">D@6=F?8=F=8=F>8=F=8=F=8=F=8=F=8=F=8@F=8>F=8>F=8=F=8K7A0B7=0?F=0>7>9?3"
|
||
DATA ">2=3C2=9Q2=1=2@E=6F9=1=2FE=D=6>D=6=D?6GD=6=D=6=D>6O9=2DEA6>D>6=D@6=D@6"
|
||
DATA ">DB6=F?8=F=8=F>8=F=8=F=8=F=8=F=8=F>8?F=8>F=8>F=8=F=8L7?0D7?0?7>4?3>2=3"
|
||
DATA "W2>1=2BE=6C4>3=1=2FEV6=7M4=2FEB6=D>6>D=6=D=6>DF6\8]7>4?3>2=3V2=1=2EEC4"
|
||
DATA ">3=1=2FE>D=6>D=6>DO6M4IEA6>D>6=D@6=DE6}0>4?3>2=3T2>1=2GEB4>3=1=2FEW6=7"
|
||
DATA "K4=2=7IEB6>D=6>D?6>DC6}0>4?3>2=3S2=1=2HE=7B4>3=1=2FEX6K4=1>2JEB6=D>6>D"
|
||
DATA "F6}0>4?3>2=3Q2>1=2HED4>3=1=2FEBD=6@D>6>D>6>D=6>D=6?D>6=7K4=1>2KEA6>D>6"
|
||
DATA "=D>6=DB6}0>4?3>2=3P2=1=2HE=6E4>3=1=2FEY6L4>1>2JEE6>D=6>D@6}0>4?3>2=3N2"
|
||
DATA ">1=2GE?6=7D4>3=1=2FE=D=6LD=6>D=6>D=6=D?6=7M4=1>2KEE6=DB6}0>4?3>2=3M2=1"
|
||
DATA "=2FEC6D4>3=1=2FEZ6N4>1=2KEE6>D@6}0>4?3>2=3K2>1=2FE>6>D=6=D>6=7C4>3=1=2"
|
||
DATA "FE=D=6HD=6AD=6=D>6>D=6=D>6=7O4=1>2KEI6}0>4?3>2=3J2=1=2FEG6C4>3=1=2FE[6"
|
||
DATA "P4>1=2KEH6}0=4@3>2=3H2>1=2FEH6=7B4>3=1=2FE>D=6>D=6>DS6=7O4>3=1>2KEF6}0"
|
||
DATA "=4@3>2=3G2=1=2FE>7I6B4>3=1=2FE\6O4?3>1=2LED6}0=4@3>2=3E2>1=2FE?7I6=7A4"
|
||
DATA ">3=1=2FE\6=7N4A3=1>2KEC6}0=4@3>2=3D2=1=2FE?7=D=7=D=6>D?6=DB6A4>3=1=2FE"
|
||
DATA "A6>D=6=D>6=DA6=D=6=D=6>D?6=DB6M4C3=1>3LEA6}0=4@3>2=3B2>1=2EE=D=7?D=7@D"
|
||
DATA "=6=D=6?DA6=7@4>3=1=2FE@6>D=6>D=6?D=6?D=6@D=6=D=6?DA6=7L4D3>1>2KE@6}0=4"
|
||
DATA "@3>2=3A2=1=2FEE7J6@4>3=1=2FE^6L4F3>1>2JE?6}0=4@3>2=3?2>1=2FEF7J6=7?4>3"
|
||
DATA "=1=2DE=C_6=7J4I3>1=2JE>6}0=4@3>2=3>2=1=2FEI7J6?4>3=1=2DE=C`6J4K3=1>2HE"
|
||
DATA ">6}0=4@3>2=3>1=2FEJ7J6=7>4>3=1=2DE=7`6=7I4L3>1=2HE=6}0A3>2>3=2EEL7J6=7"
|
||
DATA ">4>3=1=2DE=7`6=7H4O3=1>2GE}0A3>2=1=3=7cE=7>4>3=1=2CE>7`E=7H4P3>1=2FE}0"
|
||
DATA "A3=2=1>3=7>E=7`E=7>4>3=1=2BE>7aE=7H4R3=1>2DE}0B3=1?3=E=7aE=7>4>3=1=2>3"
|
||
DATA "@E=7bE=7G4T3>1=2CE}0B3=1?3cE=7>4>3=1=2?3=7=E=7cE=7G4V3=1>2AE}0B3=1=2>3"
|
||
DATA "cE=7=2=4>3>1A3dE=7=2F4W3>1=2?E=3}0C3=1?3cE=2=4?3=1=2@3eE=2E4Z3=1@3}0C3"
|
||
DATA "=1>2=3cE>2@3=1=2@3dE>2D4Z3=2>1>3}0E3g2A3=1=2@3e2C4\3>2>1}0p3>4@3=1@2e3"
|
||
DATA "d4>3=2}0r4A3>1C3<43>4}0!O4!e0g5!e0g5!e0g5>FH0>F=0>FF0>F=0>FF0>FG0?FG0>FG0"
|
||
DATA ">FI0>FG0>Fs0g5>FH0>F=0>FF0>F=0>FE0@FE0>F=0>F=0>FB0@FF0>FH0>FI0>FG0@Fc0"
|
||
DATA "g5>FH0>F=0>FE0CFC0BFE0?F=0>FC0@FF0>FH0>FI0>FH0>Fd0g2>FW0>F=0>FD0@FJ0>F"
|
||
DATA "E0>FU0>FI0>FG0@FH0>FU0g2>FW0>F=0>FE0?FI0>FF0>FU0>FI0>FW0>FU0g2>FW0>F=0"
|
||
DATA ">FF0?FG0>FF0BFR0>FI0>FU0BFS0g2>FV0CFE0@FE0>F=0?FC0>F=0>FS0>FI0>FW0>FU0"
|
||
DATA "g5Y0>F=0>FD0BFD0>F=0>F=0>FB0>F=0>FS0>FI0>FW0>FU0g3>FW0>F=0>FE0@FI0?FD0"
|
||
DATA "AFR0>FI0>Fr0g3h0>Fp0>FI0>Fr0g3<67>0>FG0>Fs0g3!e0g3!e0=3=2=3?2=3=2?3=2=3?2"
|
||
DATA "=3=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3!e0?2?3C2?3C2?3C2?3C2i0>FF0@FG0>FG0@F"
|
||
DATA "F0@FH0>FE0BFE0@FT0=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2"
|
||
DATA "=3i0>FE0>F>0>FD0@FF0>F>0>FD0>F>0>FF0?FE0>FH0>F>0>FS0=2C3?2C3?2C3?2C3?2"
|
||
DATA ">3i0>FE0>F>0>FF0>FJ0>FH0>FF0?FE0>FH0>FW0=2C3=2=3=2C3=2=3=2C3=2=3=2C3=2"
|
||
DATA "=3=2>3h0>FF0>F>0>FF0>FJ0>FH0>FE0@FE0AFE0>FW0=2C3?2C3?2C3?2C3?2>3h0>FF0"
|
||
DATA ">F>0>FF0>FI0>FG0?FF0@FE0>F>0>FD0AFT0=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3"
|
||
DATA "=2=3=2A3=2=3=2=3=2=3J0?FV0>FG0>F>0>FF0>FH0>FJ0>FD0>F=0>FI0>FD0>F>0>FS0"
|
||
DATA ">2A3>2=3>2?3=E=7>2=3>2A3>2=3>2A3>2=3>2=3g0>FG0>F>0>FF0>FG0>FK0>FD0BFH0"
|
||
DATA ">FD0>F>0>FS0=3=2A3=2?3=2?3>6=C=E=7=3=2A3=2?3=2A3=2?3=2=3f0>FH0>F>0>FF0"
|
||
DATA ">FF0>FH0>F>0>FG0>FE0>F>0>FD0>F>0>FS0=3?2=3?2?3?2=EA6=C=E=7=2=3?2?3?2=3"
|
||
DATA "?2?3>2=0>FU0>FH0>FI0@FG0>FF0BFE0@FH0>FF0@FF0@FT0J3F6=C=E=7L3>F!c0I3=EI6"
|
||
DATA "=C=E=7I3!e0I3N6=C=E=7E3!e0H3=2@6=DM6=E=7B3!e0H3=EA6?DL6=C=7@3!=0AF_0G3"
|
||
DATA "=2E6>DM6=7>3BFE0@FF0@F<>0@FF0?F?0?FC0>FT0G2=EC6=D?6?DJ6=C=7=2@0>FD0>F>0"
|
||
DATA ">FD0>F>0>F<>0>F>0>FE0>FA0>FC0>FT0G2=E?6=D@6?DO6=7?0>FE0>F>0>FD0>F>0>Fc0"
|
||
DATA ">FS0>FL0>FD0>F>0@F=0>FA0@FS0F2=EA6?D@6@DL6?0>FE0>F>0>FD0>F>0>FD0>FI0>F"
|
||
DATA "I0>FU0>FK0>FD0>F=0>F=0>F=0>FA0@FS0E4=2=E?6=D@6?DA6?DI6>0>FG0@FF0AFa0>F"
|
||
DATA "G0BFF0>FI0>FE0>F=0>F=0>F=0>F@0>F>0>FR0E4=EA6?D@6?DA6?DF6>0>FF0>F>0>FH0"
|
||
DATA ">F`0>FY0>FG0>FF0>F>0CF@0>F>0>FR0E9E6?D@6?DA6?DC6=0>FG0>F>0>FH0>Fa0>FG0"
|
||
DATA "BFF0>FH0>FG0>FH0BFR0D4=2@6=DC6?D@6?DH6=0>FG0>F>0>FD0>F>0>Fb0>FU0>FV0?F"
|
||
DATA "F0>F@0>FQ0D4B6?DC6?D@6?DE6=0>FH0@FF0@FE0>FI0>FJ0>FS0>FJ0>FJ0@FB0>F@0>F"
|
||
DATA "Q0C4=2@6=D@6?DC6?D@6?DB6t0>F<>0C4=EA6?D@6?DC6>DG6!e0B4=2@6=D@6@D?6?DB6?D"
|
||
DATA "D6!e0B4=EA6?DA6?D?6?DB6?DA6!e0A4=2E6@D@6?D?6?DG6!e0A4=EI6?D@6?D?6?DD6AF"
|
||
DATA "F0AFD0AFE0BFD0BFE0AFD0>F?0>FC0>FK0>FE0>F>0>FD0>FW0@4=2?EJ6?D@6?D?6?DA6"
|
||
DATA ">F>0>FD0>F?0>FC0>F>0>FD0>FH0>FH0>F?0>FC0>F?0>FC0>FK0>FE0>F=0>FE0>FW0@4"
|
||
DATA "=7BEJ6?D@6?DD6>F>0>FD0>FH0>F?0>FC0>FH0>FH0>FH0>F?0>FC0>FK0>FE0@FF0>FW0"
|
||
DATA "@4FEQ6?DA6>F>0>FD0>FH0>F?0>FC0>FH0>FH0>FH0>F?0>FC0>FK0>FE0?FG0>FW0?4=2"
|
||
DATA "IEV6AFE0>FH0>F?0>FC0AFE0AFE0>F=0@FC0CFC0>FK0>FE0?FG0>FW0>4=2=7KET6>F>0"
|
||
DATA ">FD0>FH0>F?0>FC0>FH0>FH0>F?0>FC0>F?0>FC0>FK0>FE0@FF0>FW0>4=2OEQ6>F>0>F"
|
||
DATA "D0>FH0>F?0>FC0>FH0>FH0>F?0>FC0>F?0>FC0>FH0>F=0>FE0>F=0>FE0>FW0=4>2REN6"
|
||
DATA ">F>0>FD0>F?0>FC0>F>0>FD0>FH0>FH0>F>0?FC0>F?0>FC0>FH0>F=0>FE0>F>0>FD0>F"
|
||
DATA "W0=4=1@2REK6AFF0AFD0AFE0BFD0>FI0BFC0>F?0>FC0>FI0?FF0>F?0>FC0BFS0>4?1?2"
|
||
DATA "SEH6!e0A4?1@2REE6!e0B4>3?1@2QEC6!e0A4B3?1@2QE@6!e0A4E3?1@2NE@6!e0@4I3?1"
|
||
DATA "@2ME>6>F@0>FB0>F?0>FD0AFD0BFE0AFD0BFE0@FE0BFD0>F?0>FC0>F@0>FB0>FD0>FM0"
|
||
DATA "@4L3?1@2LE>F@0>FB0?F>0>FC0>F?0>FC0>F?0>FC0>F?0>FC0>F?0>FC0>F>0>FF0>FF0"
|
||
DATA ">F?0>FC0>F@0>FB0>FD0>FM0?4P3@1?2IE?F>0?FB0?F>0>FC0>F?0>FC0>F?0>FC0>F?0"
|
||
DATA ">FC0>F?0>FC0>FJ0>FF0>F?0>FD0>F>0>FD0>F>0>F>0>FN0?4T3?1?2FE?F>0?FB0@F=0"
|
||
DATA ">FC0>F?0>FC0>F?0>FC0>F?0>FC0>F?0>FC0>FJ0>FF0>F?0>FD0>F>0>FD0>F>0>F>0>F"
|
||
DATA "N0>4X3?1?2CEDFB0@F=0>FC0>F?0>FC0BFD0>F?0>FC0BFE0@FG0>FF0>F?0>FD0>F>0>F"
|
||
DATA "D0>F>0>F>0>FN0>4[3?1?2>E>3DFB0>F=0@FC0>F?0>FC0>FH0>F?0>FC0>F?0>FG0>FF0"
|
||
DATA ">FF0>F?0>FE0@FF0DFO0=4^3?1>2?3>F=0>F=0>FB0>F>0?FC0>F?0>FC0>FH0>F=0@FC0"
|
||
DATA ">F?0>FG0>FF0>FF0>F?0>FE0@FF0DFO0J4T3>1?3>F=0>F=0>FB0>F>0?FC0>F?0>FC0>F"
|
||
DATA "H0>F>0?FC0>F?0>FC0>F>0>FF0>FF0>F?0>FF0>FH0>F>0>FP0^4A3=2?1>F@0>FB0>F?0"
|
||
DATA ">FD0AFD0>FI0AFD0>F?0>FD0@FG0>FG0AFG0>FH0>F>0>FP0g4y0>F<>0g5!e0g5!e0g5!e0"
|
||
DATA "g5<67>0>F<>0g5>F@0>FB0>F@0>FB0DFB0?FG0>FH0?FH0@FS0>FV0>FW0g2>F@0>FB0>F@0>F"
|
||
DATA "H0>FB0>FH0>FI0>FG0>F>0>FS0>FU0>FW0g2=0>F>0>FD0>F>0>FH0>FC0>FH0>FI0>F0"
|
||
DATA ">FW0g2>0@FF0@FH0>FD0>FI0>FH0>Fr0@FE0AFT0g2?0>FH0>FH0>FE0>FI0>FH0>Fu0>F"
|
||
DATA "D0>F>0>FS0g5>0@FG0>FG0>FF0>FJ0>FG0>Fr0AFD0>F>0>FS0g3=0>F>0>FF0>FF0>FG0"
|
||
DATA ">FJ0>FG0>Fq0>F>0>FD0>F>0>FS0g3>F@0>FE0>FE0>FH0>FK0>FF0>Fq0>F>0>FD0>F>0"
|
||
DATA ">FS0g3>F@0>FE0>FE0DFB0>FK0>FF0>Fr0AFD0AFT0g3f0>FW0>F<>0g3f0?FU0?FU0CF|0"
|
||
DATA "=3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3!e0?2?3C2?3C2?3C2"
|
||
DATA "?3C2!e0=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2=3!e0=2C3?2"
|
||
DATA "C3?2C3?2C3?2>3N0>FS0>FU0>FH0>FH0>FH0>FH0>Fe0=2C3=2=3=2C3=2=3=2C3=2=3=2"
|
||
DATA "C3=2=3=2>3N0>FR0>FV0>Fd0>FH0>Fe0=2C3?2C3?2C3?2C3?2>3N0>FR0>FV0>Fd0>FH0"
|
||
DATA ">Fe0=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2=3=0@FF0AFE0@F"
|
||
DATA "E0?FH0AFD0AFE0>FH0>FH0>F=0>FE0>FH0CFR0>2A3>2=3>2A3>2=3>2A3>2=3>2A3>2=3"
|
||
DATA ">2=3>F>0>FD0>F>0>FD0>F>0>FD0>FH0>F>0>FD0?F=0>FD0>FH0>FH0@FF0>FH0>F=0>F"
|
||
DATA "=0>FQ0=3=2A3=2?3=2A3=2?3=2A3=2?3=2A3=2?3=2=3>FH0>F>0>FD0BFD0>FH0>F>0>F"
|
||
DATA "D0>F>0>FD0>FH0>FH0?FG0>FH0>F=0>F=0>FQ0=3?2=3?2?3?2=3?2?3?2=3?2?3?2=3?2"
|
||
DATA "?3>2>FH0>F>0>FD0>FH0>FH0>F>0>FD0>F>0>FD0>FH0>FH0@FF0>FH0>F=0>F=0>FQ0g3"
|
||
DATA ">F>0>FD0>F>0>FD0>F>0>FD0>FH0>F>0>FD0>F>0>FD0>FH0>FH0>F=0>FE0>FH0>F=0>F"
|
||
DATA "=0>FQ0g3=0@FF0AFE0@FE0>FI0AFD0>F>0>FD0>FH0>FH0>F>0>FD0>FH0>F=0>F=0>FQ0"
|
||
DATA "g3x0>F`0>F<>0g3t0AFa0>F<>0g3!e0K3Q6=C=E=7@3!e0J2=7T6=C=7>2!Q0@5?0C2B0J2X6"
|
||
DATA "=7!Q0@5?0C2B0I2=7?6=D=6=DS6<53>0>F{0@5?0C4B0I4?6=D=6=D=6?D=6>D>6=DJ6<4A>0>F{0"
|
||
DATA "@5?0C4B0H4=7Z6AFF0@FE0AFF0AFD0?FH0?FF0?FG0>F>0>FD0>F>0>FD0>F=0>F=0>FB0"
|
||
DATA ">F=0>F@0@5?0C9B0H9[6?F=0>FD0>F>0>FD0>F>0>FD0>F>0>FD0>FH0>F=0>FE0>FH0>F"
|
||
DATA ">0>FD0>F>0>FD0>F=0>F=0>FB0>F=0>F@0@2?0C4B0G4=7?6MD=6=D=6=D=6=DA6>F>0>F"
|
||
DATA "D0>F>0>FD0>F>0>FD0>F>0>FD0>FI0>FG0>FH0>F>0>FE0@FE0DFC0?FA0@2?0C4B0G4\6"
|
||
DATA ">F>0>FD0>F>0>FD0>F>0>FD0>F>0>FD0>FJ0>FF0>FH0>F>0>FE0@FE0DFC0?FA0@2?0C4"
|
||
DATA "B0F4=7?6ED=6?D=6ED=6=D@6>F>0>FD0>F>0>FD0>F>0>FD0>F>0>FD0>FH0>F=0>FE0>F"
|
||
DATA "H0>F=0?FF0>FG0>F>0>FC0>F=0>F@0@2?0C4B0F4]6>F>0>FE0@FE0AFF0AFD0>FI0?FG0"
|
||
DATA ">FH0AFF0>FG0>F>0>FC0>F=0>F@0@5?0C4B0E4=7?6=D>6=D=6HD=6BD=6=D@6X0>FL0>F"
|
||
DATA "<22>0@3?0C4B0E4^6X0>FL0>F<>0@3?0C4B0D4=7?6=D>6>D=6BD=6>D=6?D=6?DD6!Q0@3?0C4"
|
||
DATA "B0D4_6!Q0@3?0C4B0C4=7_6Z0>FT0>F<>0=7?3?0C4B0C4@6?D=6=D=6?D=6>D=6=D>6>D=6"
|
||
DATA "@D=6=D=6=DA6Y0>FG0>FI0>FU0=7I0=7>0=7G0=7>0=7G0=7H0>7B0=E=2=3=2?0C4B0B4"
|
||
DATA "=7`6Y0>FG0>FI0>FH0?F=0>FC0=7I0=7>0=7G0=7>0=7F0?7F0=7>0=7>0=7>0=6>2=3?0"
|
||
DATA "C4B0B4@6=D=6ED=6>D=6@D>6ADC6Y0>FG0>FI0>FG0>F=0?FD0=7I0=7>0=7F0B7D0=7=0"
|
||
DATA "=7=0=7F0>7>0=7?0=6=7>3?0C4B0A4=7a6=0>F=0>FD0AFF0>FG0>FI0>FU0=7X0=7>0=7"
|
||
DATA "E0=7=0=7K0=7@0=6=E>3?0C4B0A4@6=D=6@D=6=D>6=D>6?DN6=0>F=0>FG0>FE0>FH0>F"
|
||
DATA "J0>FT0=7X0=7>0=7F0>7J0=7A0>6>3?0C4B0@4=7b6=0>F=0>FF0>FG0>FG0>FI0>FU0=7"
|
||
DATA "X0=7>0=7G0>7H0=7B0>6=7=3?0C4B0@4c6=0>F=0>FE0>FH0>FG0>FI0>FU0=7W0B7F0=7"
|
||
DATA "=0=7F0=7>0>7?0=D>6=3?0C4B0?4=7c6>0?FE0>FI0>FG0>FI0>Fr0=7>0=7E0=7=0=7=0"
|
||
DATA "=7E0=7>0=7>0=7>0=D>6=2?0C4B0?4d6>0>FF0AFF0>FG0>FI0>FU0=7X0=7>0=7F0?7J0"
|
||
DATA ">7?0=6=D=6=7?0C4B0>4=7d6>0>FV0>FF0>FH0>F<>0=7P0=D>6=7?0B4=3B0>4=7d6?F!N0"
|
||
DATA "=D>6=E?0B4=3B0>4=7_EA6!Q0=6=D=6=E?0B4=3B0>4=7bE>6!Q0=6=D=6=E?0B4=3B0>4"
|
||
DATA "=7dE!Q0@6?0B4=3B0>4=7dE=0=7H0=7J0=7H0=7<>0=7G0?7A0=D?6?0B4=3B0=4=2=7dE=7"
|
||
DATA "=0=7G0=7I0=7J0=7H0=7=0=7<>0=7F0=7?0=7@0=D?6?0B4=3B0=4=2eE=7=0=7G0=7I0=7"
|
||
DATA "J0=7I0=7<>0=7F0=7?0=7@0=6=D>6?0B4=3B0>2cE>3=0=7V0=7J0=7H0=7=0=7I0=7s0=7"
|
||
DATA "G0=7?0=7@0=D?6?0B4=3B0c2@3=0=7V0=7J0=7X0=7s0=7G0=7?0=7@0=6=D>6?0B4=3B0"
|
||
DATA "=4c2?3=7=0=7=0=7S0=7J0=7V0A7S0>7W0=7H0=7?0=7@0=D?6?0C4B0`4C2=7>0=7T0=7"
|
||
DATA "J0=7X0=7r0=7H0=7?0=7@0=D?6?0C4B0g4=7>0=7T0=7J0=7X0=7q0=7I0=7?0=7@0=6=D"
|
||
DATA ">6?0C5B0g5=0>7=0=7S0=7J0=7e0=7V0=7I0=7J0?7A0=6=D>6?0C5B0g5X0=7J0=7d0=7"
|
||
DATA "|0@6?0C5B0g5Y0=7H0=7<>0@6?0C5B0g5!Q0@6?0C5B0g5!Q0@6?0C2B0g2!Q0@6?0C2B0g2"
|
||
DATA ">0=7H0?7G0?7I0=7F0A7F0?7F0A7F0?7G0?7]0@6?0C2B0g2?7G0=7?0=7E0=7?0=7G0>7"
|
||
DATA "F0=7I0=7?0=7I0=7E0=7?0=7E0=7?0=7\0@6?0C2B0g2>0=7K0=7I0=7G0>7F0=7I0=7L0"
|
||
DATA "=7F0=7?0=7E0=7?0=7\0@6?0C5B0g5>0=7K0=7I0=7F0=7=0=7F0@7F0=7L0=7F0=7?0=7"
|
||
DATA "E0=7?0=7E0=7J0=7C0=E?6?0C3B0g3>0=7J0=7H0>7G0=7=0=7F0=7?0=7E0@7H0=7H0?7"
|
||
DATA "G0@7\0=E?6?0C3B0g3>0=7I0=7K0=7E0=7>0=7J0=7E0=7?0=7G0=7G0=7?0=7I0=7\0=E"
|
||
DATA "?6?0C3B0g3>0=7H0=7L0=7E0A7I0=7E0=7?0=7F0=7H0=7?0=7I0=7\0>E>6?0C3B0g3>0"
|
||
DATA "=7G0=7I0=7?0=7H0=7F0=7?0=7E0=7?0=7F0=7H0=7?0=7E0=7?0=7\0?E=6?0C3B0g3>0"
|
||
DATA "=7G0A7F0?7I0=7G0?7G0?7G0=7I0?7G0?7F0=7J0=7C0?E=6?0>3=2=3?2B0=3=2=3?2=3"
|
||
DATA "=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3!H0=7D0?E=6?0@2?3B0?2?3C2?3"
|
||
DATA "C2?3C2?3C2!Q0@E?0=2=3=2@3B0=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2"
|
||
DATA "=3=2=3=2=3!Q0@E?0>2A3B0=2C3?2C3?2C3?2C3?2>3!Q0@E?0=3=2A3B0=2C3=2=3=2C3"
|
||
DATA "=2=3=2C3=2=3=2C3=2=3=2>3!Q0@E?0>2A3B0=2C3?2C3?2C3?2C3?2>3g0?7I0@7F0=7F0"
|
||
DATA "@7G0@7E0@7F0A7E0A7@0@E?0=2=3=2@3B0=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2"
|
||
DATA "=3=2A3=2=3=2=3=2=3f0=7?0=7F0>7@0>7D0=7F0=7?0=7E0=7@0=7D0=7?0=7E0=7I0=7"
|
||
DATA "D0@E?0=3>2@3B0>2A3>2=3>2A3>2=3>2A3>2=3>2A3>2=3>2=3?0=7T0=7M0=7F0=7B0=7"
|
||
DATA "C0=7=0=7E0=7?0=7E0=7I0=7@0=7D0=7I0=7D0@E?0>3=2@3B0=3=2A3=2?3=2A3=2?3=2"
|
||
DATA "A3=2?3=2A3=2?3=2=3>0=7V0=7L0=7E0=7?0?7>0=7B0=7=0=7E0=7?0=7E0=7I0=7@0=7"
|
||
DATA "D0=7I0=7D0=3?E?0>3?2=3=2B0=3?2=3?2?3?2=3?2?3?2=3?2?3?2=3?2?3>2=0=7H0A7"
|
||
DATA "G0=7J0=7F0=7>0=7>0=7>0=7A0=7?0=7D0@7F0=7I0=7@0=7D0@7F0@7A0@3?0C3B0g3=7"
|
||
DATA "Z0=7H0=7G0=7>0=7>0=7>0=7A0=7?0=7D0=7?0=7E0=7I0=7@0=7D0=7I0=7D0=2?3?0C3"
|
||
DATA "B0g3=0=7H0A7G0=7I0=7G0=7?0>7=0?7A0A7D0=7?0=7E0=7I0=7@0=7D0=7I0=7D0=1=2"
|
||
DATA ">3?0C3B0g3>0=7V0=7W0=7H0=7A0=7C0=7?0=7E0=7@0=7D0=7?0=7E0=7I0=7D0=3=1>2"
|
||
DATA "?0C3B0g3?0=7T0=7K0=7H0>7G0=7A0=7C0@7G0@7E0@7F0A7E0=7D0=4?3?0C3B0g3w0A7"
|
||
DATA "<22>0?4=3?0C3B0K3Q6=C=E=7@3!Q0@4?0C2B0J2=7T6=C=7>2!Q0@5?0C2B0J2X6=7!Q0@5?0"
|
||
DATA "C2B0I2=7?6=D=6=DS6!Q0@5?0C4B0I4?6=D=6=D=6?D=6>D>6=DJ6=0@7E0=7@0=7D0=7L0"
|
||
DATA "=7F0=7?0=7E0=7I0=7A0=7C0=7@0=7E0@7E0A7F0@7@0@5?0C4B0H4=7Z6=7@0=7D0=7@0"
|
||
DATA "=7D0=7L0=7F0=7>0=7F0=7I0=7A0=7C0>7?0=7D0=7@0=7D0=7@0=7D0=7@0=7?0@5?0C9"
|
||
DATA "B0H9[6=7I0=7@0=7D0=7L0=7F0=7=0=7G0=7I0>7?0>7C0>7?0=7D0=7@0=7D0=7@0=7D0"
|
||
DATA "=7@0=7?0@2?0?4@3B0G4=7?6MD=6=D=6=D=6=DA6=7I0=7@0=7D0=7L0=7F0>7H0=7I0>7"
|
||
DATA "?0>7C0=7=0=7>0=7D0=7@0=7D0=7@0=7D0=7@0=7?0@2?0?4@3B0G4\6=7>0?7D0B7D0=7"
|
||
DATA "L0=7F0>7H0=7I0=7=0=7=0=7=0=7C0=7=0=7>0=7D0=7@0=7D0A7E0=7@0=7?0@2?0?4@3"
|
||
DATA "B0F4=7?6ED=6?D=6ED=6=D@6=7@0=7D0=7@0=7D0=7L0=7F0=7=0=7G0=7I0=7=0=7=0=7"
|
||
DATA "=0=7C0=7>0=7=0=7D0=7@0=7D0=7I0=7@0=7?0@2?0?4@3B0F4]6=7@0=7D0=7@0=7D0=7"
|
||
DATA "I0=7>0=7F0=7>0=7F0=7I0=7>0=7>0=7C0=7?0>7D0=7@0=7D0=7I0=7>0=7=0=7?0@5?0"
|
||
DATA "?4@3B0E4=7?6=D>6=D=6HD=6BD=6=D@6=7?0>7D0=7@0=7D0=7I0=7>0=7F0=7?0=7E0=7"
|
||
DATA "I0=7>0=7>0=7C0=7?0>7D0=7@0=7D0=7I0=7?0>7?0@3?0?4@3B0E4^6=0?7=0=7D0=7@0"
|
||
DATA "=7D0=7J0>7G0=7@0=7D0A7E0=7A0=7C0=7@0=7E0@7E0=7J0@7@0@3?0?4@3B0D4=7?6=D"
|
||
DATA ">6>D=6BD=6>D=6?D=6?DD6!M0=7?0@3?0>4A3B0D4_6!Q0@3?0>4A3B0C4=7_6!Q0@3?0>4"
|
||
DATA "A3B0C4@6?D=6=D=6?D=6>D=6=D>6>D=6@D=6=D=6=DA6!Q0=3=2=3=2?0>4A3B0B4=7`6!Q0"
|
||
DATA "?2=3?0>4A3B0B4@6=D=6ED=6>D=6@D>6ADC6A7F0?7F0A7E0=7@0=7D0=7A0=7C0=7E0=7"
|
||
DATA "?0=7A0=7C0=7A0=7C0C7C0>7H0=7D0=3=2>3?0>4A3B0A4=7a6=7@0=7D0=7?0=7G0=7G0"
|
||
DATA "=7@0=7D0=7A0=7C0=7E0=7?0=7A0=7C0=7A0=7I0=7C0=7I0=7D0=2?3?0>4A3B0A4@6=D"
|
||
DATA "=6@D=6=D>6=D>6?DN6=7@0=7D0=7K0=7G0=7@0=7E0=7?0=7E0=7?0=7?0=7A0=7?0=7E0"
|
||
DATA "=7?0=7I0=7D0=7I0=7D0=2?3?0>4A3B0@4=7b6=7@0=7D0=7K0=7G0=7@0=7E0=7?0=7E0"
|
||
DATA "=7?0=7?0=7B0=7=0=7G0=7=0=7I0=7E0=7J0=7C0=2?3?0=4B3B0@4c6A7F0?7H0=7G0=7"
|
||
DATA "@0=7E0=7?0=7E0=7?0=7?0=7C0=7I0=7I0=7F0=7J0=7C0=3=2>3?0=4B3B0?4=7c6=7@0"
|
||
DATA "=7H0=7G0=7G0=7@0=7F0=7=0=7G0=7=0=7=0=7=0=7C0=7=0=7H0=7H0=7G0=7K0=7B0>2"
|
||
DATA ">3?0=4B3B0?4d6=7@0=7H0=7G0=7G0=7@0=7F0=7=0=7G0=7=0=7=0=7=0=7B0=7?0=7G0"
|
||
DATA "=7G0=7H0=7K0=7B0=3=2>3?0=4B3B0>4=7d6=7@0=7D0=7?0=7G0=7G0=7@0=7G0=7I0=7"
|
||
DATA "?0=7B0=7A0=7F0=7F0=7I0=7L0=7A0=3?2?0=4B3B0>4=7d6=7@0=7E0?7H0=7H0@7H0=7"
|
||
DATA "I0=7?0=7B0=7A0=7F0=7F0C7C0=7L0=7A0@3?0=4B3B0>4=7_EA6<41>0=7R0@3?0=4B3B0>4"
|
||
DATA "=7bE>6<>0>7Q0@3?0=4B3B0>4=7dE!Q0=E?3?0C3B0>4=7dE!Q0=E=7>3?0C3B0=4=2=7dE"
|
||
DATA "L0=7!@0=6=E>3?0C3B0=4=2eE>7I0=7=0=7T0=7W0=7[0=7T0=7Q0>6=7=2?0C3B0>2cE>3"
|
||
DATA "=0=7H0=7?0=7T0=7V0=7[0=7S0=7R0>6=E=2?0C3B0c2@3=0=7<>0=7[0=7S0=7R0>6=E=7"
|
||
DATA "?0C4B0=4c2?3=0=7s0?7F0@7G0?7G0@7F0?7F0>7I0@7@0>6=E=7?0C4B0`4C2=0=7v0=7"
|
||
DATA "E0=7?0=7E0=7?0=7E0=7?0=7E0=7?0=7E0=7I0=7?0=7@0?6=7?0C4B0g4=0=7s0@7E0=7"
|
||
DATA "?0=7E0=7I0=7?0=7E0A7E0=7I0=7?0=7@0?6=7x0=7r0=7?0=7E0=7?0=7E0=7I0=7?0=7"
|
||
DATA "E0=7I0=7I0=7?0=7@0?6=7x0=7r0=7?0=7E0=7?0=7E0=7?0=7E0=7?0=7E0=7?0=7E0=7"
|
||
DATA "I0=7?0=7@0?6=7?0j5G0=7s0@7E0@7G0?7G0@7F0?7F0=7J0@7@0?6=7?0j5G0=7!J0=7@0"
|
||
DATA "?6=7?0j5F0>7V0B7<42>0@7A0?6=7?0j5![0?6=7?0j5![0?6=7?0j2![0?6=7?0j2F0=7I0=7"
|
||
DATA "I0=7I0=7I0=7<>0?6=7?0j2F0=7e0=7I0=7<>0?6=7?0j2F0=7e0=7I0=7<>0?6=7?0j5F0=7"
|
||
DATA "=0>7F0=7I0=7I0=7>0=7F0=7I0?7=0>7D0=7=0>7G0?7F0@7G0@7E0>7C0?6=7?0j3F0>7"
|
||
DATA ">0=7E0=7I0=7I0=7=0=7G0=7I0=7>0=7>0=7C0>7>0=7E0=7?0=7E0=7?0=7E0=7?0=7E0"
|
||
DATA "=7D0?6=7?0j3F0=7?0=7E0=7I0=7I0>7H0=7I0=7>0=7>0=7C0=7?0=7E0=7?0=7E0=7?0"
|
||
DATA "=7E0=7?0=7E0=7D0=E>6=7?0j3F0=7?0=7E0=7I0=7I0=7=0=7G0=7I0=7>0=7>0=7C0=7"
|
||
DATA "?0=7E0=7?0=7E0=7?0=7E0=7?0=7E0=7D0>E=6=7?0j3F0=7?0=7E0=7I0=7I0=7>0=7F0"
|
||
DATA "=7I0=7>0=7>0=7C0=7?0=7E0=7?0=7E0=7?0=7E0=7?0=7E0=7D0>E=6=7?0j3F0=7?0=7"
|
||
DATA "E0=7I0=7I0=7?0=7E0=7I0=7>0=7>0=7C0=7?0=7F0?7F0@7G0@7E0=7D0?E=7?0?2=3=2"
|
||
DATA "?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2?3=2=3?2=3=2=3b0=7<>0=7M0=7N0?E=7?0"
|
||
DATA "?3C2?3C2?3C2?3C2?3?2b0=7<>0=7M0=7N0?E=7?0@3=2=3=2=3=2A3=2=3=2=3=2A3=2=3"
|
||
DATA "=2=3=2A3=2=3=2=3=2A3=2=3![0?E=7?0A3?2C3?2C3?2C3?2C3=2![0?E=7?0A3=2=3=2"
|
||
DATA "C3=2=3=2C3=2=3=2C3=2=3=2C3=2<>0=7U0=7D0?E=7?0A3?2C3?2C3?2C3?2C3=2<>0=7H0"
|
||
DATA "=7J0=7C0?E=7?0@3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3=2=3=2A3=2=3T0"
|
||
DATA "=7<>0=7H0=7J0=7C0?E=7?0@3>2=3>2A3>2=3>2A3>2=3>2A3>2=3>2A3>2T0=7<>0=7H0=7"
|
||
DATA "J0=7C0=E>3=7?0@3=2?3=2A3=2?3=2A3=2?3=2A3=2?3=2A3=2=3G0>7G0>7H0=7?0=7E0"
|
||
DATA "=7?0=7E0=7>0=7>0=7C0=7>0=7G0=7>0=7E0@7G0=7H0=7J0=7C0=2?3?0=2=3?2?3?2=3"
|
||
DATA "?2?3?2=3?2?3?2=3?2?3?2=3?2=3F0=7>0=7F0=7I0=7?0=7E0=7?0=7E0=7>0=7>0=7C0"
|
||
DATA "=7>0=7G0=7>0=7H0=7F0=7I0=7K0=7B0>2>3?0j3G0=7H0=7I0=7?0=7F0=7=0=7F0=7=0"
|
||
DATA "=7=0=7=0=7D0>7H0=7>0=7G0=7H0=7H0=7J0=7C0>1>3?0j3H0=7G0=7I0=7?0=7F0=7=0"
|
||
DATA "=7F0=7=0=7=0=7=0=7D0>7H0=7>0=7F0=7I0=7H0=7J0=7C0@3?0j3F0=7>0=7F0=7I0=7"
|
||
DATA ">0>7G0=7H0=7?0=7D0=7>0=7H0>7F0=7J0=7H0=7J0=7C0@3?0j3G0>7H0=7I0>7=0=7G0"
|
||
DATA "=7H0=7?0=7D0=7>0=7H0=7G0@7G0=7H0=7J0=7C0@4?0j3<6A>0=7W0=7G0=7I0=7K0A3=7=E"
|
||
DATA "S6L3<4C>0>7<>0?2=7V6=7K2!b0=2=7>E>6?D=6@D=6=D=6=D=6=D=6CD?6K2!b0=7?E=6=DU6"
|
||
DATA "=7I2=5!b0=7?E>6@D>6?D=6?D=6>D>6>D=6?D>6J4T0?8G0?8E0=8E0=8C0?8G0?8A0=8F0"
|
||
DATA "?8=0=8G0=8?0?8A0=8A0=8>0=8W0=7=E=C=EX6=7I4G0>7>0=7D0=8=0=8G0=8=0=8E0=8"
|
||
DATA "E0=8C0=8=0=8G0=8=0=8A0=8F0=8K0=8?0=8=0=8A0=8A0=8>0=8W0=7>C=E>6>D=6>D=6"
|
||
DATA "=D?6GD=6=D=6=D>6I9F0=7>0>7E0=8=0=8=0=8=0=8=0?8?0=8?0?8=0?8=0>8=0>8=0?8"
|
||
DATA "=0=8=0?8?0=8=0=8=0?8=0?8?0=8?0?8=0=8=0?8=0>8?0=8?0=8=0=8=0=8=0?8=0?8?0"
|
||
DATA "=8=0=8=0?8=0=8=0?8=0>8=0>8=0?8R0=7>C=E=6=DW6=7H4T0>8>0=8=0=8=0=8=0=8?0"
|
||
DATA "=8?0=8=0=8=0=8=0=8=0=8>0=8>0=8=0=8=0=8=0=8A0?8=0=8=0=8=0=8=0=8?0=8?0=8"
|
||
DATA "=0=8=0=8=0=8=0=8=0=8@0>8>0=8=0=8=0=8=0=8=0=8=0=8=0=8?0?8?0=8=0=8=0=8=0"
|
||
DATA "=8=0=8>0=8>0=8=0=8R0=7>C=E>6?D=6>D=6>DO6H4T0=8=0=8=0=8=0=8=0=8=0=8?0=8"
|
||
DATA "?0=8=0=8=0=8=0=8=0=8>0=8>0=8=0=8=0=8=0?8?0=8?0?8=0=8=0=8?0=8?0=8=0=8=0"
|
||
DATA "=8=0=8=0=8=0=8@0=8?0=8>0=8>0?8=0=8=0=8?0=8?0?8=0=8=0?8=0=8>0=8>0?8R0=7"
|
||
DATA ">C=E=6=DX6=7G4T0=8=0=8=0=8=0=8=0=8=0=8?0=8=0=8=0=8=0=8=0=8=0=8=0=8>0=8"
|
||
DATA ">0=8=0=8=0=8?0=8?0=8?0=8?0=8=0=8?0=8=0=8=0=8=0=8=0=8=0=8=0=8=0=8@0=8?0"
|
||
DATA "=8=0=8=0=8=0=8?0=8=0=8?0=8?0=8=0=8=0=8=0=8?0=8>0=8>0=8T0=7>C=E[6G4T0=8"
|
||
DATA "=0=8=0?8=0=8=0=8?0?8=0?8=0=8=0=8=0>8=0=8>0?8=0=8=0?8?0=8?0?8=0=8=0=8?0"
|
||
DATA "?8=0?8=0=8=0?8=0=8@0=8?0=8=0=8=0=8=0?8=0?8?0=8?0?8=0=8=0?8=0>8=0>8=0?8"
|
||
DATA "R0=7>C=E>6CD=6@D>6>D>6>D=6>D=6?D>6=7F4!b0=7>C=E=6=DZ6F4!b0=7>C=E?6=D=6"
|
||
DATA "LD=6>D=6>D=6=D?6=7E4T0?8=0=8S0=8?0=8C0>8K0=8H0>8J0?8J0=8=0=8E0=8V0=7>C"
|
||
DATA "=E]6E4T0=8=0=8=0=8S0=8?0=8C0=8=0=8V0=8=0=8J0=8=0=8J0=8G0=8V0=7>C=E>6>D"
|
||
DATA "=6HD=6AD=6=D>6>D=6=D>6=7D4T0=8?0?8=0?8=0?8=0?8=0?8=0?8=0?8=0=8=0?8?0=8"
|
||
DATA "=0=8=0>8=0?8=0=8=0=8=0=8=0=8=0?8=0?8?0=8=0=8=0>8=0?8=0?8?0=8?0?8=0?8=0"
|
||
DATA ">8=0?8=0=8=0?8=0?8=0>8=0?8=0?8M0=7>C=E^6D4T0=8?0=8=0=8?0=8=0=8=0=8=0=8"
|
||
DATA "=0=8=0=8=0=8?0=8=0=8=0=8=0=8=0=8=0=8?0=8=0=8=0=8@0=8=0=8=0=8=0=8=0=8=0"
|
||
DATA "=8=0=8=0=8=0=8?0?8=0=8>0=8=0=8?0=8?0=8?0=8=0=8=0=8=0=8=0=8>0=8=0=8=0=8"
|
||
DATA "=0=8=0=8?0=8=0=8>0=8=0=8=0=8O0=7>C=E?6>D=6>D=6>DS6=7C4T0=8?0=8=0=8=0?8"
|
||
DATA "=0=8=0=8=0=8=0=8=0?8=0?8=0=8=0=8=0=8=0?8?0=8=0=8=0=8>0?8=0=8=0=8=0=8=0"
|
||
DATA "=8=0=8=0=8=0=8=0=8?0=8=0=8=0=8>0?8=0?8?0=8?0=8=0=8=0=8=0=8=0=8>0=8=0=8"
|
||
DATA "=0=8=0=8=0=8=0?8=0=8>0?8=0?8M0=7>C=E>6=D\6C4T0=8=0=8=0=8=0=8=0=8=0=8=0"
|
||
DATA "=8=0=8=0=8=0=8=0=8?0=8=0=8=0=8=0=8=0=8=0=8A0=8=0=8=0=8>0=8=0=8=0=8=0=8"
|
||
DATA "=0=8=0=8=0=8=0=8=0=8=0=8?0=8=0=8=0=8>0=8?0=8=0=8?0=8=0=8=0=8=0=8=0=8=0"
|
||
DATA "=8=0=8>0=8=0=8=0=8=0=8=0=8=0=8=0=8=0=8>0=8A0=8M0=7>C=E_6=7B4T0?8=0=8=0"
|
||
DATA "=8=0?8=0=8=0=8=0?8=0?8=0?8=0?8=0=8=0?8?0>8>0=8>0?8>0=8=0=8>0=8=0=8=0=8"
|
||
DATA "=0?8?0=8=0=8=0=8>0?8=0?8?0?8=0?8=0?8=0=8>0?8=0=8=0=8=0=8=0?8=0>8=0?8=0"
|
||
DATA "?8M0=7>C=ED6>D=6=D>6=DA6=D=6=D=6>D?6=DB6B4f0=8j0=8<>0=7>C>EB6>D=6>D=6?D"
|
||
DATA "=6?D=6@D=6=D=6?DA6=7A4d0>8i0>8<>0=7>C>E`6A4T0?8C0=8E0?8C0?8C0=8=0=8C0?8"
|
||
DATA "C0?8C0?8C0?8C0?8m0=7>C>E`6=7@4T0=8=0=8C0=8G0=8E0=8C0=8=0=8C0=8E0=8G0=8"
|
||
DATA "C0=8=0=8C0=8=0=8m0=7>C>Ea6@4T0=8=0=8C0=8G0=8E0=8C0=8=0=8C0=8E0=8G0=8C0"
|
||
DATA "=8=0=8C0=8=0=8m0=7=E=C>Ea6=7?4T0=8=0=8C0=8E0?8C0?8C0?8C0?8C0?8D0=8D0?8"
|
||
DATA "C0?8m0=7=E=C>Ea6=7?4T0=8=0=8C0=8E0=8G0=8E0=8E0=8C0=8=0=8D0=8D0=8=0=8E0"
|
||
DATA "=8m0=7=E=C>E=6`E=7?4T0=8=0=8C0=8E0=8G0=8E0=8E0=8C0=8=0=8D0=8D0=8=0=8E0"
|
||
DATA "=8m0=7eE=7?4T0?8C0=8E0?8C0?8E0=8C0?8C0?8D0=8D0?8C0?8m0=7eE=7?4!b0=7eE=7"
|
||
DATA "?4!b0=7eE=7=2>4!b0=3fE=2>4!b0?3dE>2=4!b0B3c2=4!b0=3A2c3=4!b0E3a4!b0j4#1B2#0"
|
||
|
||
SUB DrawBOX (x, y, xx, yy, FlipFLOP)
|
||
Colr1 = 15: Colr2 = 8
|
||
IF FlipFLOP THEN Colr1 = 8: Colr2 = 15
|
||
LINE (x, y)-(xx, yy), 7, BF
|
||
LINE (x, y)-(xx, yy), Colr1, B
|
||
LINE (xx, y)-(xx, yy), Colr2
|
||
LINE (x, yy)-(xx, yy), Colr2
|
||
END SUB
|
||
|
||
SUB Interval (Length!)
|
||
StartTIME! = TIMER
|
||
DO
|
||
IF TIMER < StartTIME! THEN EXIT DO
|
||
LOOP WHILE TIMER < StartTIME! + Length!
|
||
END SUB
|
||
|
||
SUB PrintSTRING (x, y, Prnt$, Font)
|
||
|
||
Offset = Font * 4700 '3 fonts in 1 array with 4700 offset
|
||
FOR n = 1 TO LEN(Prnt$)
|
||
Char$ = MID$(Prnt$, n, 1)
|
||
IF Char$ = " " OR Char$ = CHR$(255) THEN
|
||
x = x + 3'FontBOX(Offset + 1)
|
||
ELSE
|
||
Index = (ASC(Char$) - 33) * FontBOX(Offset) + 2 + Offset
|
||
PUT (x, y), FontBOX(Index)
|
||
x = x + FontBOX(Index)
|
||
END IF
|
||
NEXT n
|
||
|
||
END SUB
|