module1.bas

防红帽子的shell 我是从别处下的,喜欢的朋友自已

i_Preferences = 12
i_Office = 13
i_Internet = 14
i_Graphics = 15
i_Games = 16
i_Accessories = 17
i_Gimp = 18
i_Exclaim = 19
End Enum

Public Enum IconList
    Spacer = 0
    RedHat = 1
    internet = 2
    Mail = 3
    Letter = 4
    Graph = 5
    SpreadSheet = 6
    Printer = 7
End Enum

Global Const Color_REDHAT = "43,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,12369084,5723991,3815994,5723991,11382189,-1,14737632,13487565,14737632,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,9474192,132415,528318,594123,462513,132415,3815994,8421504,8487297,8882055,13882323,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,14211288,987175,528318,593597,593327,593590,593862,330366,1579032,8026746,8487297,8882055,13882323,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,8553090,330098,593592,658854,658854,658854,658854,593597,330366,1579032,8026746,8487297,9342606,14737632,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,3815994,396440," & _
"593320,658854,987577,1119170,724650,658854,593597,264293,2105376,8487297,8487297,11776947,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,921102,593857,658854,1053374,2039539,2039540,1973743,1250504,658854,593855,132146,4276545,8487297,8487297,14277081,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,0,593592,724650,2039280,2105333,2105333,2170869,2105333,1579223,724653,527789,268,6974058,8487297,10987431,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,0,593592,1316297,2171126,2171638,2171894,2171894,2171894,2171638,1711073,593329,330098,1579032,8487297,8487297,14277081,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,0,987840,921781,1053370,1448654,2172914,2304760,2304503,2304247,2238199,988367,593864,66342,5329233,8487297,10987431,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1," & _
"-1,-1,-1,14211288,11382189,7566195,394758,3750538,3487334,2434684,658854,1185727,2371833,2371833,2371320,2305272,1975791,594123,396440,526344,8026746,8882055,14737632,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,14211288,9474192,6645093,2895172,198220,330366,856227,1777312,5263710,6316128,6316128,3224142,658854,1779674,2438906,2438649,2437881,2371320,1252059,594123,132146,4276545,8487297,12632256,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,14211288,5723991,198220,396171,1911754,3426531,4085481,3953131,3886070,3293176,2305231,5658467,5855577,5855577,2434665,856752,2571771,2505723,2504698,2438393,2173939,594123,396440,526344,8026746,9737364,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,2829367,462244,3426531,5863928,5534453,2833888,3162852,2831092,2238455,2371064,2438137,3949990,5395026,5395026,5066061,856214,1846747,2572539,2571771,2504954,2438137,1252316,594123,132146,4802889,8487297,14277081,-1,-1,-1,-1,-1,-1,-1,-1," & _
"-1,-1,-1,-1,-1,-1,-1,-1,12369084,198488,3756006,5863928,3031520,593592,526980,1582247,4085241,2304760,2371833,2438906,2702832,4671303,5000268,5000268,3355757,1120955,2638332,2572540,2571515,2438906,2174451,594123,330366,1052688,8487297,12237498,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,7566195,1120926,6258939,1977559,594123,1053909,724376,395367,2372244,2568696,2437881,2504954,2572283,3686266,4539717,4539717,4539717,790421,2374385,2638332,2572283,2505210,2437881,1252316,594123,66073,5855577,9737364,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,7566195,1845412,3426531,594123,594123,725456,1909695,395376,725100,2636281,2438137,2505466,2572283,2899121,4079166,4079166,4079166,2039907,1714902,2638332,2572539,2505466,2438137,2042096,594123,264293,3223857,8487297,14737632,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,7566195,1120926,1253073,594123,594123,594123,1712830,461178,3031754,3228152,2438137,2505466,2572283,2308316,3618615,3618615,3618615," & _