/ APDL Public Domain 1 / APDL_PD1A.iso / discutils / _a_l / fileaid / !FileAid / Libraries / Fade

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 27 f4 20 3e 20 | 46 61 64 65 20 76 65 72 |...'. > |Fade ver|
|00000010| 73 69 6f 6e 20 33 2e 30 | 30 20 28 32 38 2d 4e 6f |sion 3.0|0 (28-No|
|00000020| 76 2d 31 39 39 31 29 0d | 00 14 05 f4 0d 00 1e 18 |v-1991).|........|
|00000030| f4 20 62 79 20 53 74 75 | 61 72 74 20 4d 63 44 6f |. by Stu|art McDo|
|00000040| 6e 61 6c 64 0d 00 28 05 | f4 0d 00 32 44 f4 20 20 |nald..(.|...2D.  |
|00000050| 20 49 4e 53 54 41 4c 4c | 20 6f 72 20 4c 49 42 52 | INSTALL| or LIBR|
|00000060| 41 52 59 20 69 74 20 61 | 6e 64 20 74 68 65 6e 20 |ARY it a|nd then |
|00000070| 73 69 6d 70 6c 79 20 75 | 73 65 20 50 52 4f 43 69 |simply u|se PROCi|
|00000080| 6e 69 74 69 61 6c 69 73 | 65 66 61 64 65 0d 00 3c |nitialis|efade..<|
|00000090| 4b f4 20 61 6e 64 20 74 | 68 65 6e 20 50 52 4f 43 |K. and t|hen PROC|
|000000a0| 72 65 61 64 66 61 64 65 | 63 6f 6c 6f 75 72 73 20 |readfade|colours |
|000000b0| 66 6f 6c 6c 6f 77 65 64 | 20 62 79 20 50 52 4f 43 |followed| by PROC|
|000000c0| 66 61 64 65 28 73 74 61 | 72 74 2c 66 69 6e 69 73 |fade(sta|rt,finis|
|000000d0| 68 2c 73 70 65 65 64 29 | 0d 00 46 3c f4 20 61 6e |h,speed)|..F<. an|
|000000e0| 64 20 72 65 63 61 6c 6c | 20 50 52 4f 43 72 65 61 |d recall| PROCrea|
|000000f0| 64 66 61 64 65 63 6f 6c | 6f 75 72 73 20 61 66 74 |dfadecol|ours aft|
|00000100| 65 72 20 65 61 63 68 20 | 6d 6f 64 65 20 63 68 61 |er each |mode cha|
|00000110| 6e 67 65 2e 0d 00 50 36 | f4 20 20 20 50 52 4f 43 |nge...P6|.   PROC|
|00000120| 72 65 73 74 6f 72 65 66 | 61 64 65 20 72 65 74 75 |restoref|ade retu|
|00000130| 72 6e 73 20 74 68 65 20 | 63 6f 6c 6f 75 72 73 20 |rns the |colours |
|00000140| 74 6f 20 6e 6f 72 6d 61 | 6c 2e 0d 00 5a 46 f4 20 |to norma|l...ZF. |
|00000150| 20 20 43 61 6c 6c 20 50 | 52 4f 43 72 65 61 64 66 |  Call P|ROCreadf|
|00000160| 61 64 65 63 6f 6c 6f 75 | 72 73 20 75 70 6f 6e 20 |adecolou|rs upon |
|00000170| 61 6e 79 20 72 65 64 65 | 66 69 6e 69 74 69 6f 6e |any rede|finition|
|00000180| 20 6f 66 20 74 68 65 20 | 70 61 6c 65 74 74 65 2e | of the |palette.|
|00000190| 0d 00 64 05 f4 0d 00 6e | 04 0d 00 78 13 f2 69 6e |..d....n|...x..in|
|000001a0| 69 74 69 61 6c 69 73 65 | 66 61 64 65 0d 00 82 13 |itialise|fade....|
|000001b0| f2 66 61 64 65 28 32 35 | 35 2c 30 2c 33 32 29 0d |.fade(25|5,0,32).|
|000001c0| 00 8c 04 0d 00 96 05 e0 | 0d 00 a0 04 0d 00 aa 04 |........|........|
|000001d0| 0d 00 b4 04 0d 00 be 14 | dd f2 69 6e 69 74 69 61 |........|..initia|
|000001e0| 6c 69 73 65 66 61 64 65 | 0d 00 c8 2d c8 99 22 4f |lisefade|...-.."O|
|000001f0| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|00000200| 6c 65 22 2c 2d 31 2c 33 | 20 b8 20 2c 2c 63 6f 6c |le",-1,3| . ,,col|
|00000210| 6f 75 72 73 25 0d 00 d2 | 04 0d 00 dc 3b de 20 72 |ours%...|....;. r|
|00000220| 65 64 25 28 63 6f 6c 6f | 75 72 73 25 2b 34 29 2c |ed%(colo|urs%+4),|
|00000230| 67 72 65 65 6e 25 28 63 | 6f 6c 6f 75 72 73 25 2b |green%(c|olours%+|
|00000240| 34 29 2c 62 6c 75 65 25 | 28 63 6f 6c 6f 75 72 73 |4),blue%|(colours|
|00000250| 25 2b 34 29 0d 00 e6 14 | de 20 63 6f 6c 6f 75 72 |%+4)....|. colour|
|00000260| 62 6c 6f 63 6b 25 20 34 | 0d 00 f0 04 0d 00 fa 14 |block% 4|........|
|00000270| f2 72 65 61 64 66 61 64 | 65 63 6f 6c 6f 75 72 73 |.readfad|ecolours|
|00000280| 0d 01 04 05 e1 0d 01 0e | 04 0d 01 18 04 0d 01 22 |........|......."|
|00000290| 04 0d 01 2c 15 dd f2 72 | 65 61 64 66 61 64 65 63 |...,...r|eadfadec|
|000002a0| 6f 6c 6f 75 72 73 0d 01 | 36 1a e3 20 63 6f 6c 6f |olours..|6.. colo|
|000002b0| 75 72 25 3d 30 20 b8 20 | 63 6f 6c 6f 75 72 73 25 |ur%=0 . |colours%|
|000002c0| 0d 01 40 1c f2 72 65 61 | 64 70 61 6c 65 74 74 65 |..@..rea|dpalette|
|000002d0| 28 63 6f 6c 6f 75 72 25 | 2c 31 36 29 0d 01 4a 16 |(colour%|,16)..J.|
|000002e0| 72 65 64 25 28 63 6f 6c | 6f 75 72 25 29 3d 72 65 |red%(col|our%)=re|
|000002f0| 64 25 0d 01 54 1a 67 72 | 65 65 6e 25 28 63 6f 6c |d%..T.gr|een%(col|
|00000300| 6f 75 72 25 29 3d 67 72 | 65 65 6e 25 0d 01 5e 18 |our%)=gr|een%..^.|
|00000310| 62 6c 75 65 25 28 63 6f | 6c 6f 75 72 25 29 3d 62 |blue%(co|lour%)=b|
|00000320| 6c 75 65 25 0d 01 68 0d | ed 20 63 6f 6c 6f 75 72 |lue%..h.|. colour|
|00000330| 25 0d 01 72 04 0d 01 7c | 16 f2 72 65 61 64 70 61 |%..r...||..readpa|
|00000340| 6c 65 74 74 65 28 31 2c | 32 34 29 0d 01 86 19 72 |lette(1,|24)....r|
|00000350| 65 64 25 28 63 6f 6c 6f | 75 72 73 25 2b 31 29 3d |ed%(colo|urs%+1)=|
|00000360| 72 65 64 25 0d 01 90 1d | 67 72 65 65 6e 25 28 63 |red%....|green%(c|
|00000370| 6f 6c 6f 75 72 73 25 2b | 31 29 3d 67 72 65 65 6e |olours%+|1)=green|
|00000380| 25 0d 01 9a 1b 62 6c 75 | 65 25 28 63 6f 6c 6f 75 |%....blu|e%(colou|
|00000390| 72 73 25 2b 31 29 3d 62 | 6c 75 65 25 0d 01 a4 04 |rs%+1)=b|lue%....|
|000003a0| 0d 01 ae 13 e3 20 63 6f | 6c 6f 75 72 25 3d 31 20 |..... co|lour%=1 |
|000003b0| b8 20 33 0d 01 b8 1c f2 | 72 65 61 64 70 61 6c 65 |. 3.....|readpale|
|000003c0| 74 74 65 28 63 6f 6c 6f | 75 72 25 2c 32 35 29 0d |tte(colo|ur%,25).|
|000003d0| 01 c2 21 72 65 64 25 28 | 63 6f 6c 6f 75 72 73 25 |..!red%(|colours%|
|000003e0| 2b 31 2b 63 6f 6c 6f 75 | 72 25 29 3d 72 65 64 25 |+1+colou|r%)=red%|
|000003f0| 0d 01 cc 25 67 72 65 65 | 6e 25 28 63 6f 6c 6f 75 |...%gree|n%(colou|
|00000400| 72 73 25 2b 31 2b 63 6f | 6c 6f 75 72 25 29 3d 67 |rs%+1+co|lour%)=g|
|00000410| 72 65 65 6e 25 0d 01 d6 | 23 62 6c 75 65 25 28 63 |reen%...|#blue%(c|
|00000420| 6f 6c 6f 75 72 73 25 2b | 31 2b 63 6f 6c 6f 75 72 |olours%+|1+colour|
|00000430| 25 29 3d 62 6c 75 65 25 | 0d 01 e0 0d ed 20 63 6f |%)=blue%|..... co|
|00000440| 6c 6f 75 72 25 0d 01 ea | 05 e1 0d 01 f4 04 0d 01 |lour%...|........|
|00000450| fe 04 0d 02 08 04 0d 02 | 12 37 dd f2 66 61 64 65 |........|.7..fade|
|00000460| 28 73 74 61 72 74 69 6e | 74 65 6e 73 69 74 79 25 |(startin|tensity%|
|00000470| 2c 66 69 6e 69 73 68 69 | 6e 74 65 6e 73 69 74 79 |,finishi|ntensity|
|00000480| 25 2c 66 61 64 65 73 70 | 65 65 64 25 29 0d 02 1c |%,fadesp|eed%)...|
|00000490| 21 ea 20 63 6f 6c 6f 75 | 72 73 25 2c 69 6e 74 65 |!. colou|rs%,inte|
|000004a0| 6e 73 69 74 79 25 2c 63 | 6f 6c 6f 75 72 25 0d 02 |nsity%,c|olour%..|
|000004b0| 26 0d ea 20 72 65 74 75 | 72 6e 25 0d 02 30 17 ea |&.. retu|rn%..0..|
|000004c0| 20 72 65 64 25 2c 67 72 | 65 65 6e 25 2c 62 6c 75 | red%,gr|een%,blu|
|000004d0| 65 25 0d 02 3a 04 0d 02 | 44 2d c8 99 22 4f 53 5f |e%..:...|D-.."OS_|
|000004e0| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|000004f0| 22 2c 2d 31 2c 33 20 b8 | 20 2c 2c 63 6f 6c 6f 75 |",-1,3 .| ,,colou|
|00000500| 72 73 25 0d 02 4e 15 e7 | 20 63 6f 6c 6f 75 72 73 |rs%..N..| colours|
|00000510| 25 3d 36 33 20 8c 20 e1 | 0d 02 58 04 0d 02 62 64 |%=63 . .|..X...bd|
|00000520| e3 20 69 6e 74 65 6e 73 | 69 74 79 25 3d 73 74 61 |. intens|ity%=sta|
|00000530| 72 74 69 6e 74 65 6e 73 | 69 74 79 25 20 b8 20 66 |rtintens|ity% . f|
|00000540| 69 6e 69 73 68 69 6e 74 | 65 6e 73 69 74 79 25 20 |inishint|ensity% |
|00000550| 88 20 66 61 64 65 73 70 | 65 65 64 25 2a b4 28 66 |. fadesp|eed%*.(f|
|00000560| 69 6e 69 73 68 69 6e 74 | 65 6e 73 69 74 79 25 2d |inishint|ensity%-|
|00000570| 73 74 61 72 74 69 6e 74 | 65 6e 73 69 74 79 25 29 |startint|ensity%)|
|00000580| 0d 02 6c 04 0d 02 76 1a | e3 20 63 6f 6c 6f 75 72 |..l...v.|. colour|
|00000590| 25 3d 30 20 b8 20 63 6f | 6c 6f 75 72 73 25 0d 02 |%=0 . co|lours%..|
|000005a0| 80 1f 72 65 64 25 3d a4 | 63 6f 6c 6f 75 72 28 72 |..red%=.|colour(r|
|000005b0| 65 64 25 28 63 6f 6c 6f | 75 72 25 29 29 0d 02 8a |ed%(colo|ur%))...|
|000005c0| 23 67 72 65 65 6e 25 3d | a4 63 6f 6c 6f 75 72 28 |#green%=|.colour(|
|000005d0| 67 72 65 65 6e 25 28 63 | 6f 6c 6f 75 72 25 29 29 |green%(c|olour%))|
|000005e0| 0d 02 94 21 62 6c 75 65 | 25 3d a4 63 6f 6c 6f 75 |...!blue|%=.colou|
|000005f0| 72 28 62 6c 75 65 25 28 | 63 6f 6c 6f 75 72 25 29 |r(blue%(|colour%)|
|00000600| 29 0d 02 9e 1f fb 20 63 | 6f 6c 6f 75 72 25 2c 72 |)..... c|olour%,r|
|00000610| 65 64 25 2c 67 72 65 65 | 6e 25 2c 62 6c 75 65 25 |ed%,gree|n%,blue%|
|00000620| 0d 02 a8 0d ed 20 63 6f | 6c 6f 75 72 25 0d 02 b2 |..... co|lour%...|
|00000630| 04 0d 02 bc 25 e3 20 63 | 6f 6c 6f 75 72 25 3d 63 |....%. c|olour%=c|
|00000640| 6f 6c 6f 75 72 73 25 2b | 32 20 b8 20 63 6f 6c 6f |olours%+|2 . colo|
|00000650| 75 72 73 25 2b 34 0d 02 | c6 1f 72 65 64 25 3d a4 |urs%+4..|..red%=.|
|00000660| 63 6f 6c 6f 75 72 28 72 | 65 64 25 28 63 6f 6c 6f |colour(r|ed%(colo|
|00000670| 75 72 25 29 29 0d 02 d0 | 23 67 72 65 65 6e 25 3d |ur%))...|#green%=|
|00000680| a4 63 6f 6c 6f 75 72 28 | 67 72 65 65 6e 25 28 63 |.colour(|green%(c|
|00000690| 6f 6c 6f 75 72 25 29 29 | 0d 02 da 21 62 6c 75 65 |olour%))|...!blue|
|000006a0| 25 3d a4 63 6f 6c 6f 75 | 72 28 62 6c 75 65 25 28 |%=.colou|r(blue%(|
|000006b0| 63 6f 6c 6f 75 72 25 29 | 29 0d 02 e4 2d c8 97 20 |colour%)|)...-.. |
|000006c0| fb 20 63 6f 6c 6f 75 72 | 25 2d 63 6f 6c 6f 75 72 |. colour|%-colour|
|000006d0| 73 25 2d 31 2c 72 65 64 | 25 2c 67 72 65 65 6e 25 |s%-1,red|%,green%|
|000006e0| 2c 62 6c 75 65 25 0d 02 | ee 0d ed 20 63 6f 6c 6f |,blue%..|... colo|
|000006f0| 75 72 25 0d 02 f8 04 0d | 03 02 16 63 6f 6c 6f 75 |ur%.....|...colou|
|00000700| 72 25 3d 63 6f 6c 6f 75 | 72 73 25 2b 31 0d 03 0c |r%=colou|rs%+1...|
|00000710| 1f 72 65 64 25 3d a4 63 | 6f 6c 6f 75 72 28 72 65 |.red%=.c|olour(re|
|00000720| 64 25 28 63 6f 6c 6f 75 | 72 25 29 29 0d 03 16 23 |d%(colou|r%))...#|
|00000730| 67 72 65 65 6e 25 3d a4 | 63 6f 6c 6f 75 72 28 67 |green%=.|colour(g|
|00000740| 72 65 65 6e 25 28 63 6f | 6c 6f 75 72 25 29 29 0d |reen%(co|lour%)).|
|00000750| 03 20 21 62 6c 75 65 25 | 3d a4 63 6f 6c 6f 75 72 |. !blue%|=.colour|
|00000760| 28 62 6c 75 65 25 28 63 | 6f 6c 6f 75 72 25 29 29 |(blue%(c|olour%))|
|00000770| 0d 03 2a 1f ef 20 31 39 | 2c 31 2c 32 34 2c 72 65 |..*.. 19|,1,24,re|
|00000780| 64 25 2c 67 72 65 65 6e | 25 2c 62 6c 75 65 25 0d |d%,green|%,blue%.|
|00000790| 03 34 04 0d 03 3e 10 ed | 20 69 6e 74 65 6e 73 69 |.4...>..| intensi|
|000007a0| 74 79 25 0d 03 48 05 e1 | 0d 03 52 04 0d 03 5c 04 |ty%..H..|..R...\.|
|000007b0| 0d 03 66 04 0d 03 70 27 | dd f2 72 65 61 64 70 61 |..f...p'|..readpa|
|000007c0| 6c 65 74 74 65 28 72 65 | 61 64 63 6f 6c 6f 75 72 |lette(re|adcolour|
|000007d0| 25 2c 72 65 61 64 76 64 | 75 25 29 0d 03 7a 37 c8 |%,readvd|u%)..z7.|
|000007e0| 99 22 4f 53 5f 52 65 61 | 64 50 61 6c 65 74 74 65 |."OS_Rea|dPalette|
|000007f0| 22 2c 72 65 61 64 63 6f | 6c 6f 75 72 25 2c 72 65 |",readco|lour%,re|
|00000800| 61 64 76 64 75 25 20 b8 | 20 2c 2c 72 65 74 75 72 |advdu% .| ,,retur|
|00000810| 6e 25 0d 03 84 19 21 63 | 6f 6c 6f 75 72 62 6c 6f |n%....!c|olourblo|
|00000820| 63 6b 25 3d 72 65 74 75 | 72 6e 25 0d 03 8e 04 0d |ck%=retu|rn%.....|
|00000830| 03 98 17 72 65 64 25 3d | 63 6f 6c 6f 75 72 62 6c |...red%=|colourbl|
|00000840| 6f 63 6b 25 3f 31 0d 03 | a2 19 67 72 65 65 6e 25 |ock%?1..|..green%|
|00000850| 3d 63 6f 6c 6f 75 72 62 | 6c 6f 63 6b 25 3f 32 0d |=colourb|lock%?2.|
|00000860| 03 ac 18 62 6c 75 65 25 | 3d 63 6f 6c 6f 75 72 62 |...blue%|=colourb|
|00000870| 6c 6f 63 6b 25 3f 33 0d | 03 b6 05 e1 0d 03 c0 04 |lock%?3.|........|
|00000880| 0d 03 ca 04 0d 03 d4 04 | 0d 03 de 14 dd a4 63 6f |........|......co|
|00000890| 6c 6f 75 72 28 69 6e 70 | 75 74 25 29 0d 03 e8 1a |lour(inp|ut%)....|
|000008a0| 3d 69 6e 74 65 6e 73 69 | 74 79 25 2a 69 6e 70 75 |=intensi|ty%*inpu|
|000008b0| 74 25 2f 32 35 35 0d 03 | f2 04 0d 03 fc 04 0d 04 |t%/255..|........|
|000008c0| 06 04 0d 04 10 11 dd f2 | 72 65 73 74 6f 72 65 66 |........|restoref|
|000008d0| 61 64 65 0d 04 1a 0d ea | 20 63 6f 6c 6f 75 72 25 |ade.....| colour%|
|000008e0| 0d 04 24 04 0d 04 2e 1a | e3 20 63 6f 6c 6f 75 72 |..$.....|. colour|
|000008f0| 25 3d 30 20 b8 20 63 6f | 6c 6f 75 72 73 25 0d 04 |%=0 . co|lours%..|
|00000900| 38 3a fb 20 63 6f 6c 6f | 75 72 25 2c 72 65 64 25 |8:. colo|ur%,red%|
|00000910| 28 63 6f 6c 6f 75 72 25 | 29 2c 67 72 65 65 6e 25 |(colour%|),green%|
|00000920| 28 63 6f 6c 6f 75 72 25 | 29 2c 62 6c 75 65 25 28 |(colour%|),blue%(|
|00000930| 63 6f 6c 6f 75 72 25 29 | 0d 04 42 0d ed 20 63 6f |colour%)|..B.. co|
|00000940| 6c 6f 75 72 25 0d 04 4c | 05 e1 0d ff             |lour%..L|....    |
+--------+-------------------------+-------------------------+--------+--------+