Author Topic: hepl me ,Daniel  (Read 9846 times)

0 Members and 1 Guest are viewing this topic.

aicr317

  • Guest
hepl me ,Daniel
« on: January 05, 2010, 02:24:15 AM »
my english is not well ,sorry!

example:

if i have this file, “d:\bsph.sld”

(setq aaa (vl-string->list (_readstream "d:\\bsph.sld" 0))) --->


(65 117 116 111 67 65 68 32 83 108 105 100 101 13 10 26 0 86 2 63 63 44 221 179 0 2 0 52 18 7 255 7 255 0 0 29 1 0 1 255 1 255 0 0 0 0 1 255 0 0 0 0 1 255 0 0 0 0 1 255 0 0 0 0 1 255 0 0 0 0 1 255 0 0 0 0 1 255 0 0 0 0 1 255 98 0 0 98 0 0 1 255 98 0 0 98 0 0 1 255 98 0 0 98 0 0 1 255 98 0 0 98 0 0 1 255 98 0 0 98 0 0 1 255 98 0 0 98 0 0 1 255 98 0 0 98 0 0 1 255 86 1 0 86 1 0 1 255 86 1 0 86 1 0 1 255 86 1 0 86 1 0 1 255 86 1 0 86 1 0 1 255 86 1 0 86 1 0 1 255 86 1 0 86 1 0 1 255 86 1 0 86 1 0 3 255 3 255 83 0 14 1 113 0 14 1 3 255 83 0 8 1 83 0 15 1 3 255 113 0 8 1 113 0 15 1 3 255 66 0 14 1 49 0 14 1 3 255 0 14 1 0 14 1 3 255 0 63 0 63 0 253 66 0 17 1 0 253 66 0 12 1 0 253 83 0 14 1 0 253 83 0 242 254 3 255 66 0 17 1 66 0 12 1 66 0 12 1 83 0 14 1 83 0 14 1 66 0 17 1 3 255 0 63 0 63 0 253 130 0 17 1 0 253 130 0 12 1 0 253 113 0 14 1 0 253 113 0 242 254 3 255 0 17 1 0 12 1 0 12 1 113 0 14 1 113 0 14 1 0 17 1 3 255 86 0 45 1 86 0 37 1 3 255 86 0 43 1 87 0 44 1 87 0 44 1 89 0 45 1 89 0 45 1 90 0 45 1 90 0 45 1 92 0 44 1 92 0 44 1 92 0 43 1 92 0 43 1 92 0 37 1 3 255 96 0 45 1 103 0 37 1 3 255 103 0 45 1 96 0 37 1 3 255 107 0 49 1 107 0 37 1 107 0 37 1 114 0 37 1 3 255 98 0 0 98 0 122 0 3 255 86 1 0 86 1 122 0 3 255 115 0 123 0 0 123 0 3 255 69 1 123 0 0 123 0 3 255 0 63 0 63 0 253 115 0 125 0 0 253 115 0 120 0 0 253 98 0 123 0 0 253 98 0 63 3 255 115 0 125 0 115 0 120 0 115 0 120 0 98 0 123 0 98 0 123 0 115 0 125 0 3 255 0 63 0 63 0 253 69 1 125 0 0 253 69 1 120 0 0 253 86 1 123 0 0 253 86 1 63 3 255 69 1 125 0 69 1 120 0 69 1 120 0 86 1 123 0 86 1 123 0 69 1 125 0 3 255 0 0 0 0 3 255 0 0 0 0 3 255 0 0 0 0 3 255 0 123 0 0 123 0 3 255 64 0 0 64 0 84 0 3 255 119 1 0 119 1 84 0 3 255 81 0 84 0 0 84 0 3 255 102 1 84 0 0 84 0 3 255 0 63 0 63 0 253 81 0 87 0 0 253 81 0 82 0 0 253 64 0 84 0 0 253 64 0 63 3 255 81 0 87 0 81 0 82 0 81 0 82 0 64 0 84 0 64 0 84 0 81 0 87 0 3 255 0 63 0 63 0 253 102 1 87 0 0 253 102 1 82 0 0 253 119 1 84 0 0 253 119 1 63 3 255 102 1 87 0 102 1 82 0 102 1 82 0 119 1 84 0 119 1 84 0 102 1 87 0 3 255 0 92 0 0 105 0 0 105 0 0 105 0 0 105 0 0 104 0 0 104 0 0 103 0 0 103 0 0 102 0 0 102 0 0 100 0 0 100 0 0 97 0 0 97 0 0 95 0 0 95 0 0 94 0 0 94 0 0 93 0 0 93 0 0 92 0 0 92 0 0 92 0 3 255 0 84 0 0 84 0 3 255 0 0 0 0 3 255 29 1 0 29 1 0 3 255 0 0 0 0 3 255 12 1 0 0 0 3 255 0 63 0 63 0 253 171 0 0 0 253 171 0 0 0 253 154 0 0 0 253 154 0 100 255 3 255 0 0 0 0 0 0 0 0 0 0 0 0 3 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 100 255 3 255 12 1 0 12 1 0 12 1 0 29 1 0 29 1 0 12 1 0 3 255 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3 255 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3 255 0 0 0 0 7 255 7 255 0 63 0 63 0 253 64 0 0 0 253 65 0 0 0 253 64 0 0 0 253 64 0 18 255 0 63 0 63 0 253 65 0 0 0 253 64 0 0 0 253 65 0 0 0 253 65 0 18 255 7 255 64 0 0 65 0 0 65 0 0 65 0 0 65 0 0 64 0 0 64 0 0 64 0 0 7 255 0 63 0 63 0 253 64 0 0 0 253 64 0 0 0 253 119 1 0 0 253 119 1 18 255 0 63 0 63 0 253 64 0 0 0 253 119 1 0 0 253 119 1 0 0 253 119 1 18 255 7 255 64 0 0 64 0 0 64 0 0 119 1 0 119 1 0 119 1 0 119 1 0 64 0 0 7 255 0 63 0 63 0 253 64 0 0 0 253 64 0 0 0 253 121 0 0 0 253 121 0 48 255 0 63 0 63 0 253 64 0 0 0 253 121 0 0 0 253 121 0 0 0 253 121 0 49 255 7 255 64 0 0 64 0 0 64 0 0 121 0 0 121 0 0 121 0 0 121 0 0 64 0 0 7 255 0 63 0 63 0 253 121 0 0 0 253 121 0 0 0 63 1 0 0 63 1 51 255 0 63 0 63 0 253 121 0 0 0 63 1 0 0 63 1 0 0 63 1 52 255 7 255 121 0 0 121 0 0 121 0 0 63 1 0 63 1 0 63 1 0 63 1 0 121 0 0 7 255 0 63 0 63 0 253 121 0 0 0 253 120 0 0 0 253 121 0 0 0 253 121 0 52 255 0 63 0 63 0 253 120 0 0 0 253 121 0 0 0 253 120 0 0 0 253 120 0 52 255 7 255 121 0 0 120 0 0 120 0 0 120 0 0 120 0 0 121 0 0 121 0 0 121 0 0 7 255 0 63 0 63 0 253 120 1 0 0 253 119 1 0 0 253 120 1 0 0 253 120 1 48 255 0 63 0 63 0 253 119 1 0 0 253 120 1 0 0 253 119 1 0 0 253 119 1 48 255 7 255 120 1 0 119 1 0 119 1 0 119 1 0 119 1 0 120 1 0 120 1 0 120 1 0 7 255 0 63 0 63 0 63 1 0 0 63 1 0 0 253 119 1 0 0 253 119 1 48 255 0 63 0 63 0 63 1 0 0 253 119 1 0 0 253 119 1 0 0 253 119 1 49 255 7 255 63 1 0 63 1 0 63 1 0 119 1 0 119 1 0 119 1 0 119 1 0 63 1 0 7 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 48 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 48 255 7 255 62 1 0 63 1 0 63 1 0 63 1 0 63 1 0 62 1 0 62 1 0 62 1 0 3 255 3 255 63 1 0 63 0 3 255 119 1 0 63 0 3 255 63 0 63 0 3 255 63 255 0 63 16 1 3 255 0 63 0 63 0 253 150 1 0 0 253 156 1 0 0 253 153 1 0 0 253 153 1 52 255 3 255 63 0 63 0 63 0 63 0 63 0 63 0 3 255 0 63 0 63 0 253 150 1 255 0 0 253 156 1 255 0 0 253 153 1 0 0 253 153 1 18 255 3 255 63 255 0 63 255 0 63 255 0 63 0 63 0 63 255 0 3 255 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 63 0 3 255 63 0 63 0 7 255 7 255 0 63 0 63 0 253 82 0 0 0 253 83 0 0 0 253 82 0 0 0 253 82 0 18 255 0 63 0 63 0 253 83 0 0 0 253 82 0 0 0 253 83 0 0 0 253 83 0 18 255 7 255 82 0 0 83 0 0 83 0 0 83 0 0 83 0 0 82 0 0 82 0 0 82 0 0 7 255 0 63 0 63 0 253 113 0 0 0 253 113 0 0 0 253 113 0 0 0 253 113 0 18 255 0 63 0 63 0 253 113 0 0 0 253 113 0 0 0 253 113 0 0 0 253 113 0 18 255 7 255 113 0 0 113 0 0 113 0 0 113 0 0 113 0 0 113 0 0 113 0 0 113 0 0 7 255 0 63 0 63 0 253 70 1 0 0 253 71 1 0 0 253 70 1 0 0 253 70 1 18 255 0 63 0 63 0 253 71 1 0 0 253 70 1 0 0 253 71 1 0 0 253 71 1 18 255 7 255 70 1 0 71 1 0 71 1 0 71 1 0 71 1 0 70 1 0 70 1 0 70 1 0 7 255 0 63 0 63 0 253 100 1 0 0 253 101 1 0 0 253 100 1 0 0 253 100 1 18 255 0 63 0 63 0 253 101 1 0 0 253 100 1 0 0 253 101 1 0 0 253 101 1 18 255 7 255 100 1 0 101 1 0 101 1 0 101 1 0 101 1 0 100 1 0 100 1 0 100 1 0 3 255 3 255 83 0 0 83 0 25 1 3 255 113 0 0 113 0 25 1 7 255 7 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 24 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 24 255 7 255 29 1 0 30 1 0 30 1 0 30 1 0 30 1 0 29 1 0 29 1 0 29 1 0 7 255 65 0 0 64 0 0 7 255 72 0 0 64 0 0 7 255 79 0 0 64 0 0 7 255 83 0 0 64 0 0 7 255 83 0 0 64 0 0 7 255 83 0 0 70 0 0 7 255 83 0 0 77 0 0 7 255 115 0 0 113 0 0 7 255 125 0 0 113 0 0 7 255 0 0 113 0 0 7 255 0 0 113 0 0 7 255 0 0 113 0 0 7 255 0 0 120 0 0 7 255 0 0 127 0 0 7 255 0 0 0 0 7 255 0 0 0 0 7 255 0 0 0 0 7 255 33 1 0 29 1 0 7 255 40 1 0 29 1 0 7 255 47 1 0 29 1 0 7 255 55 1 0 29 1 0 7 255 62 1 0 32 1 0 7 255 65 1 0 35 1 0 7 255 70 1 0 42 1 0 7 255 70 1 0 49 1 0 7 255 70 1 0 57 1 0 7 255 70 1 0 64 1 0 7 255 101 1 0 101 1 0 7 255 108 1 0 101 1 0 7 255 115 1 0 101 1 0 7 255 119 1 0 101 1 0 7 255 119 1 0 101 1 0 7 255 119 1 0 106 1 0 7 255 119 1 0 114 1 0 7 255 0 63 0 63 0 63 1 0 0 63 1 0 0 253 220 0 0 0 253 220 0 24 255 0 63 0 63 0 63 1 0 0 253 220 0 0 0 253 220 0 0 0 253 220 0 24 255 7 255 29 1 0 29 1 0 29 1 0 0 0 0 0 0 0 0 0 29 1 0 7 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 18 255 0 63 0 63 0 63 1 0 0 63 1 0 0 63 1 0 0 63 1 18 255 7 255 29 1 0 30 1 0 30 1 0 37 1 0 37 1 0 36 1 0 36 1 0 29 1 0 3 255 3 255 37 1 0 123 1 54 1 3 255 29 1 0 29 1 84 1 7 255 7 255 0 0 0 75 1 7 255 24 1 0 24 1 67 1 7 255 0 0 0 0 7 255 0 0 0 0 7 255 0 0 0 0 7 255 0 0 0 0 7 255 0 0 0 0 7 255 0 0 255 0 0 7 255 4 1 0 24 1 0 3 255 3 255 0 0 0 0 0 0 0 0 7 255 7 255 0 0 0 76 1 7 255 16 1 0 16 1 59 1 7 255 0 70 1 0 72 1 0 72 1 0 74 1 0 74 1 0 75 1 0 75 1 0 75 1 0 75 1 0 76 1 0 76 1 0 76 1 0 76 1 0 75 1 7 255 0 1 62 1 0 65 1 0 65 1 0 68 1 0 68 1 0 70 1 7 255 0 1 62 1 3 1 60 1 3 1 60 1 6 1 59 1 6 1 59 1 9 1 59 1 9 1 59 1 13 1 59 1 13 1 59 1 16 1 60 1 16 1 60 1 19 1 61 1 19 1 61 1 22 1 62 1 22 1 62 1 24 1 64 1 3 255 3 255 0 63 0 63 0 63 1 56 1 0 63 1 61 1 0 63 1 60 1 0 63 1 196 254 3 255 46 1 56 1 46 1 61 1 46 1 61 1 29 1 60 1 29 1 60 1 46 1 56 1 3 255 0 63 0 63 0 253 84 1 44 1 0 253 80 1 40 1 0 253 94 1 30 1 0 253 94 1 226 254 3 255 84 1 44 1 80 1 40 1 80 1 40 1 94 1 30 1 94 1 30 1 84 1 44 1 3 255 68 1 75 1 62 1 75 1 62 1 75 1 62 1 70 1 62 1 70 1 64 1 71 1 64 1 71 1 66 1 71 1 66 1 71 1 68 1 70 1 68 1 70 1 69 1 69 1 69 1 69 1 70 1 67 1 70 1 67 1 70 1 66 1 70 1 66 1 69 1 64 1 69 1 64 1 68 1 63 1 68 1 63 1 66 1 63 1 66 1 63 1 64 1 63 1 64 1 63 1 62 1 63 1 62 1 63 1 62 1 64 1 62 1 64 1 61 1 65 1 3 255 77 1 75 1 75 1 75 1 75 1 75 1 74 1 73 1 74 1 73 1 73 1 70 1 73 1 70 1 73 1 68 1 73 1 68 1 74 1 65 1 74 1 65 1 75 1 63 1 75 1 63 1 77 1 63 1 77 1 63 1 78 1 63 1 78 1 63 1 80 1 63 1 80 1 63 1 81 1 65 1 81 1 65 1 82 1 68 1 82 1 68 1 82 1 70 1 82 1 70 1 81 1 73 1 81 1 73 1 80 1 75 1 80 1 75 1 78 1 75 1 78 1 75 1 77 1 75 1 3 255 92 1 70 1 92 1 71 1 92 1 71 1 91 1 72 1 91 1 72 1 90 1 72 1 90 1 72 1 89 1 72 1 89 1 72 1 88 1 71 1 88 1 71 1 88 1 70 1 88 1 70 1 88 1 69 1 88 1 69 1 89 1 68 1 89 1 68 1 90 1 68 1 90 1 68 1 91 1 68 1 91 1 68 1 92 1 69 1 92 1 69 1 92 1 70 1 3 255 93 1 30 1 89 1 34 1 89 1 34 1 85 1 38 1 85 1 38 1 80 1 42 1 80 1 42 1 75 1 46 1 75 1 46 1 70 1 49 1 70 1 49 1 65 1 52 1 65 1 52 1 59 1 54 1 59 1 54 1 53 1 56 1 53 1 56 1 47 1 58 1 47 1 58 1 41 1 59 1 41 1 59 1 35 1 59 1 35 1 59 1 29 1 60 1 3 255 0 75 1 0 102 1 3 255 24 1 67 1 24 1 102 1 3 255 0 88 1 0 90 1 3 255 24 1 88 1 24 1 90 1 3 255 0 89 1 0 89 1 3 255 7 1 89 1 0 89 1 3 255 0 63 0 63 0 253 176 0 92 1 0 253 176 0 86 1 0 253 159 0 89 1 0 253 159 0 167 254 3 255 0 92 1 0 86 1 0 86 1 0 89 1 0 89 1 0 92 1 3 255 0 63 0 63 0 63 1 92 1 0 63 1 86 1 0 63 1 89 1 0 63 1 167 254 3 255 7 1 92 1 7 1 86 1 7 1 86 1 24 1 89 1 24 1 89 1 7 1 92 1 3 255 0 98 1 0 111 1 0 111 1 0 98 1 3 255 0 103 1 0 103 1 3 255 0 102 1 0 103 1 0 103 1 0 104 1 0 104 1 0 97 1 3 255 0 89 1 0 89 1 3 255 29 1 0 29 1 16 1 3 255 35 1 0 35 1 16 1 3 255 12 1 16 1 0 16 1 3 255 52 1 16 1 69 1 16 1 3 255 0 63 0 63 0 63 1 19 1 0 63 1 13 1 0 63 1 16 1 0 63 1 240 254 3 255 12 1 19 1 12 1 13 1 12 1 13 1 29 1 16 1 29 1 16 1 12 1 19 1 3 255 0 63 0 63 0 63 1 19 1 0 63 1 13 1 0 63 1 16 1 0 63 1 240 254 3 255 52 1 19 1 52 1 13 1 52 1 13 1 35 1 16 1 35 1 16 1 52 1 19 1 3 255 0 33 1 0 20 1 3 255 0 27 1 0 28 1 0 28 1 0 29 1 0 29 1 0 29 1 0 29 1 0 28 1 0 28 1 0 27 1 0 27 1 0 25 1 0 25 1 0 24 1 0 24 1 0 22 1 0 22 1 0 21 1 0 21 1 0 20 1 0 20 1 0 20 1 0 20 1 0 21 1 0 21 1 0 22 1 7 255 7 255 0 63 0 63 0 253 154 0 0 0 253 155 0 0 0 253 154 0 0 0 253 154 0 18 255 0 63 0 63 0 253 155 0 0 0 253 154 0 0 0 253 155 0 0 0 253 155 0 18 255 7 255 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 255 0 52 0 0 51 0 0 51 0 0 30 0 0 30 0 0 31 0 0 31 0 0 33 0 7 255 0 43 0 0 41 0 0 41 0 0 40 0 7 255 0 44 0 0 40 0 0 40 0 0 38 0 0 38 0 0 36 0 0 36 0 0 35 0 7 255 0 44 0 0 45 0 7 255 0 49 0 0 48 0 0 48 0 0 44 0 0 44 0 0 41 0 0 41 0 0 38 0 0 38 0 0 36 0 0 36 0 0 34 0 0 34 0 0 32 0 0 32 0 0 30 0 7 255 0 50 0 0 48 0 0 48 0 0 47 0 7 255 0 43 0 0 44 0 0 44 0 0 45 0 0 45 0 0 43 0 0 43 0 0 40 0 0 40 0 0 38 0 0 38 0 0 36 0 0 36 0 0 34 0 0 34 0 0 32 0 0 32 0 0 30 0 0 30 0 0 29 0 7 255 0 41 0 0 41 0 0 41 0 0 31 0 0 31 0 0 31 0 0 31 0 0 32 0 7 255 0 52 0 0 50 0 0 50 0 0 49 0 0 49 0 0 48 0 7 255 0 46 0 0 46 0 0 46 0 0 46 0 0 46 0 0 44 0 7 255 0 53 0 0 51 0 0 51 0 0 49 0 0 49 0 0 47 0 0 47 0 0 44 0 0 44 0 0 41 0 0 41 0 0 39 0 0 39 0 0 37 0 0 37 0 0 34 0 0 34 0 0 32 0 0 32 0 0 30 0 0 30 0 0 29 0 0 29 0 0 28 0 0 28 0 0 29 0 0 29 0 0 35 0 0 35 0 0 29 0 7 255 0 39 0 0 40 0 0 40 0 0 41 0 0 41 0 0 40 0 0 40 0 0 40 0 0 40 0 0 39 0 0 39 0 0 33 0 7 255 0 31 0 0 36 0 7 255 0 50 0 0 52 0 0 52 0 0 52 0 0 52 0 0 52 0 7 255 0 51 0 0 32 0 0 32 0 0 29 0 0 29 0 0 30 0 0 30 0 0 32 0 7 255 0 40 0 0 42 0 0 42 0 0 42 0 0 42 0 0 42 0 7 255 0 49 0 0 48 0 0 48 0 0 43 0 7 255 0 48 0 0 45 0 0 45 0 0 43 0 7 255 0 45 0 0 43 0 0 43 0 0 42 0 7 255 0 46 0 0 45 0 0 45 0 0 41 0 7 255 0 38 0 0 37 0 0 37 0 0 36 0 7 255 0 52 0 0 51 0 0 51 0 0 51 0 0 51 0 0 45 0 0 45 0 0 42 0 0 42 0 0 41 0 0 41 0 0 39 0 0 39 0 0 37 0 0 37 0 0 36 0 0 36 0 0 34 0 0 34 0 0 33 0 0 33 0 0 31 0 0 31 0 0 30 0 7 255 0 52 0 0 49 0 0 49 0 0 42 0 0 42 0 0 43 0 0 43 0 0 44 0 0 44 0 0 44 0 0 44 0 0 51 0 0 51 0 0 50 0 0 50 0 0 49 0 7 255 0 46 0 0 47 0 7 255 0 40 0 0 41 0 0 41 0 0 41 0 0 41 0 0 41 0 7 255 0 40 0 0 29 0 0 29 0 0 30 0 0 30 0 0 32 0 7 255 0 36 0 0 37 0 7 255 0 52 0 0 50 0 0 50 0 0 45 0 0 45 0 0 43 0 0 43 0 0 41 0 7 255 0 47 0 0 48 0 7 255 0 44 0 0 42 0 7 255 0 43 0 0 32 0 0 32 0 0 32 0 0 32 0 0 35 0 7 255 0 40 0 0 38 0 7 255 0 49 0 0 47 0 0 47 0 0 29 0 0 29 0 0 31 0 0 31 0 0 33 0 7 255 0 47 0 0 49 0 0 49 0 0 49 0 0 49 0 0 48 0 0 48 0 0 31 0 0 31 0 0 30 0 0 30 0 0 29 0 0 29 0 0 32 0 0 32 0 0 30 0 7 255 0 45 0 0 39 0 0 39 0 0 37 0 0 37 0 0 35 0 0 35 0 0 34 0 7 255 0 45 0 0 44 0 0 44 0 0 41 0 0 41 0 0 37 0 0 37 0 0 34 0 7 255 5 1 50 0 5 1 49 0 5 1 49 0 4 1 45 0 4 1 45 0 3 1 44 0 7 255 5 1 47 0 12 1 47 0 7 255 1 1 42 0 14 1 44 0 14 1 44 0 13 1 44 0 13 1 44 0 12 1 43 0 7 255 8 1 52 0 8 1 51 0 8 1 51 0 8 1 29 0 8 1 29 0 8 1 30 0 8 1 30 0 8 1 31 0 7 255 4 1 41 0 4 1 38 0 4 1 38 0 5 1 32 0 5 1 32 0 4 1 33 0 4 1 33 0 5 1 34 0 7 255 5 1 39 0 13 1 40 0 13 1 40 0 13 1 41 0 13 1 41 0 12 1 39 0 12 1 39 0 12 1 37 0 12 1 37 0 12 1 35 0 12 1 35 0 12 1 34 0 12 1 34 0 11 1 33 0 11 1 33 0 9 1 35 0 9 1 35 0 11 1 33 0 7 255 15 1 47 0 15 1 46 0 15 1 46 0 15 1 36 0 15 1 36 0 15 1 38 0 15 1 38 0 15 1 39 0 7 255 18 1 52 0 19 1 51 0 19 1 51 0 19 1 33 0 19 1 33 0 19 1 31 0 19 1 31 0 18 1 30 0 18 1 30 0 15 1 33 0 15 1 33 0 18 1 30 0 7 255 38 1 52 0 38 1 51 0 38 1 51 0 37 1 49 0 37 1 49 0 35 1 47 0 35 1 47 0 35 1 45 0 7 255 36 1 48 0 43 1 49 0 7 255 38 1 48 0 39 1 46 0 39 1 46 0 39 1 45 0 7 255 31 1 52 0 31 1 51 0 31 1 51 0 29 1 48 0 29 1 48 0 28 1 46 0 28 1 46 0 26 1 45 0 26 1 45 0 25 1 44 0 7 255 29 1 48 0 34 1 49 0 7 255 30 1 48 0 31 1 46 0 31 1 46 0 31 1 45 0 7 255 34 1 45 0 34 1 44 0 34 1 44 0 34 1 43 0 7 255 27 1 44 0 27 1 42 0 27 1 42 0 27 1 41 0 27 1 41 0 26 1 40 0 26 1 40 0 26 1 39 0 7 255 27 1 42 0 43 1 43 0 43 1 43 0 43 1 44 0 43 1 44 0 41 1 41 0 7 255 30 1 41 0 30 1 40 0 30 1 40 0 31 1 35 0 31 1 35 0 30 1 29 0 30 1 29 0 30 1 30 0 30 1 30 0 30 1 32 0 7 255 31 1 40 0 39 1 40 0 39 1 40 0 39 1 41 0 39 1 41 0 38 1 37 0 38 1 37 0 31 1 37 0 7 255 31 1 34 0 39 1 35 0 39 1 35 0 38 1 31 0 38 1 31 0 39 1 31 0 39 1 31 0 30 1 30 0 7 255 51 1 49 0 53 1 48 0 53 1 48 0 54 1 47 0 7 255 48 1 43 0 50 1 41 0 50 1 41 0 51 1 40 0 7 255 49 1 32 0 51 1 29 0 51 1 29 0 54 1 43 0 7 255 56 1 43 0 67 1 44 0 67 1 44 0 67 1 45 0 67 1 45 0 65 1 44 0 7 255 61 1 52 0 61 1 50 0 61 1 50 0 61 1 38 0 61 1 38 0 61 1 37 0 61 1 37 0 56 1 29 0 56 1 29 0 55 1 30 0 55 1 30 0 66 1 31 0 66 1 31 0 63 1 35 0 63 1 35 0 66 1 31 0 66 1 31 0 67 1 29 0 7 255 54 1 38 0 69 1 39 0 69 1 39 0 68 1 39 0 68 1 39 0 66 1 39 0 7 255 78 1 50 0 79 1 48 0 79 1 48 0 80 1 47 0 80 1 47 0 80 1 45 0 7 255 86 1 51 0 86 1 50 0 86 1 50 0 84 1 43 0 7 255 76 1 43 0 90 1 44 0 90 1 44 0 89 1 44 0 89 1 44 0 88 1 44 0 7 255 78 1 37 0 88 1 38 0 88 1 38 0 87 1 38 0 87 1 38 0 85 1 38 0 7 255 73 1 30 0 92 1 32 0 92 1 32 0 91 1 32 0 91 1 32 0 89 1 31 0 0)


