, ( | )

    
4 V < 1 2 3 4 >  
>  | .
V
sutra
29.1.2019, 4:02
#41


*******

Adept
: 923
: 10.8.2018
:
: 0
: 19.007



, . . - "" . , - -. - , .
  Delete Post
+
FREEON
29.1.2019, 11:47
#42


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(cirus @ 29.1.2019, 3:02) *

, . .

Lua , ... ... (IMG:style_emoticons/default/mellow.gif)
%s --
http://uopilot.tati.pro/index.php?title=String.gsub_(Lua)
  !Delete Post
+
FREEON
29.1.2019, 12:27
#43


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(FREEON @ 29.1.2019, 11:47) *

- ...

--lua
log "clear"  log "mode compact"

local text=[[..-.. .---  - .- -- ]]     -- " "
--local text=" "     --  [[-.-\.-\-.-\\\-..\.\.-..\.-\]]
log(text)

local t, t1, temp = {}, {}, {}
t[""]=".-"     t[""]="-..."   t[""]=".--"    t[""]="--."    t[""]="-.."    t[""]="."    t[""]="."
t[""]="...-"   t[""]="--.."   t[""]=".."     t[""]=".---"   t[""]="-.-"    t[""]=".-.."   t[""]="--"
t[""]="-."     t[""]="---"    t[""]=".--."   t[""]=".-."    t[""]="..."    t[""]="-"   t[""]="..-"
t[""]="..-."   t[""]="...."   t[""]="-.-."   t[""]="---."   t[""]="----"   t[""]="--.-"   t[""]="-..-"
t[""]="-..-"   t[""]="-.--"   t[""]="..-.."  t[""]="..--"   t[""]=".-.-"
for v in pairs(t) do temp[string_lower(v)]=t[v] end
for v in pairs(temp) do t[v]=temp[v] end
t["1"]=".----"  t["2"]="..---"  t["3"]="...--"  t["4"]="....-"  t["5"]="....."  t["6"]="-...."  t["7"]="--..."
t["8"]="---.."  t["9"]="----."  t["0"]="-----"  t["."]="......" t[":"]="---..." t[";"]="-.-.-." t["("]="-.--.-"
t[")"]="-.--.-" t["'"]=".----." t['"']=".-..-." t["-"]="-....-" t["/"]="-..-."  t["?"]="..--.." t["!"]="--..--"
t[","]=".-.-.-"
for v in pairs(t) do t1[t[v]]=v end   -- , 't'

local x=0
for v in text:gmatch("[%.%-%(%s)]") do x=x+1 end  -- ,

if x > #text*50/100 then   -- 50%,
    text=string.gsub(text:gsub("(.-)(%s)", t1), "(%s)(%s)", " ")    --
else
    text=string.gsub(string.gsub(text:gsub("([^ ])", "%1 "), "%s", " "), "[^ ]", t)   --
end
log (text)

(IMG:style_emoticons/default/rolleyes.gif)
  !Delete Post
+
DarkMaster
29.1.2019, 13:10
#44


***********

UOPilot
: 9.460
: 2.12.2008
:
: 27707
: 11.279



in pairs(t)

. next - , .


--------------------
UOPilot .
UOpilot 15$/.
Lua ( , , )
Disrd:
Kov____
  Delete Post
+
cirus
29.1.2019, 13:27
#45


**********

Elder
: 3.480
: 18.8.2014
:
: 26576
: 16.971
: 29



--lua
log "clear"  log "mode compact"

local text=[[-.- .- -.-   -.. . .-.. .-]]     -- " "
--local text=" "     --  [[-.-\.-\-.-\\\-..\.\.-..\.-\]]
log(text)

local t, t1, temp = {}, {}, {}
t[""]=".-"     t[""]="-..."   t[""]=".--"    t[""]="--."    t[""]="-.."    t[""]="."    t[""]="."
t[""]="...-"   t[""]="--.."   t[""]=".."     t[""]=".---"   t[""]="-.-"    t[""]=".-.."   t[""]="--"
t[""]="-."     t[""]="---"    t[""]=".--."   t[""]=".-."    t[""]="..."    t[""]="-"   t[""]="..-"
t[""]="..-."   t[""]="...."   t[""]="-.-."   t[""]="---."   t[""]="----"   t[""]="--.-"   t[""]="-..-"
t[""]="-..-"   t[""]="-.--"   t[""]="..-.."  t[""]="..--"   t[""]=".-.-"
for v in pairs(t) do temp[string_lower(v)]=t[v] end
for v in pairs(temp) do t[v]=temp[v] end
t["1"]=".----"  t["2"]="..---"  t["3"]="...--"  t["4"]="....-"  t["5"]="....."  t["6"]="-...."  t["7"]="--..."
t["8"]="---.."  t["9"]="----."  t["0"]="-----"  t["."]="......" t[":"]="---..." t[";"]="-.-.-." t["("]="-.--.-"
t[")"]="-.--.-" t["'"]=".----." t['"']=".-..-." t["-"]="-....-" t["/"]="-..-."  t["?"]="..--.." t["!"]="--..--"
t[","]=".-.-.-"
for v in pairs(t) do t1[t[v]]=v end   -- , 't'

