161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
|
else
tbl[#tbl+1] = string.sub(ss,1,d-1)
end
until i > string.len(str)
return tbl
end;
rand = function(min,max)
if not min then min = 16 end
if not max then max = min end
local str = ''
local r_int = 0x39 - 0x30
local r_upper = r_int + (0x5a - 0x41)
local r_lower = r_upper + (0x7a - 0x61)
for i = 1,math.random(max - min) + min do
-- 0x30 -- 0x39
-- 0x41 -- 0x5A
-- 0x61 -- 0x71
local codepoint = math.random(r_lower)
if codepoint > r_upper then
codepoint = (codepoint - r_upper) + 0x61
elseif codepoint > r_int then
codepoint = (codepoint - r_int) + 0x41
else
codepoint = codepoint + 0x30
end
str = str .. string.char(codepoint)
end
return str
end;
chop = function(str)
if string.sub(str, 1,1) == ' ' then
str = string.sub(str, 2)
end
if string.sub(str, #str,#str) == ' ' then
str = string.sub(str, 1, #str - 1)
|
|
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
|
else
tbl[#tbl+1] = string.sub(ss,1,d-1)
end
until i > string.len(str)
return tbl
end;
rand = function(rng, min,max)
if not min then min = 16 end
if not max then max = min end
local str = ''
local r_int = 0x39 - 0x30
local r_upper = r_int + (0x5a - 0x41)
local r_lower = r_upper + (0x7a - 0x61)
for i = 1,rng:int(min,max) do
-- 0x30 -- 0x39
-- 0x41 -- 0x5A
-- 0x61 -- 0x71
local codepoint = rng:int(r_lower)
if codepoint > r_upper then
codepoint = (codepoint - r_upper) + 0x61
elseif codepoint > r_int then
codepoint = (codepoint - r_int) + 0x41
else
codepoint = codepoint + 0x30
end
str = str .. string.char(codepoint)
end
return str
end;
htsan = function(str)
return str:gsub('([<\\])', '\\%1')
end;
chop = function(str)
if string.sub(str, 1,1) == ' ' then
str = string.sub(str, 2)
end
if string.sub(str, #str,#str) == ' ' then
str = string.sub(str, 1, #str - 1)
|