then,i used
(_writestream "d:\\new.sld" (vl-list->string aaa) "w")    ----->

16

opend the file (new.sld)  with the notepad,i just got like this,

AutoCAD Slide


can you tell me ,why??????????????????????

i view this link that you gived,http://www.theswamp.org/index.php?topic=29889.0,you can do very well ,hepl me ,where is wrong



;;;(defun _ReadStream ( path len / fso file stream result )
    ;;  If the file is successful read the data is returned as
    ;;  a string. Won't be tripped up by nulls, control chars
    ;;  including ctrl z (eof marker). Pretty fast (feel free
    ;;  to bench mark / compare to alternates).
    ;;
    ;;  If the caller wants the result as a list of byte values
    ;;  simply use vl-string->list on the result:
    ;;
    ;;      (setq bytes
    ;;          (if (setq stream (_ReadStream path len))
    ;;              (vl-string->list stream)
    ;;          )
    ;;      )
    ;;
    ;;  Arguments:
    ;;
    ;;      path  <duh>
    ;;      len   Number of bytes to read. If non numeric, less
    ;;            than 1 or greater than the number of bytes in
    ;;            the file everything is returned.
    (vl-catch-all-apply
       '(lambda ( / iomode format size )
            (setq
                iomode  1 ;; 1 = read,   2 = write,    8 = append
                format  0 ;; 0 = ascii, -1 = unicode, -2 = system default
                fso     (vlax-create-object "Scripting.FileSystemObject")
                file    (vlax-invoke fso 'GetFile path)
                stream  (vlax-invoke fso 'OpenTextFile path iomode format)
                size    (vlax-get file 'Size)
                len     (if (and (numberp len) (< 0 len size)) (fix len) size)
                result  (vlax-invoke stream 'read len)
            )
            (vlax-invoke stream 'Close)
        )
    )
    (if stream (vlax-release-object stream))
    (if file (vlax-release-object file))
    (if fso (vlax-release-object fso))
    result
)

;;(defun _WriteStream ( path text mode / fso stream file result )

    ;;  Return the file size if the file is successfully written
    ;;  to, otherwise nil. Will write all ascii chars to file
    ;;  including nulls. If the caller wants to pass a list of
    ;;  byte values to the function just call it like so:
    ;;
    ;;      (_WriteStream
    ;;          path
    ;;          (vl-list->string '(87 111 111 116 33))
    ;;          mode
    ;;      )
    ;;
    ;;  Arguments:
    ;;
    ;;      path  <duh>
    ;;      text  <duh>
    ;;      mode  "a" to create/append,
    ;;            "w" to create/overwrite (default)
   
    (setq mode (if (member mode '("a" "A")) "a" "w"))
   
    (vl-catch-all-apply
       '(lambda ( / format )
            (setq fso (vlax-create-object "Scripting.FileSystemObject"))
            (cond
                (   (or (null (findfile path)) (eq "w" mode))
                    (setq stream
                        (vlax-invoke-method
                            fso
                           'CreateTextFile
                            path
                           -1 ;; 0 (false) = don't overwrite , -1 (true) = overwrite
                            0 ;; 0 (false) = ascii, -1 (true) = unicode
                        )
                    )
                    (setq file (vlax-invoke-method fso 'GetFile path))
                )
                (   (setq file (vlax-invoke-method fso 'GetFile path))
                    (setq stream
                        (vlax-invoke-method
                            file
                           'OpenAsTextStream
                            8 ;; 1 = read, 2 = write, 8 = append
                            0 ;; 0 = ascii, -1 = unicode, -2 system default
                        )
                    )       
                )
            )
            (vlax-invoke-method stream 'Write text)
            (vlax-invoke-method stream 'Close)
            (setq result (vlax-get file 'Size))
        )
    )

    (if file (vlax-release-object file))
    (if stream (vlax-release-object stream))
    (if fso (vlax-release-object fso))
   
    result
   
)



Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: hepl me ,Daniel
« Reply #1 on: January 05, 2010, 02:54:40 AM »

what happens when you
(command "._VSLIDE" "d:\\new.sld")


This works for me ..
Code: [Select]
(setq SlideText (vl-string->list (_readstream "K:\\Drawing1.sld" t)))

(_writestream "K:\\new.sld" (vl-list->string SlideText) "w")   

(command "._VSLIDE" "K:\\new.sld")
kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: hepl me ,Daniel
« Reply #2 on: January 05, 2010, 02:57:52 AM »

 Can you attach “d:\bsph.sld” in a ZIP or RAR file
kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #3 on: January 05, 2010, 03:14:13 AM »
when i used (command "._vslide" "d:\\new.sld")

autocad noticed like this:read sld file error!

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: hepl me ,Daniel
« Reply #4 on: January 05, 2010, 03:17:55 AM »


What happens when you

(command "._VSLIDE" "d:\\bsph.sld")

kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #5 on: January 05, 2010, 03:19:13 AM »
the sld file

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: hepl me ,Daniel
« Reply #6 on: January 05, 2010, 03:27:29 AM »

works for me.

See attachment
kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #7 on: January 05, 2010, 06:04:30 AM »
i done it as well as you,but i can't get the file (new.sld),it seems only 0kb!

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #8 on: January 05, 2010, 06:21:22 AM »
perhaps,there is something wrong in the "_writestream" and "_readstream",can you upload these files?


CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: hepl me ,Daniel
« Reply #9 on: January 05, 2010, 08:58:29 AM »
Look here for "_writestream" and "_readstream":
http://www.theswamp.org/index.php?topic=17465.0
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #10 on: January 05, 2010, 07:24:00 PM »
i also download from there(http://www.theswamp.org/index.php?topic=17465.0),but it does not work very well...

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: hepl me ,Daniel
« Reply #11 on: January 05, 2010, 07:27:07 PM »
i also download from there(http://www.theswamp.org/index.php?topic=17465.0),but it does not work very well...


As I said, works perfectly for me.


ALSO :

What happens when you

(command "._VSLIDE" "d:\\bsph.sld")

kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

It's Alive!

  • Retired
  • Needs a day job
  • Posts: 8690
  • AKA Daniel
Re: hepl me ,Daniel
« Reply #12 on: January 05, 2010, 07:28:03 PM »
These do work on my machine, what version of autocad are you using?

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #13 on: January 05, 2010, 07:35:23 PM »
I USED WINDOWS XP ,AUTOCAD 2004,

WHEN I USED (COMMAND ._VSLIDE "D:\\BSPH.SLD") ,IT WORKS WELL!!!

aicr317

  • Guest
Re: hepl me ,Daniel
« Reply #14 on: January 05, 2010, 07:41:42 PM »
ONCE I USED AUTOCAD2008 TO RUN IT , IT ALSO FAILED!!!!!!!!