local x=0
for v in text:gmatch("[%.%- ]") do x=x+1 end  -- ,

if x > #text*50/100 then   -- 50%,
    text=string.gsub((text .. " "):gsub("(.-) ", t1), "  ", " ")    --
else
    text=string.gsub(text:gsub("(.)", "%1 "), "[^ ]", t)  --
end
log (text)
  !Delete Post
+
FREEON
23.4.2019, 22:34
#46


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



CP1251 UTF-8

--lua
log ("clear")   log ("mode compact")
local q = clipboard ()      -- text

wait (300)                     -- 300
log (q)                     -- text
log()
local t={}
t["А"]="" t["Б"]="" t["В"]="" t["Г"]="" t["Д"]="" t["Е"]="" t["Ё"]="" t["Ж"]="" t["З"]="" t["И"]="" t["Й"]=""
t["К"]="" t["Л"]="" t["М"]="" t["Н"]="" t["О"]="" t["П"]="" t["Р"]="" t["С"]="" t["Т"]="" t["У"]="" t["Ф"]=""
t["Х"]="" t["Ц"]="" t["Ч"]="" t["Ш"]="" t["Щ"]="" t["Ъ"]="" t["Ы"]="" t["Ь"]="" t["Э"]="" t["Ю"]="" t["Я"]=""
t["а"]="" t["б"]="" t["в"]="" t["г"]="" t["д"]="" t["е"]="" t["ё"]="" t["ж"]="" t["з"]="" t["и"]="" t["й"]=""
t["к"]="" t["л"]="" t["м"]="" t["н"]="" t["о"]="" t["п"]="" t["р"]="" t["с"]="" t["т"]="" t["%у"]="" t["ф"]=""
t["х"]="" t["ц"]="" t["ч"]="" t["ш"]="" t["щ"]="" t["ъ"]="" t["ы"]="" t["ь"]="" t["э"]="" t["ю"]="" t["я"]=""
local s = (string.gsub(q, "[]x", t))  -- ???
log (s)
clipboard (s)                  --

:
абвгдеёжзийклмнопрстуфхцчшщъыьэюя
АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ
  !Delete Post
+
FREEON
29.10.2019, 16:14
#47


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



. file1.txt ():
, * "
, </tr> , <tr> </tr> <tr>
file2.html <!-- 1 --> file1.txt
,
  !Delete Post
+
Fors1k
30.10.2019, 1:59
#48


*****

Journeyman
: 497
: 19.12.2017
:
: 2419
: 18.746



(FREEON @ 29.10.2019, 16:14) *

. file1.txt ():
, * "
, </tr> , <tr> </tr> <tr>
file2.html <!-- 1 --> file1.txt
,

