Page 1 sur 1

[R] Multiplier une String

Posté : jeu. 28 août 2014 13:48
par lordac
Bonjour,

Je suis en train de faire un bot pour ecrire du texte dans une conversation skype et de mettre un /topic devant pour changer le titre de la conversation.

Voici mon code :

Code : Tout sélectionner



Func Defilant($text, $num)

        Local $texttopic

    $lenght = StringLen($text)

    $char = StringMid($text, $lenght - $num)

    $texttopic = $texttopic & $char

    Return $texttopic

EndFunc



$var1 = 1
While 1
HotKeySet("{F1}", "Main")

HotKeySet("{F2}", "Expe")
WEnd

Func Main()

Do
ClipPut("/topic "& Defilant("MotAEcrire", $var1))
ControlSend("","","","^v")



If $var1 = StringLen("MotAEcrire") Then
    $var1 = 1
EndIf

Send("{ENTER}")

$var1 = $var1 + 1

Until 1=2


EndFunc


Func Expe()
    Exit
EndFunc

 

Donc justement je suis bloqué car pour faire un titre défilant il faut mettre des espaces devant le mot pour faire un effet defilant sur le titre de la conversation sauf que je voudrai multiplier un espace exemple : " " * $num mais cela n'est pas possible donc il me faut une fonction pour faire cela, et aussi il faut supprimer les caracteres en trop apres pour faire un effet defilant pour ça pas de probleme juste comme ça :

Code : Tout sélectionner

$right = StringRight($text, $num)
$new = StringReplace($text, $right, "")
 
Merci de m'avoir lu et j'espère que vous avez une solution.

Re: [..] Multiplier une String

Posté : jeu. 28 août 2014 17:07
par Faco
► Afficher le texte