mIRC Home    About    Download    Register    News    Help

Print Thread
#270622 06/08/22 12:18 PM
Joined: Nov 2021
Posts: 91
Simo Offline OP
Babel fish
OP Offline
Babel fish
Joined: Nov 2021
Posts: 91
anyway to make this shorter :


Code

testext { echo -a $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z))  $Regsubex($Str(-,$r(5,20)),/-/g,$Rand(a,z)) }



random words between 5 and 50 with random characters between 5 and 20

Joined: Jan 2004
Posts: 2,127
Hoopy frood
Offline
Hoopy frood
Joined: Jan 2004
Posts: 2,127
he ended up being satisfied with
//echo -a $regsubex($regsubex($str(- $+ $chr(32),$r(5,50)),/-/g,$str(-,$r(5,20))),/-/g,$r(a,z))
If this is used in an /echo which discards consecutive spaces, then can skip the $+ preceding the $chr(32)

Joined: Nov 2021
Posts: 91
Simo Offline OP
Babel fish
OP Offline
Babel fish
Joined: Nov 2021
Posts: 91
thanks maroon


Link Copied to Clipboard