//-----
set $a *
set $a1 "
set $b </tr> , <tr>
set $b1 </tr> <tr>
set $c "<!-- 1 -->"
//-----
load_array %file1 c:/2/file1.txt
for #i 1 size(%file1)
    set $file1 %file1[#i]
    set %file1[#i] string_replace($file1 $a $a1 all)
    set $file1 %file1[#i]
    set %file1[#i] string_replace($file1 $b $b1 all)
end_for
load_array %file2 c:/2/file2.txt
set #res indexOf(%file2 noabs ($c))
set #nd #res - 1
for #i 1 #nd
    set %file2a[#i] %file2[#i]
end_for
for #i 1 size(%file1)
    set #j #i + #nd
    set %file2a[#j] %file1[#i]
end_for
save_array %file2a c:/2/file2_new.txt
set #res1 #res + 1
for #i #res1 size(%file2)
    write (c:/2/file2_new.txt %file2[#i] \r\n)
end_for
end_script


--------------------
  Delete Post
+
FREEON
30.10.2019, 11:27
#49


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(Fors1k @ 30.10.2019, 1:59) *


indexOf . ... - .

//-----
set $a *
set $a1 "
set $b </tr> , <tr>
set $b1 </tr> <tr>
set $c "<!-- 1 -->"
//-----
load_array %file1 c:\123.txt
for #i 1 size(%file1)
    set $file1 %file1[#i]
    set %file1[#i] string_replace($file1 $a $a1 all)
    set $file1 %file1[#i]
    set %file1[#i] string_replace($file1 $b $b1 all)
    //write (D:\123\1_rez.txt %file1[#i] \r\n) // .
end_for

load_array %file2 D:\123\2.txt
set #res indexOf(%file2 noabs ($c))
set #nd #res - 1
for #i 1 #nd
    set %file2a[#i] %file2[#i]
end_for
for #i 1 size(%file1)
    set #j #i + #nd
    set %file2a[#j] %file1[#i]
    //write (D:\123\2_new.txt %file2a[#i] \r\n)  // 3() #i #j
end_for
//save_array %file2a D:\123\2_new.txt  // 0
end_script          //
set #res1 #res + 1
for #i #res1 size(%file2)
    write (D:\123\2_new.txt %file2[#i] \r\n)
end_for
end_script
  !Delete Post
+
cirus
30.10.2019, 12:46
#50


**********

Elder
: 3.480
: 18.8.2014
:
: 26576
: 16.971
: 29



. file1.txt ():
, * "
, </tr> , <tr> </tr> <tr>

--lua
local file= io.open([[C:\123.txt]], "r")          --
local result_file = io.open([[C:\456.txt]], "w")  --

if file and result_file then     --
    for v in file:lines() do
        local s=v:gsub("*", '"')  --
        s=s:gsub("(</tr>)( , )(<tr>)", "%1 %3")  --
        result_file:write(s .. "\n")
    end

    file:close()
    result_file:close()
else
    log (" /")
end
  !Delete Post
+
Fors1k
30.10.2019, 13:09
#51


*****

Journeyman
: 497
: 19.12.2017
:
: 2419
: 18.746




indexOf . ... - .

, .

File1
In Winter *I get up* at night
And </tr> , <tr>dress by yellow</tr> , <tr> candle light.
In *Summer, quite the other way,
I have to go to bed by day</tr> , <tr>.

File2
123_abc
456_efg
<!-- 1 -->
789
123qwe123
777 hello

File2_new
123_abc
456_efg
In Winter "I get up" at night
And </tr> <tr>dress by yellow</tr> <tr> candle light.
In "Summer, quite the other way,
I have to go to bed by day</tr> <tr>.

789
123qwe123
777 hello


1 2, .


--------------------
  Delete Post
+
FREEON
30.10.2019, 13:30
#52


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(Fors1k @ 30.10.2019, 13:09) *

, .

File1

File2

File2_new
1 2, .

, ... :
(27): ! ! EAccessViolation Access violation at address 005531E6 in module uopilot241.exe'. Read of address FFFFFFFC
calc c:/2/file2_new.txt %file2[*i]
  !Delete Post
+
Fors1k
30.10.2019, 13:35
#53


*****

Journeyman
: 497
: 19.12.2017
:
: 2419
: 18.746



(FREEON @ 30.10.2019, 13:30) *



(FREEON @ 30.10.2019, 13:30) *

calc c:/2/file2_new.txt %file2[*i]

*i =)) .


--------------------
  Delete Post
+
FREEON
30.10.2019, 13:48
#54


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(Fors1k @ 30.10.2019, 13:35) *

*i =)) .

- . #i file2_new.txt 2 file2
file2_new.txt

In "Summer, quite the other way,
I have to go to bed by day</tr> <tr>.
  !Delete Post
+
Fors1k
30.10.2019, 14:46
#55


*****

Journeyman
: 497
: 19.12.2017
:
: 2419
: 18.746



(FREEON @ 30.10.2019, 13:48) *

.

.

[+]


--------------------
  Delete Post
+
FREEON
30.10.2019, 15:41
#56


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(Fors1k @ 30.10.2019, 14:46) *

.

[+]


... ... _
  !Delete Post
+
FREEON
30.10.2019, 18:15
#57


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(FREEON @ 30.10.2019, 15:41) *

... ... _

) , , fele2.txt .
- .
  !Delete Post
+
cirus
31.10.2019, 1:26
#58


**********

Elder
: 3.480
: 18.8.2014
:
: 26576
: 16.971
: 29



?
  !Delete Post
+
FREEON
31.10.2019, 7:04
#59


*****

Journeyman
: 365
: 14.2.2017
:
: 1320
: 18.346
: 25



(cirus @ 31.10.2019, 1:26) *

?

lua. , , , . .
( ), - lua? ...
  !Delete Post
+
Fors1k
31.10.2019, 8:04
#60


*****

Journeyman
: 497
: 19.12.2017
:
: 2419
: 18.746



(FREEON @ 30.10.2019, 18:15) *



, )


--------------------
  Delete Post
+
 

4 V < 1 2 3 4 >
1 . (: 1, : 0)
: 0

 

: · : · :

· · ·

- | : 29.3.2024, 11:44
Designed by Nickostyle