�     >Graduate (Info1)
� By  Michiel van Schaik
!� For 32-bit machines (RO3.1)
(� (c) BAU May 1993
2:
<� 15
F�
PBș "OS_SWINumberFromString",,"ColourTrans_SetGCOL" � set_gcol%
Zstep%=4
d� dither%=0 � 1
n ȑ 640*dither%,0
x action%=dither%*&100
� � red%=0 � 255 � step%
�  � green%=0 � 255 � step%
�"   col%=(red%<<16)+(green%<<8)
�6   ș set_gcol%,(red%<<8)+(green%<<16),,,action%,0
�&   ȓ Ȑ red%*2,green%*2,2*step%-1
�  � green%
� � red%
�
� dither%
��
�

00000000  0d 00 0a 1b f4 20 20 20  20 20 3e 47 72 61 64 75  |.....     >Gradu|
00000010  61 74 65 20 28 49 6e 66  6f 31 29 0d 00 14 1c f4  |ate (Info1).....|
00000020  20 42 79 20 20 4d 69 63  68 69 65 6c 20 76 61 6e  | By  Michiel van|
00000030  20 53 63 68 61 69 6b 0d  00 1e 21 f4 20 46 6f 72  | Schaik...!. For|
00000040  20 33 32 2d 62 69 74 20  6d 61 63 68 69 6e 65 73  | 32-bit machines|
00000050  20 28 52 4f 33 2e 31 29  0d 00 28 16 f4 20 28 63  | (RO3.1)..(.. (c|
00000060  29 20 42 41 55 20 4d 61  79 20 31 39 39 33 0d 00  |) BAU May 1993..|
00000070  32 05 3a 0d 00 3c 08 eb  20 31 35 0d 00 46 05 87  |2.:..<.. 15..F..|
00000080  0d 00 50 42 c8 99 20 22  4f 53 5f 53 57 49 4e 75  |..PB.. "OS_SWINu|
00000090  6d 62 65 72 46 72 6f 6d  53 74 72 69 6e 67 22 2c  |mberFromString",|
000000a0  2c 22 43 6f 6c 6f 75 72  54 72 61 6e 73 5f 53 65  |,"ColourTrans_Se|
000000b0  74 47 43 4f 4c 22 20 b8  20 73 65 74 5f 67 63 6f  |tGCOL" . set_gco|
000000c0  6c 25 0d 00 5a 0b 73 74  65 70 25 3d 34 0d 00 64  |l%..Z.step%=4..d|
000000d0  13 e3 20 64 69 74 68 65  72 25 3d 30 20 b8 20 31  |.. dither%=0 . 1|
000000e0  0d 00 6e 15 20 c8 91 20  36 34 30 2a 64 69 74 68  |..n. .. 640*dith|
000000f0  65 72 25 2c 30 0d 00 78  19 20 61 63 74 69 6f 6e  |er%,0..x. action|
00000100  25 3d 64 69 74 68 65 72  25 2a 26 31 30 30 0d 00  |%=dither%*&100..|
00000110  82 1b 20 e3 20 72 65 64  25 3d 30 20 b8 20 32 35  |.. . red%=0 . 25|
00000120  35 20 88 20 73 74 65 70  25 0d 00 8c 1e 20 20 e3  |5 . step%....  .|
00000130  20 67 72 65 65 6e 25 3d  30 20 b8 20 32 35 35 20  | green%=0 . 255 |
00000140  88 20 73 74 65 70 25 0d  00 96 22 20 20 20 63 6f  |. step%..."   co|
00000150  6c 25 3d 28 72 65 64 25  3c 3c 31 36 29 2b 28 67  |l%=(red%<<16)+(g|
00000160  72 65 65 6e 25 3c 3c 38  29 0d 00 a0 36 20 20 20  |reen%<<8)...6   |
00000170  c8 99 20 73 65 74 5f 67  63 6f 6c 25 2c 28 72 65  |.. set_gcol%,(re|
00000180  64 25 3c 3c 38 29 2b 28  67 72 65 65 6e 25 3c 3c  |d%<<8)+(green%<<|
00000190  31 36 29 2c 2c 2c 61 63  74 69 6f 6e 25 2c 30 0d  |16),,,action%,0.|
000001a0  00 aa 26 20 20 20 c8 93  20 c8 90 20 72 65 64 25  |..&   .. .. red%|
000001b0  2a 32 2c 67 72 65 65 6e  25 2a 32 2c 32 2a 73 74  |*2,green%*2,2*st|
000001c0  65 70 25 2d 31 0d 00 b4  0e 20 20 ed 20 67 72 65  |ep%-1....  . gre|
000001d0  65 6e 25 0d 00 be 0b 20  ed 20 72 65 64 25 0d 00  |en%.... . red%..|
000001e0  c8 0d ed 20 64 69 74 68  65 72 25 0d 00 d2 05 e0  |... dither%.....|
000001f0  0d ff                                             |..|
000001f2