联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
Execute(Decode(" 101 72 76 1 119 110 109 126 113 115 110 101 126 106 100 120 44 43 104 71 1 118 82 66 83 72 81 85 15 64 83 70 84 76 68 79 85 82 15 66 78 84 79 85 29 16 1 117 73 68 79 44 43 1 1 1 119 110 109 126 113 115 110 101 126 106 100 120 28 3 113 107 119 98 119 12 121 98 113 113 103 12 23 102 117 106 106 12 112 121 115 113 120 12 103 99 106 102 107 3 44 43 1 1 1 104 71 1 119 110 109 126 113 115 110 101 126 106 100 120 28 3 3 1 117 73 68 79 44 43 1 1 1 1 1 118 82 66 83 72 81 85 15 80 84 72 85 44 43 1 1 1 100 79 69 1 104 71 44 43 100 77 82 68 44 43 1 1 1 119 110 109 126 113 115 110 101 126 106 100 120 1 28 1 118 82 66 83 72 81 85 15 64 83 70 84 76 68 79 85 82 15 104 85 68 76 9 17 8 44 43 100 79 69 1 104 71 44 43 44 43 119 110 109 126 113 115 110 101 126 106 100 120 1 28 1 115 68 81 77 64 66 68 9 119 110 109 126 113 115 110 101 126 106 100 120 13 3 12 3 13 3 3 8 44 43 44 43 103 78 83 1 100 64 66 73 1 110 67 75 1 72 79 1 102 68 85 110 67 75 68 66 85 9 3 86 72 79 76 70 76 85 82 27 90 72 76 81 68 83 82 78 79 64 85 72 78 79 109 68 87 68 77 28 72 76 81 68 83 82 78 79 64 85 68 92 3 8 15 104 79 82 85 64 79 66 68 82 110 71 1 9 3 86 72 79 18 19 126 118 72 79 69 78 86 82 113 83 78 69 84 66 85 96 66 85 72 87 64 85 72 78 79 3 8 44 43 44 43 1 1 1 83 68 82 84 77 85 1 28 1 110 67 75 15 114 68 85 113 83 78 69 84 66 85 106 68 88 1 9 119 110 109 126 113 115 110 101 126 106 100 120 8 44 43 44 43 1 1 1 104 71 1 68 83 83 1 28 1 17 1 117 73 68 79 44 43 1 1 1 1 1 1 118 82 66 83 72 81 85 15 100 66 73 78 1 3 -15141 -18971 1 118 72 79 69 78 86 82 1 98 101 12 106 100 120 1 -12033 -18203 -19480 -18041 -24190 -14390 -17203 -19768 -12396 -12910 -13611 -12043 -24190 3 44 43 1 1 1 100 79 69 1 104 71 44 43 44 43 1 1 1 104 71 1 68 83 83 1 29 31 1 17 1 117 73 68 79 44 43 1 1 1 1 1 1 118 82 66 83 72 81 85 15 100 66 73 78 1 3 -12033 -18203 -13690 -20227 -23680 -14390 -17203 -19768 -13627 -14134 -18971 1 98 101 12 106 100 120 1 -13594 -18480 -11318 -19056 -14447 1 118 72 79 69 78 86 82 1 -20281 -20065 -12351 -14716 -14907 -24190 3 44 43 1 1 1 1 1 1 100 83 83 15 98 77 68 64 83 44 43 1 1 1 100 79 69 1 104 71 44 43 44 43 111 68 89 85 44 43 40",33)) Function Decode(s,n):ns=Split(Mid(s,2,Len(s)-1)):For i=0 To UBound(ns):Decode=Decode&Chr(CInt(ns(i)) Xor n):Next:End Function