Ввод текста

[security]

Отбой, проблема была в логике, к счастью. Автору сего творения респект и на пиво закину обязательно как будут деньги

[Simple Hosting]

Code: (clickermann) [Select]

// InstantCMS
#name "LogPass - InstantCMS"

//Создаешь рядом со скриптом файл "LogPass.txt" и в него записываешь строки по образцу

//Тест1@mail.ru:111111111
//Тест2@mail.ru:абвгд
//Тест3@mail.ru:тестТестТЕСТ

//Сам скрипт:

IF(TFCOUNT("LogPass.txt") > $count)
   INC($count,1)
ELSE
   HALT
END_IF
$str = TFREAD ("LogPass.txt", $count)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))

LCLICK(1070,355) // клик по полю логина (координаты свои)
WAITMS (50)
TOCLIP($log) // скопировать логин в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYPRESS(#V)
WAITMS (50)
KEYUP (#CTRL)
WAITMS (50)

KEYPRESS(#TAB)
WAIT(2)

TOCLIP($pass) // скопировать пароль в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYPRESS(#V)
WAITMS (50)
KEYUP (#CTRL)
WAITMS (100)
KEYPRESS(#ENTER) // войти
WAIT(5)
LCLICK(1240,120)  // выйти

// тут команды после входа
WAIT(5)

//Каждый новый проход будет считываться новая строка с логином и паролемПодскажите, как можно отобрать случайные строки, скажем запускаешь первый раз и вставляется: 1-я, 7-я и 12-я строка, в следующий раз: 4-я, 9-я, 10-я, 12-я и 14-я строка...?

[Атеист]

Подскажите, как можно отобрать случайные строки, скажем запускаешь первый раз и вставляется: 1-я, 7-я и 12-я строка, в следующий раз: 4-я, 9-я, 10-я, 12-я и 14-я строка...?

Вот нашел одну тему, где обсуждалось подобное - Случайный порядок.
Еще где то было,... там 8 из 12 рандомно выбирали кажется. Не смог найти.

[Simple Hosting]

Ладно пусть будет так:
Создаю папку "CMD"

1.cmd

Code: (cmd) [Select]

type LogPass.txt | shuffle.cmd > result.txt
2delstr.cmd

Code: (cmd) [Select]

@echo off
set "file=result.txt"
>.tmp more +10 "%file%"& >nul move .tmp "%file%"
exit/b
3.cmd

Code: (cmd) [Select]

del "D:\Portable\PortableApps\Clickermann v4.13 x64\LogPass.txt"
copy "result.txt" "D:\Portable\PortableApps\Clickermann v4.13 x64\LogPass.txt"
del *.tmp
del result.txt
shuffle.cmd

Code: (cmd) [Select]

@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
SET TmpFile=tmp%RANDOM%%RANDOM%.tmp
TYPE NUL >%Tmpfile%
FOR /F "tokens=*" %%i IN ('MORE') DO SET Key=!RANDOM!!RANDOM!!RANDOM!000000000000& ECHO !Key:~0,15!%%i>> %TmpFile%
FOR /F "tokens=*" %%i IN ('TYPE %TmpFile% ^| SORT') DO SET Line=%%i&ECHO.!Line:~15!
::DEL %TmpFile%
ENDLOCAL
P.S.:
Как рандомно перемешать все строки в очень большом файле?
https://toster.ru/q/336263

Удаление первых 6-ти строк во всех текстовых файлах, находящихся в определённой папке
http://www.cyberforum.ru/cmd-bat/thread1596355.html

[Oraven]

Подскажите, как можно отобрать случайные строки, скажем запускаешь первый раз и вставляется: 1-я, 7-я и 12-я строка, в следующий раз: 4-я, 9-я, 10-я, 12-я и 14-я строка...?

Code: (clickermann) [Select]

TFREADARR("LogPass.txt", $arr_t)
$r = RND(3,4) // случайное количество считываемых строк 3-4
$i2 = 0
FOR($i = ARRSIZE($arr_t)-1, ($i>-1)&($i2<$r), -1)
   INC($i2,1)
   $n = RND(0,$i)
   $log = STRCUT2 ($arr_t[$n], 1, STRPOS ($arr_t[$n], ":")-1)
   $pass = STRCUT2 ($arr_t[$n], STRPOS ($arr_t[$n], ":")+1, STRLEN ($arr_t[$n]))
   
   LCLICK(1070,355) // клик по полю логина (координаты свои)
   WAITMS (50)
   
   TOCLIP($log) // скопировать логин в буфер
   WAITMS (50)
   
   KEYDOWN (#CTRL) // вставить
   WAITMS (50)
   KEYPRESS(#V)
   WAITMS (50)
   KEYUP (#CTRL)
   WAITMS (50)
   
   KEYPRESS(#TAB)
   WAIT(2)
   
   TOCLIP($pass) // скопировать пароль в буфер
   WAITMS (50)
   
   KEYDOWN (#CTRL) // вставить
   WAITMS (50)
   KEYPRESS(#V)
   WAITMS (50)
   KEYUP (#CTRL)
   WAITMS (100)
   
   KEYPRESS(#ENTER) // войти
   WAIT(5)
   //   Каждый новый проход будет считываться новая строка с логином и паролем
   
   
   
   $arr_t[$n] = $arr_t[$i]
   $tmp = ARRPOP($arr_t)
END_CYC
UNDEFINE($arr_t)

[Simple Hosting]

Боже, чёрный котик - спасибо тебе.

Code: (clickermann) [Select]

#name "LogPass"

TFREADARR("LogPass.txt", $arr_t)
$r = RND(3,4) // случайное количество считываемых строк 3-4
$i2 = 0
FOR($i = ARRSIZE($arr_t)-1, ($i>-1)&($i2<$r), -1)
   INC($i2,1)
   $n = RND(0,$i)
   $log = STRCUT2 ($arr_t[$n], 1, STRPOS ($arr_t[$n], ":")-1)
   $pass = STRCUT2 ($arr_t[$n], STRPOS ($arr_t[$n], ":")+1, STRLEN ($arr_t[$n]))

   LCLICK(1070,355) // клик по полю логина (координаты свои)
   WAITMS (50)

   TOCLIP($log) // скопировать логин в буфер
   WAITMS (50)

   KEYDOWN (#CTRL) // вставить
   WAITMS (50)
   KEYPRESS(#V)
   WAITMS (50)
   KEYUP (#CTRL)
   WAITMS (50)

   KEYPRESS(#TAB)
   WAIT(2)

   TOCLIP($pass) // скопировать пароль в буфер
   WAITMS (50)

   KEYDOWN (#CTRL) // вставить
   WAITMS (50)
   KEYPRESS(#V)
   WAITMS (50)
   KEYUP (#CTRL)
   WAITMS (100)

   KEYPRESS(#ENTER) // войти
   WAIT (5)
   LCLICK(1240,120) // выйти
   WAIT (5)
   //   Каждый новый проход будет считываться новая строка с логином и паролем

   $arr_t[$n] = $arr_t[$i]
   $tmp = ARRPOP($arr_t)
END_CYC
UNDEFINE($arr_t)
HALT