/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / demos / hdface / !PeterC / SetMode

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 24 f4 20 3e 73 | 65 74 4d 6f 64 65 2c 73 |...$. >s|etMode,s|
|00000010| 65 74 50 61 6c 2c 73 65 | 74 44 69 72 20 6c 69 62 |etPal,se|tDir lib|
|00000020| 72 61 72 79 0d 00 14 0f | f4 20 a9 20 41 72 6d 4f |rary....|. . ArmO|
|00000030| 72 69 63 0d 00 15 04 0d | 00 1e 24 85 20 a2 20 30 |ric.....|..$. . 0|
|00000040| 2c 22 54 68 69 73 20 69 | 73 20 6f 6e 6c 79 20 61 |,"This i|s only a|
|00000050| 20 6c 69 62 72 61 72 79 | 20 21 22 0d 00 28 04 0d | library| !"..(..|
|00000060| 00 32 05 e0 0d 00 3c 05 | 3a 0d 00 46 15 dd 20 f2 |.2....<.|:..F.. .|
|00000070| 73 65 74 4d 6f 64 65 28 | 58 2c 59 2c 43 29 0d 00 |setMode(|X,Y,C)..|
|00000080| 50 17 20 f2 5f 73 65 74 | 4d 6f 64 65 28 58 2c 59 |P. ._set|Mode(X,Y|
|00000090| 2c 43 2c 32 29 0d 00 5a | 05 e1 0d 00 64 05 3a 0d |,C,2)..Z|....d.:.|
|000000a0| 00 6e 16 dd 20 f2 73 65 | 74 4d 6f 64 65 31 28 58 |.n.. .se|tMode1(X|
|000000b0| 2c 59 2c 43 29 0d 00 78 | 17 20 f2 5f 73 65 74 4d |,Y,C)..x|. ._setM|
|000000c0| 6f 64 65 28 58 2c 59 2c | 43 2c 31 29 0d 00 82 05 |ode(X,Y,|C,1)....|
|000000d0| e1 0d 00 8c 05 3a 0d 00 | 96 18 dd 20 f2 5f 73 65 |.....:..|... ._se|
|000000e0| 74 4d 6f 64 65 28 58 2c | 59 2c 43 2c 4e 29 0d 00 |tMode(X,|Y,C,N)..|
|000000f0| a0 15 20 ea 20 42 4c 4b | 2c 50 25 2c 4d 44 2c 5a |.. . BLK|,P%,MD,Z|
|00000100| 2c 43 24 0d 00 aa 04 0d | 00 b4 0c de 20 42 4c 4b |,C$.....|.... BLK|
|00000110| 20 34 30 0d 00 be 04 0d | 00 c8 20 50 25 3d 42 4c | 40.....|.. P%=BL|
|00000120| 4b 3a 5a 3d a4 64 61 74 | 61 4d 6f 64 65 28 58 2c |K:Z=.dat|aMode(X,|
|00000130| 59 2c 43 2c 43 24 29 0d | 00 d2 04 0d 00 dc 08 4d |Y,C,C$).|.......M|
|00000140| 44 3d eb 0d 00 f0 29 20 | 20 c8 96 3a c8 99 20 22 |D=....) | ..:.. "|
|00000150| 58 4f 53 5f 53 63 72 65 | 65 6e 4d 6f 64 65 22 2c |XOS_Scre|enMode",|
|00000160| 30 2c 42 4c 4b 20 b8 20 | 3b 56 3a 87 0d 00 fa 3a |0,BLK . |;V:....:|
|00000170| 20 20 e7 20 56 20 80 20 | 31 20 8c 20 85 20 a2 20 |  . V . |1 . . . |
|00000180| 30 2c 22 43 6f 75 6c 64 | 6e 27 74 20 67 65 74 20 |0,"Could|n't get |
|00000190| 61 20 22 2b 43 24 2b 22 | 20 73 63 72 65 65 6e 20 |a "+C$+"| screen |
|000001a0| 6d 6f 64 65 2e 22 0d 01 | 22 1d 21 42 4c 4b 3d 37 |mode."..|".!BLK=7|
|000001b0| 3a 42 4c 4b 21 34 3d 31 | 35 30 3a 42 4c 4b 21 38 |:BLK!4=1|50:BLK!8|
|000001c0| 3d 2d 31 0d 01 2c 24 c8 | 99 20 22 4f 53 5f 52 65 |=-1..,$.|. "OS_Re|
|000001d0| 61 64 56 64 75 56 61 72 | 69 61 62 6c 65 73 22 2c |adVduVar|iables",|
|000001e0| 42 4c 4b 2c 42 4c 4b 0d | 01 36 0d e7 20 28 4e 3e |BLK,BLK.|.6.. (N>|
|000001f0| 31 29 20 8c 0d 01 40 17 | 20 e7 20 28 42 4c 4b 21 |1) ...@.| . (BLK!|
|00000200| 34 3c 32 2a 21 42 4c 4b | 29 20 8c 0d 01 4a 34 20 |4<2*!BLK|) ...J4 |
|00000210| 20 c8 99 20 22 58 4f 53 | 5f 43 68 61 6e 67 65 44 | .. "XOS|_ChangeD|
|00000220| 79 6e 61 6d 69 63 41 72 | 65 61 22 2c 32 2c 4e 2a |ynamicAr|ea",2,N*|
|00000230| 21 42 4c 4b 2d 42 4c 4b | 21 34 20 b8 20 3b 56 0d |!BLK-BLK|!4 . ;V.|
|00000240| 01 54 4c 20 20 e7 20 56 | 20 80 20 31 20 8c 20 85 |.TL  . V| . 1 . .|
|00000250| 20 a2 20 30 2c 22 4e 6f | 74 20 65 6e 6f 75 67 68 | . 0,"No|t enough|
|00000260| 20 6d 65 6d 6f 72 79 20 | 74 6f 20 67 65 74 20 22 | memory |to get "|
|00000270| 2b c3 4e 2b 22 20 22 2b | 43 24 2b 22 20 73 63 72 |+.N+" "+|C$+" scr|
|00000280| 65 65 6e 20 6d 6f 64 65 | 73 2e 22 0d 01 5e 06 20 |een mode|s."..^. |
|00000290| cd 0d 01 68 0e 20 e3 20 | 49 3d 32 20 b8 20 4e 0d |...h. . |I=2 . N.|
|000002a0| 01 72 1a 20 20 c8 99 20 | 22 4f 53 5f 42 79 74 65 |.r.  .. |"OS_Byte|
|000002b0| 22 2c 26 37 30 2c 49 3a | db 0d 01 7c 08 20 ed 20 |",&70,I:|...|. . |
|000002c0| 49 0d 01 86 17 20 c8 99 | 20 22 4f 53 5f 42 79 74 |I.... ..| "OS_Byt|
|000002d0| 65 22 2c 26 37 30 2c 31 | 0d 01 90 05 cd 0d 01 9a |e",&70,1|........|
|000002e0| 05 e1 0d 01 a4 05 3a 0d | 01 ae 1b dd 20 a4 64 61 |......:.|.... .da|
|000002f0| 74 61 4d 6f 64 65 28 58 | 2c 59 2c 43 2c f8 20 43 |taMode(X|,Y,C,. C|
|00000300| 24 29 0d 01 b8 0a 20 ea | 20 42 4c 4b 0d 01 c2 0b |$).... .| BLK....|
|00000310| 20 42 4c 4b 3d 50 25 0d | 01 cc 10 5b 20 20 20 20 | BLK=P%.|...[    |
|00000320| 20 20 4f 50 54 20 32 0d | 01 d6 1d 20 20 20 20 20 |  OPT 2.|...     |
|00000330| 20 20 20 44 43 44 20 31 | 3a 44 43 44 20 58 3a 44 |   DCD 1|:DCD X:D|
|00000340| 43 44 20 59 0d 01 e0 24 | 20 20 20 20 20 20 20 20 |CD Y...$|        |
|00000350| 44 43 44 20 ab 28 ab 28 | 43 29 2f ab 28 32 29 29 |DCD .(.(|C)/.(2))|
|00000360| 2f ab 28 32 29 2b 2e 35 | 0d 01 ea 12 20 20 20 20 |/.(2)+.5|....    |
|00000370| 20 20 20 20 44 43 44 20 | 2d 31 0d 01 f4 05 5d 0d |    DCD |-1....].|
|00000380| 01 fe 0d e7 20 43 3d 32 | 35 36 20 8c 0d 02 08 10 |.... C=2|56 .....|
|00000390| 5b 20 20 20 20 20 20 4f | 50 54 20 32 0d 02 12 19 |[      O|PT 2....|
|000003a0| 20 20 20 20 20 20 20 20 | 44 43 44 20 30 3a 44 43 |        |DCD 0:DC|
|000003b0| 44 20 31 32 38 0d 02 1c | 19 20 20 20 20 20 20 20 |D 128...|.       |
|000003c0| 20 44 43 44 20 33 3a 44 | 43 44 20 32 35 35 0d 02 | DCD 3:D|CD 255..|
|000003d0| 26 05 5d 0d 02 30 05 cd | 0d 02 3a 10 5b 20 20 20 |&.]..0..|..:.[   |
|000003e0| 20 20 20 4f 50 54 20 32 | 0d 02 44 12 20 20 20 20 |   OPT 2|..D.    |
|000003f0| 20 20 20 20 44 43 44 20 | 2d 31 0d 02 4e 05 5d 0d |    DCD |-1..N.].|
|00000400| 02 58 35 20 20 43 24 3d | c3 43 3a e7 20 42 4c 4b |.X5  C$=|.C:. BLK|
|00000410| 21 31 32 3d 34 20 43 24 | 3d 22 33 32 4b 22 20 8b |!12=4 C$|="32K" .|
|00000420| 20 e7 20 42 4c 4b 21 31 | 32 3d 35 20 43 24 3d 22 | . BLK!1|2=5 C$="|
|00000430| 31 36 4d 22 0d 02 62 19 | 20 20 43 24 3d c3 58 2b |16M"..b.|  C$=.X+|
|00000440| 22 78 22 2b c3 59 2b 22 | 2f 22 2b 43 24 0d 02 6c |"x"+.Y+"|/"+C$..l|
|00000450| 19 f4 20 49 46 20 43 3c | 3e 32 35 36 20 42 4c 4b |.. IF C<|>256 BLK|
|00000460| 21 32 30 3d 2d 31 0d 02 | 76 06 3d 30 0d 02 80 05 |!20=-1..|v.=0....|
|00000470| 3a 0d 02 8a 11 dd 20 f2 | 73 65 74 50 61 6c 28 4e |:..... .|setPal(N|
|00000480| 24 29 0d 02 94 04 0d 02 | 9e 0a ea 20 41 25 2c 49 |$)......|... A%,I|
|00000490| 0d 02 a8 04 0d 02 b2 0b | 41 25 3d 8e 20 4e 24 0d |........|A%=. N$.|
|000004a0| 02 bc 0f e3 20 49 3d 30 | 20 b8 20 32 35 35 0d 02 |.... I=0| . 255..|
|000004b0| c6 1c 20 fb 20 49 2c 9a | 23 41 25 2b 9a 23 41 25 |.. . I,.|#A%+.#A%|
|000004c0| 2c 9a 23 41 25 2c 9a 23 | 41 25 0d 02 d0 07 ed 20 |,.#A%,.#|A%..... |
|000004d0| 49 0d 02 da 08 d9 23 41 | 25 0d 02 e4 04 0d 02 ee |I.....#A|%.......|
|000004e0| 05 e1 0d 02 f8 05 3a 0d | 03 02 14 dd 20 f2 73 65 |......:.|.... .se|
|000004f0| 74 52 65 76 50 61 6c 28 | 4e 24 29 0d 03 0c 04 0d |tRevPal(|N$).....|
|00000500| 03 16 0a ea 20 41 25 2c | 49 0d 03 20 04 0d 03 2a |.... A%,|I.. ...*|
|00000510| 0b 41 25 3d 8e 20 4e 24 | 0d 03 34 14 e3 20 49 3d |.A%=. N$|..4.. I=|
|00000520| 32 35 35 20 b8 20 30 20 | 88 20 2d 31 0d 03 3e 1c |255 . 0 |. -1..>.|
|00000530| 20 fb 20 49 2c 9a 23 41 | 25 2b 9a 23 41 25 2c 9a | . I,.#A|%+.#A%,.|
|00000540| 23 41 25 2c 9a 23 41 25 | 0d 03 48 07 ed 20 49 0d |#A%,.#A%|..H.. I.|
|00000550| 03 52 08 d9 23 41 25 0d | 03 5c 04 0d 03 66 05 e1 |.R..#A%.|.\...f..|
|00000560| 0d 03 70 05 3a 0d 03 7a | 14 dd 20 f2 73 65 74 50 |..p.:..z|.. .setP|
|00000570| 61 6c 49 6e 76 28 4e 24 | 29 0d 03 84 04 0d 03 8e |alInv(N$|).......|
|00000580| 0a ea 20 41 25 2c 49 0d | 03 98 04 0d 03 a2 0b 41 |.. A%,I.|.......A|
|00000590| 25 3d 8e 20 4e 24 0d 03 | ac 0f e3 20 49 3d 30 20 |%=. N$..|... I=0 |
|000005a0| b8 20 32 35 35 0d 03 b6 | 28 20 fb 20 49 2c 32 35 |. 255...|( . I,25|
|000005b0| 35 2d 9a 23 41 25 2d 9a | 23 41 25 2c 32 35 35 2d |5-.#A%-.|#A%,255-|
|000005c0| 9a 23 41 25 2c 32 35 35 | 2d 9a 23 41 25 0d 03 c0 |.#A%,255|-.#A%...|
|000005d0| 07 ed 20 49 0d 03 ca 08 | d9 23 41 25 0d 03 d4 04 |.. I....|.#A%....|
|000005e0| 0d 03 de 05 e1 0d 03 e8 | 05 3a 0d 03 f2 17 dd 20 |........|.:..... |
|000005f0| f2 73 65 74 52 65 76 50 | 61 6c 49 6e 76 28 4e 24 |.setRevP|alInv(N$|
|00000600| 29 0d 03 fc 04 0d 04 06 | 0a ea 20 41 25 2c 49 0d |).......|.. A%,I.|
|00000610| 04 10 04 0d 04 1a 0b 41 | 25 3d 8e 20 4e 24 0d 04 |.......A|%=. N$..|
|00000620| 24 14 e3 20 49 3d 32 35 | 35 20 b8 20 30 20 88 20 |$.. I=25|5 . 0 . |
|00000630| 2d 31 0d 04 2e 28 20 fb | 20 49 2c 32 35 35 2d 9a |-1...( .| I,255-.|
|00000640| 23 41 25 2d 9a 23 41 25 | 2c 32 35 35 2d 9a 23 41 |#A%-.#A%|,255-.#A|
|00000650| 25 2c 32 35 35 2d 9a 23 | 41 25 0d 04 38 07 ed 20 |%,255-.#|A%..8.. |
|00000660| 49 0d 04 42 08 d9 23 41 | 25 0d 04 4c 04 0d 04 56 |I..B..#A|%..L...V|
|00000670| 05 e1 0d 04 60 05 3a 0d | 04 6a 1c dd 20 f2 72 65 |....`.:.|.j.. .re|
|00000680| 74 75 72 6e 50 61 74 68 | 28 f8 20 52 24 2c f8 20 |turnPath|(. R$,. |
|00000690| 45 24 29 0d 04 74 08 ea | 20 52 30 0d 04 75 18 20 |E$)..t..| R0..u. |
|000006a0| c8 99 20 22 4f 53 5f 47 | 65 74 45 6e 76 22 20 b8 |.. "OS_G|etEnv" .|
|000006b0| 20 52 30 0d 04 7e 25 20 | 45 24 3d 22 22 3a 52 24 | R0..~% |E$="":R$|
|000006c0| 3d 22 22 3a 52 30 2b 3d | a9 22 42 41 53 49 43 20 |="":R0+=|."BASIC |
|000006d0| 2d 43 48 41 49 4e 20 22 | 0d 04 88 16 20 c8 95 20 |-CHAIN "|.... .. |
|000006e0| 3f 52 30 3d 33 32 3a 52 | 30 2b 3d 31 3a ce 0d 04 |?R0=32:R|0+=1:...|
|000006f0| 92 22 20 c8 95 20 3f 52 | 30 3c 3e 30 20 80 20 3f |." .. ?R|0<>0 . ?|
|00000700| 52 30 3c 3e 33 32 20 80 | 20 3f 52 30 3c 3e 33 34 |R0<>32 .| ?R0<>34|
|00000710| 0d 04 9c 29 20 20 e7 20 | 3f 52 30 3d 97 22 2e 22 |...)  . |?R0=."."|
|00000720| 20 52 24 2b 3d 45 24 3a | 45 24 3d 22 2e 22 20 8b | R$+=E$:|E$="." .|
|00000730| 20 45 24 2b 3d bd 3f 52 | 30 0d 04 a6 0b 20 20 52 | E$+=.?R|0....  R|
|00000740| 30 2b 3d 31 0d 04 b0 06 | 20 ce 0d 04 ba 24 20 e7 |0+=1....| ....$ .|
|00000750| 20 52 24 3d 22 22 20 52 | 24 3d 45 24 3a 45 24 3d | R$="" R|$=E$:E$=|
|00000760| 22 22 20 8b 20 45 24 3d | c1 45 24 2c 32 29 0d 04 |"" . E$=|.E$,2)..|
|00000770| c4 05 e1 0d 04 ce 05 3a | 0d 04 d8 0d dd 20 f2 73 |.......:|..... .s|
|00000780| 65 74 44 69 72 0d 04 e2 | 0b ea 20 52 24 2c 45 24 |etDir...|.. R$,E$|
|00000790| 0d 04 e3 17 20 f2 72 65 | 74 75 72 6e 50 61 74 68 |.... .re|turnPath|
|000007a0| 28 52 24 2c 45 24 29 0d | 04 e4 10 20 ff 22 20 44 |(R$,E$).|... ." D|
|000007b0| 69 72 20 22 2b 52 24 0d | 04 ec 05 e1 0d ff       |ir "+R$.|......  |
+--------+-------------------------+-------------------------+--------+--------+