Page 1 sur 1
[Ex] Coller des bô smiley facilement
Posté : jeu. 04 déc. 2008 16:57
par Iste
Salut
Une amie aimai beaucoup les smiley que l'on avait sur un vieux forum
, seulement, on ne l'utilise plus, et les smiley n'etaient pas sur les autres forum
, c'est donc pour ca quej'ai fait ce petit script qui permet de coller facilement ces smiley dans des messages !
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstants.au3>
GUICreate("My GUI", 500,400) ; will create a dialog box that when displayed is centered
GUISetBkColor (0x000000)
dim $image[79]
$x = 0
$y = 0
$img = 0
While $img < 79
$image[$img]=GUICtrlCreatePic("images/img ("&$img&").gif",$x,$y,50,50)
$x = $x+ 50
$img = $img+ 1
If $x >450 Then
$x=0
$y = $y+ 50
EndIf
Wend
guisetstate()
while 1
$code=guigetmsg()
if $code=-3 then exit ; pour quitter c'est mieux ^^
if $code=$image[0] Then ClipPut ( "[img]http://images0.hiboox.com/images/4908/a5d4c07898d96f04a250888ac1ba3632.gif[/img]" )
if $code=$image[1] Then ClipPut ( "[img]http://images0.hiboox.com/images/4908/2a9020516c463e50948d10cb91083900.gif[/img]" )
if $code=$image[2] Then ClipPut ( "[img]http://images0.hiboox.com/images/4908/2004601c91cfab787fd262518ff63be7.gif[/img]" )
if $code=$image[3] Then ClipPut ( "[img]http://images0.hiboox.com/images/4908/e853e8b21c00698b7b5c70d7d2910b57.gif[/img]" )
if $code=$image[4] Then ClipPut ( "[img]http://images4.hiboox.com/images/4908/504d45a825f5a442a12b23a86493db66.gif[/img]" )
if $code=$image[5] Then ClipPut ( "[img]http://images2.hiboox.com/images/4908/4badeb5cb3a04f9f7091ee2638a8e29f.gif[/img]" )
if $code=$image[6] Then ClipPut ( "[img]http://images2.hiboox.com/images/4908/f99776aa6e377457db52c552867906c0.gif[/img]" )
if $code=$image[7] Then ClipPut ( "[img]http://images1.hiboox.com/images/4908/b2bddcb337c58086cb0a79171bae438d.gif[/img]" )
if $code=$image[8] Then ClipPut ( "[img]http://www.easy4images.com/images/i2b461x20f9x40lhj0j.gif[/img]" )
if $code=$image[9] Then ClipPut ( "[img]http://www.easy4images.com/images/xgfc7egogltgm8tqqce8.gif[/img]" )
if $code=$image[10] Then ClipPut ( "[img]http://www.easy4images.com/images/wi89cur5a7t50h62rjzk.gif[/img]" )
if $code=$image[11] Then ClipPut ( "[img]http://www.easy4images.com/images/ovs45xwvokoxqu7u4zff.gif[/img]" )
if $code=$image[12] Then ClipPut ( "[img]http://www.easy4images.com/images/fpm0f1e52sz6u3x2a4ev.gif[/img]" )
if $code=$image[13] Then ClipPut ( "[img]http://www.easy4images.com/images/smo6gtisy4qz6aerb8fv.gif[/img]" )
if $code=$image[14] Then ClipPut ( "[img]http://www.easy4images.com/images/vdkn4l2hq9ga0hbctqq.gif[/img]" )
if $code=$image[15] Then ClipPut ( "[img]http://www.easy4images.com/images/uu689thxl51pwwnvs5ee.gif[/img]" )
if $code=$image[16] Then ClipPut ( "[img]http://www.easy4images.com/images/7y3jilxqf5jas16rru0.gif[/img]" )
if $code=$image[17] Then ClipPut ( "[img]http://www.easy4images.com/images/y0q7rg0opjt9utm3zezs.gif[/img]" )
if $code=$image[18] Then ClipPut ( "[img]http://www.easy4images.com/images/rkgtev2kn1fenh0fhlfo.gif[/img]" )
if $code=$image[19] Then ClipPut ( "[img]http://www.easy4images.com/images/2344uwk0osz6onlgk7lo.gif[/img]" )
if $code=$image[20] Then ClipPut ( "[img]http://www.easy4images.com/images/anl01tospn7rsmaln7jh.gif[/img]" )
if $code=$image[21] Then ClipPut ( "[img]http://www.easy4images.com/images/jlqo22ll239ht9ry3wcs.gif[/img]" )
if $code=$image[22] Then ClipPut ( "[img]http://www.easy4images.com/images/8hcrxsqpoyxehjtzvie.gif[/img]" )
if $code=$image[23] Then ClipPut ( "[img]http://www.easy4images.com/images/4m2itmphpepe2nxn.gif[/img]" )
if $code=$image[24] Then ClipPut ( "[img]http://www.easy4images.com/images/phblhbguh7jmu40c9i9.gif[/img]" )
if $code=$image[25] Then ClipPut ( "[img]http://www.easy4images.com/images/5m4r9ixgdz49vf0kpdyk.gif[/img]" )
if $code=$image[26] Then ClipPut ( "[img]http://www.easy4images.com/images/y5uefq3b8txegidvaj45.gif[/img]" )
if $code=$image[27] Then ClipPut ( "[img]http://www.easy4images.com/images/i7yhlsah9qfjpyzgjx2p.gif[/img]" )
if $code=$image[28] Then ClipPut ( "[img]http://www.easy4images.com/images/rxzj2g7kgbft7t0c5l8.gif[/img]" )
if $code=$image[29] Then ClipPut ( "[img]http://www.easy4images.com/images/yz7i1mfaposcimpwhjej.gif[/img]" )
if $code=$image[30] Then ClipPut ( "[img]http://www.easy4images.com/images/vl3fnchy7u2jabvdgxf0.gif[/img]" )
if $code=$image[31] Then ClipPut ( "[img]http://www.easy4images.com/images/pg8s5ew5zziynxoswqf.gif[/img]" )
if $code=$image[32] Then ClipPut ( "[img]http://www.easy4images.com/images/ysxylf1gm2ttz4s9fd7p.gif[/img]" )
if $code=$image[33] Then ClipPut ( "[img]http://www.easy4images.com/images/4xmgh0rq2rtfypic2zw.gif[/img]" )
if $code=$image[34] Then ClipPut ( "[img]http://www.easy4images.com/images/dlz9jcrek28j1exxhv.gif[/img]" )
if $code=$image[35] Then ClipPut ( "[img]http://www.easy4images.com/images/u2ygexxwxtp6pp1tpyp4.gif[/img]" )
if $code=$image[36] Then ClipPut ( "[img]http://www.easy4images.com/images/i3iicfami16hslfpdw5l.gif[/img]" )
if $code=$image[37] Then ClipPut ( "[img]http://www.easy4images.com/images/dpakepbu9kjq07youyn.gif[/img]" )
if $code=$image[38] Then ClipPut ( "[img]http://www.easy4images.com/images/0xdjpr2l0f2o1ur6czzq.gif[/img]" )
if $code=$image[39] Then ClipPut ( "[img]http://www.easy4images.com/images/fzhd5isfawae0vwr80l9.gif[/img]" )
if $code=$image[40] Then ClipPut ( "[img]http://www.easy4images.com/images/16zofy9whzsh0gpjb629.gif[/img]" )
if $code=$image[41] Then ClipPut ( "[img]http://www.easy4images.com/images/vqxhvt6dv4oxtwiwrvkq.gif[/img]" )
if $code=$image[42] Then ClipPut ( "[img]http://www.easy4images.com/images/ctfevgdlhj763w96alwi.gif[/img]" )
if $code=$image[43] Then ClipPut ( "[img]http://www.easy4images.com/images/owy7ftyxoeskjonkho4d.gif[/img]" )
if $code=$image[44] Then ClipPut ( "[img]http://www.easy4images.com/images/vj6pbltu06h2muy74we8.gif[/img]" )
if $code=$image[45] Then ClipPut ( "[img]http://www.easy4images.com/images/mgy6s8giz2zr82tb1iu3.gif[/img]" )
if $code=$image[46] Then ClipPut ( "[img]http://www.easy4images.com/images/yakdbue0v0f7qvzem15.gif[/img]" )
if $code=$image[47] Then ClipPut ( "[img]http://www.easy4images.com/images/feyi7j2rccdy9nbcul4.gif[/img]" )
if $code=$image[48] Then ClipPut ( "[img]http://www.easy4images.com/images/luy0wf0plbtl1zsez60w.gif[/img]" )
if $code=$image[49] Then ClipPut ( "[img]http://www.easy4images.com/images/vo2bmpoc2tn57ijkkj41.gif[/img]" )
if $code=$image[50] Then ClipPut ( "[img]http://www.easy4images.com/images/pclmda6qrpui1l1d34sb.gif[/img]" )
if $code=$image[51] Then ClipPut ( "[img]http://www.easy4images.com/images/ijlb5lm5a9olkm0l9hfe.gif[/img]" )
if $code=$image[52] Then ClipPut ( "[img]http://www.easy4images.com/images/z4iox3y13qiq8dzx3iur.gif[/img]" )
if $code=$image[53] Then ClipPut ( "[img]http://www.easy4images.com/images/lkb67fm6t4d4mc4ho25.gif[/img]" )
if $code=$image[54] Then ClipPut ( "[img]http://www.easy4images.com/images/ybsklyrbnqwmdolwysx.gif[/img]" )
if $code=$image[55] Then ClipPut ( "[img]http://www.easy4images.com/images/qqq3gjhcdwhlvzozn83m.gif[/img]" )
if $code=$image[56] Then ClipPut ( "[img]http://www.easy4images.com/images/fhwnijgbgbralhi7bom5.gif[/img]" )
if $code=$image[57] Then ClipPut ( "[img]http://www.easy4images.com/images/tdcgt5yi18wv9fki7h3i.gif[/img]" )
if $code=$image[58] Then ClipPut ( "[img]http://www.easy4images.com/images/41oagkawoj6opveh2bo.gif[/img]" )
if $code=$image[59] Then ClipPut ( "[img]http://www.easy4images.com/images/x7xzhccgstv1e3hv8x.gif[/img]" )
if $code=$image[60] Then ClipPut ( "[img]http://www.easy4images.com/images/mlet8qdvtn1fm4jm1ta.gif[/img]" )
if $code=$image[61] Then ClipPut ( "[img]http://www.easy4images.com/images/vafe92wy1byq0hl0g3fq.gif[/img]" )
if $code=$image[62] Then ClipPut ( "[img]http://www.easy4images.com/images/s8qa2z8hd782teyi2fmc.gif[/img]" )
if $code=$image[63] Then ClipPut ( "[img]http://www.easy4images.com/images/d0yxk7fn7xqxnhfm32g.gif[/img]" )
if $code=$image[64] Then ClipPut ( "[img]http://www.easy4images.com/images/cujsvgwj2dwnh1lwzs.gif[/img]" )
if $code=$image[65] Then ClipPut ( "[img]http://www.easy4images.com/images/o0gvpghr0w3txdvjt4tr.gif[/img]" )
if $code=$image[66] Then ClipPut ( "[img]http://www.easy4images.com/images/hv8f1i28ewp20f2hfj62.gif[/img]" )
if $code=$image[67] Then ClipPut ( "[img]http://www.easy4images.com/images/geo9xfzkrj4js97a5iru.gif[/img]" )
if $code=$image[68] Then ClipPut ( "[img]http://www.easy4images.com/images/26op20s38idplnnnu4r.gif[/img]" )
if $code=$image[69] Then ClipPut ( "[img]http://www.easy4images.com/images/3y30ge1u3l3sq0p5wni.gif[/img]" )
if $code=$image[70] Then ClipPut ( "[img]http://www.easy4images.com/images/9c0nljnyzv00yf2z96kq.gif[/img]" )
if $code=$image[71] Then ClipPut ( "[img]http://www.easy4images.com/images/yoqvxn3ncblbkxvtzqb8.gif[/img]" )
if $code=$image[72] Then ClipPut ( "[img]http://www.easy4images.com/images/3ja5pbkiw97t06upep32.gif[/img]" )
if $code=$image[73] Then ClipPut ( "[img]http://www.easy4images.com/images/otsqi8a6a7suoptxt7qj.gif[/img]" )
if $code=$image[74] Then ClipPut ( "[img]http://www.easy4images.com/images/sblra16z69fj6uee3us9.gif[/img]" )
if $code=$image[75] Then ClipPut ( "[img]http://www.easy4images.com/images/csloccx23o5eoul4txiw.gif[/img]" )
if $code=$image[76] Then ClipPut ( "[img]http://www.easy4images.com/images/bk6ilog6152lppng8gza.gif[/img]" )
if $code=$image[77] Then ClipPut ( "[img]http://www.easy4images.com/images/3b14vdfr5jbbkceoket3.gif[/img]" )
if $code=$image[78] Then ClipPut ( "[img]http://www.easy4images.com/images/huyo2tphc1hvef98hhf.gif[/img]" )
wend
Un grand merci a
d3v1lm33, car mon script by_moi etait tout bugé ^^'
et voici les image et tout et tout :
lien 1 :
http://www.uploading.com/files/EBAIX5KI/images.rar.html
lien 2 :
http://www.mediafire.com/download.php?5dm2zoukzuw
lien 3 :
http://www.sendbox.fr/H23G3G6GQ06G/images.rar
lien 4 :
http://www.megaupload.com/?d=NZ9NB5ZE
Le seul vrai truc que j'ai fait en faite, c'est de tout heberger... merci
http://www.easy4images.com et son systeme d'hebergement en masse des images ^^'
Re: [Ex] Coller des bô smiley facilement
Posté : ven. 05 déc. 2008 00:50
par Tlem
Le plus gros problème est que dans quelques temps, tous ces liens seront mort ...
Et donc l'exemple inutilisable.
Vous devriez refaire le message en mettant en fichier joint le script et les images (probablement en deux fichiers).
Re: [Ex] Coller des bô smiley facilement
Posté : ven. 05 déc. 2008 13:13
par Iste
Ben, j'espere que les liens vont vivre longtemps :/ Sinon je les remplacerais petit a petit.
Sinon, dans le .rar que j'ai upé, ya le script en .au3, en .exe, et toutes les images !
Mais bon, je poste surtout car je suis tres contant d'avoir fini un truc ^^ (meme si j'ai pas tout fait tout seul..)
ps: je pense pas que mes lien hiboox vont mourir dans peu, car j'en ai des bien plus vieux, mais je sais pas quelle cnfiance donner a easy4images.com (si quelqu'un sait...)
Re: [Ex] Coller des bô smiley facilement
Posté : ven. 05 déc. 2008 20:50
par Yogui
aller moi j'aime bien
Re: [Ex] Coller des bô smiley facilement
Posté : mar. 10 mars 2009 18:48
par d3v1lm33
Slt tout le monde! j'était pas venu depuis un moment donc voila alors ya certaines raisons: Je suis occupé a faire un mmorpg et je cherche un gentil gars pour heberger... et j'avait oublié ^^, alors merci pour ton merci
et merci pour le lien vers mon post sinon j'aurait jamais retrouvé en quoi j'avait aidé... J'avait mit un -1 dans la manip avec les arrays car je trouve plus normal de commencer a 1 non? et je bosse en ce moment sur des outils qui aideront les gens qui ont un serveur notamment avec un serveur tcp qui permettra de lire et ecrire des fichiers par php ou autre si on utilise de l'exterieur, en gros avec php on envoie requete,puis le serveur (programme) regarde et donne ou ecrit le fichier. Voila c'est peut etre HOrs sujet mais bon voila c'est moi quoi...
Re: [Ex] Coller des bô smiley facilement
Posté : mer. 11 mars 2009 09:37
par Steph
Salut,
pour les petits fichiers archivé (moins de 5 mo), sans compte il y a
http://www.zone-dl.fr/charger_un_fichier qui est tres bien !
Je me suis permit de faire un miroir (lien direct en plus !) si tu veut le remonter pas de soucis
.
http://www.zone-dl.fr/PQARN/images.rar.aspx
Ou le lien direct repris de l'url cité précedemment:
http://www.zone-dl.fr/E1E3-2CF0-5B28/PQARN/images.rar
(ps: il serait super de faire que le glissé/déposé fonctionne, selection d'une image et le faite de la faire glisser inscrit son lien
...)
voilà !, cdt
Stéphane
Re: [Ex] Coller des bô smiley facilement
Posté : mer. 11 mars 2009 13:10
par Iste
huhu, je suis pas sur de savoir faire ca, mais vais essayer ^^
en meme temps, vais reheberger les images, car comme je le pensais, fallait pas faire confiance a easy4images.com...
Pis je vais essayer d'utiliser des redirection, de facon a pouvoir modifier les images suprimées pour tout le monde !
Re: [Ex] Coller des bô smiley facilement
Posté : sam. 20 juin 2009 18:00
par Iste
Salutations,
Apres pas mal de galère, notamment avec les GIF, j'en suis enfin arrivé a un version 2 potable !
Les deux grandes nouveautés sont l'affichage des GIF animés lors du passage de la souris sur l'un d'eux, et l'utilisation de redirections au lieux d'adresse directe !
Donc plus de risque de perdre les images tant que je surveille le tout ^^
Sinon, j'ai réhebergé le tout sur mon compte hiboox, sécurité de plus !
Le glisser/déposer est aussi opérationnel !
Je compte bien continuer les amélioraration, comme rajouter un petit menu en bas pour choisir lien direct/redirection, la possibilité de rajouter des images ou autre... Mais pour le moment j'aimerais finir ce qui l'est déja !
J'ai un peu de mal avec les animations, je ne sais pas comment faire pour les afficher uniquement quand le curseurs est dessus, et non pas "au dessus" mais également quand la fenetre n'est pas active :/
ou encore le glisser/déposer qui fait un Send(), mais ca bug souvent...
Donc si vous avez des idée...
Voici la source, moi je retourne y réfléchir !
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstants.au3>
#include <WindowsConstants.au3>
#Include <GDIPlus.au3>
#Include <Misc.au3>
$oIE = ObjCreate("Shell.Explorer.2")
_GDIPlus_Startup ()
DirCreate(@DesktopCommonDir&"\zoliimagesdiste\")
For $i = 1 To 80
If $i <> 22 Then
TrayTip("",$i,5)
If Not FileExists(@DesktopCommonDir&"\zoliimagesdiste\"&$i&".gif") Then InetGet("http://img"&$i&".iste.me",@DesktopCommonDir&"\zoliimagesdiste\"&$i&".gif")
Else
If Not FileExists(@DesktopCommonDir&"\zoliimagesdiste\"&$i&".gif") Then InetGet("http://images3.hiboox.com/images/2509/fba0226f85e27b5949f292933a1ebbf4.gif",@DesktopCommonDir&"\zoliimagesdiste\"&$i&".gif")
EndIf
Next
$gui = GUICreate("My GUI", 500,400)
dim $image[81]
$x = 0
$y = 0
For $i = 1 To 80
$image[$i] = GUICtrlCreatePic(@DesktopCommonDir&"\zoliimagesdiste\"&$i&".gif",$x,$y,50,50)
$x = $x+ 50
If $x >450 Then
$x=0
$y = $y+ 50
EndIf
Next
guisetstate()
$sousgui = GUICreate("",50,50,-1,-1,$WS_POPUPWINDOW, $WS_EX_TOOLWINDOW+$WS_EX_TOPMOST )
$image = GUICtrlCreateObj($oIE,-12,-17,300,300)
guisetstate(@SW_HIDE)
$web = 0
$larg = 50
While 1
$nMsg = GUIGetMsg(1)
$aff = 0
$cursor = GUIGetCursorInfo($gui)
Select
Case $nMsg[0] = $GUI_EVENT_CLOSE
Exit
Case _IsPressed(1) = 1
If WinActive($gui) And $cursor[4] - 2 > 0 Then
$aff = 1
While 1
Sleep(10)
WinMove($sousgui, "", MouseGetPos(0) - $larg / 2, MouseGetPos(1) - 55, $larg + 2)
If Not _IsPressed(1) Then ExitLoop
WEnd
MouseDown("primary")
MouseUp("primary")
If Not WinActive($gui) Then
Send("[img]http://img"&$cursor[4]%20-%202&".iste.me[/img]")
Else
$var = GUIGetCursorInfo($gui)
If $cursor[4] = $var[4] Then ClipPut ("[img]http://img"&$cursor[4]%20-%202&".iste.me[/img]")
EndIf
EndIf
EndSelect
If $aff = 0 And WinActive($gui)Then
If $cursor[4] - 2 > 0 Then
GUISetState(@SW_SHOW, $sousgui)
WinMove($sousgui, "", MouseGetPos(0) - $larg / 2, MouseGetPos(1) - 55, $larg + 2)
If $web <> $cursor[4] - 2 Then
$bitmap = _GDIPlus_BitmapCreateFromFile(@DesktopCommonDir & "\zoliimagesdiste\" & $cursor[4] - 2 & ".gif")
$larg = _GDIPlus_ImageGetWidth($bitmap)
_GDIPlus_BitmapDispose($bitmap)
GUICtrlSetPos($image, (100 / $larg) * (-6), -17)
$web = $cursor[4] - 2
$oIE.navigate(@DesktopCommonDir & "\zoliimagesdiste\" & $cursor[4] - 2 & ".gif")
EndIf
If Not WinActive($gui) Then WinActivate($gui)
Else
$web = 0
GUISetState(@SW_HIDE, $sousgui)
EndIf
Else
$web = 0
GUISetState(@SW_HIDE, $sousgui)
EndIf
WEnd
Re: [Ex] Coller des bô smiley facilement
Posté : mer. 01 juil. 2009 15:51
par GhostLine
J'ai tenté un copier coller de ton dernier script, et voici le message que j'obtiens :
C:\Program Files\AutoIt3\Examples\smiley.au3 (63) : ==> Unable to parse line.:
Send("[img]http://img"&$cursor[4]%20-%202&".iste.me[/img]")
Send("[img]http://img"&$cursor[4]^ ERROR
>Exit code: 1 Time: 0.825
Pourquoi tant de haine
?
Re: [Ex] Coller des bô smiley facilement
Posté : mer. 01 juil. 2009 16:06
par Iste
heu... "%20-%202" ? quesque ca fait la...
Enfin, de toute facon le script a evolué
Les liens des oignons sont maintenant directement pris sur
http://www.onion-club.net ! Mais j'ai pas encore faire de redirection par contre. (sont hébregés sur photobucket.com, mais je pense que les admins du site font veillé a ce qu'ils vivent)
Enfin bref, voila :
► Afficher le texte
Code : Tout sélectionner
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.0.0
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <GUIConstants.au3>
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
#include <Misc.au3>
#include <ButtonConstants.au3>
_GDIPlus_Startup()
$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oIE = ObjCreate("Shell.Explorer.2")
$Dir = @ScriptDir & "\images\"
DirCreate($Dir)
Opt("SendKeyDelay", 0)
Global $url[155]
Dim $image[155]
url($url)
For $i = 1 To 154
TrayTip("", $i, 5)
If Not FileExists($Dir & $i & ".gif") Then InetGet(GetURL($i), $Dir & $i & ".gif")
Next
$gui = GUICreate("My GUI", 700, 550)
$x = 0
$y = 0
For $i = 1 To 154
$image[$i] = GUICtrlCreatePic($Dir & $i & ".gif", $x, $y, 50, 50)
$x = $x + 50
If $x > 650 Then
$x = 0
$y = $y + 50
EndIf
Next
GUISetState()
$sousgui = GUICreate("", 50, 50, -1, -1, $WS_POPUPWINDOW, $WS_EX_TOOLWINDOW + $WS_EX_TOPMOST)
$image = GUICtrlCreateObj($oIE, -12, -17, 500, 500)
GUISetState(@SW_HIDE)
$web = 0
$larg = 50
$haut = 50
While 1
$nMsg = GUIGetMsg(1)
$aff = 0
$cursor = GUIGetCursorInfo($gui)
Select
Case $nMsg[0] = $GUI_EVENT_CLOSE
Exit
Case _IsPressed(1) = 1
If WinActive($gui) And $cursor[4] - 2 > 0 Then
$aff = 1
While 1
Sleep(10)
WinMove($sousgui, "", MouseGetPos(0) - $larg / 2, MouseGetPos(1) - 55, $larg + 2)
If Not _IsPressed(1) Then ExitLoop
WEnd
MouseDown("primary")
MouseUp("primary")
If Not WinActive($gui) Then
MySend()
Else
$var = GUIGetCursorInfo($gui)
If $cursor[4] = $var[4] Then ClipPut("[img]"%20&%20GetURL($cursor[4]%20-%202)%20&%20"[/img]")
EndIf
EndIf
EndSelect
If $aff = 0 And WinActive($gui) Then
If $cursor[4] - 2 > 0 Then
GUISetState(@SW_SHOW, $sousgui)
WinMove($sousgui, "", MouseGetPos(0) - $larg / 2, MouseGetPos(1) - 55, $larg + 2,$haut + 2)
If $web <> $cursor[4] - 2 Then
$bitmap = _GDIPlus_BitmapCreateFromFile($Dir & $cursor[4] - 2 & ".gif")
$larg = _GDIPlus_ImageGetWidth($bitmap)
$haut = _GDIPlus_ImageGetHeight($bitmap)
_GDIPlus_BitmapDispose($bitmap)
If $larg = 50 Then GUICtrlSetPos($image, -12, -17)
If $larg > 100 Then GUICtrlSetPos($image, -2, -10)
$web = $cursor[4] - 2
$oIE.navigate($Dir & $cursor[4] - 2 & ".gif")
EndIf
If Not WinActive($gui) Then WinActivate($gui)
Else
$web = 0
GUISetState(@SW_HIDE, $sousgui)
EndIf
Else
$web = 0
GUISetState(@SW_HIDE, $sousgui)
EndIf
WEnd
Func GetURL($gRu_num, $gRu_type = 1)
If $gRu_num < 16 Then
If $gRu_type Then
Return "http://img" & $gRu_num & ".iste.me"
Else
;~ $gRu_url = $liste_URL
;~ $gRu_url = StringSplit($gRu_url, @LF, 1)
;~ Return $gRu_url[$gRu_num]
EndIf
Else
Return $url[$gRu_num]
EndIf
EndFunc ;==>GetURL
Func MySend($mS_type = 1)
If $mS_type Then
$mS_saveclip = ClipGet()
Sleep(50)
$mS_saveclip = ClipGet()
ClipPut("[img]"%20&%20GetURL($cursor[4]%20-%202)%20&%20"[/img]")
ClipPut("[img]"%20&%20GetURL($cursor[4]%20-%202)%20&%20"[/img]")
Sleep(50)
ClipPut("[img]"%20&%20GetURL($cursor[4]%20-%202)%20&%20"[/img]")
Sleep(100)
Send("^v")
ClipPut($mS_saveclip)
Sleep(50)
ClipPut($mS_saveclip)
Else
Send("[img]"%20&%20GetURL($cursor[4]%20-%202)%20&%20"[/img]")
EndIf
EndFunc ;==>MySend
Func url(ByRef $url_var)
$url_var[1] = 'http://images3.hiboox.com/images/2509/36e9967b563eba9fd51886b0ffc19bd4.gif'
$url_var[2] = 'http://images3.hiboox.com/images/2509/0a3be3e0c042117884172bec3ae38e92.gif'
$url_var[3] = 'http://images3.hiboox.com/images/2509/b3cf6a33679c7f61c56162d636dddbd0.gif'
$url_var[4] = 'http://images3.hiboox.com/images/2509/b70eb60f4e6b165903dd16fe7bf174a4.gif'
$url_var[5] = 'http://images3.hiboox.com/images/2509/1a6933c64621208b2d469453df5a2929.gif'
$url_var[6] = 'http://images3.hiboox.com/images/2509/23af7eb505aaf158714a310353fb9622.gif'
$url_var[7] = 'http://images3.hiboox.com/images/2509/a5f6d4bd5390930c3e97f72cb62eb933.gif'
$url_var[8] = 'http://images3.hiboox.com/images/2509/26cc4d051c868a775ff9d613f2597524.gif'
$url_var[9] = 'http://images3.hiboox.com/images/2509/46d43e55bd3d6510760f15dfdeb4ecc3.gif'
$url_var[10] = 'http://images3.hiboox.com/images/2509/add6d8e5a8d5924026e5078437613b04.gif'
$url_var[11] = 'http://images3.hiboox.com/images/2509/9f07d2205d659dcab466c83764f1853e.gif'
$url_var[12] = 'http://images3.hiboox.com/images/2509/73691180af1300161ae374fca3eb923a.gif'
$url_var[13] = 'http://images3.hiboox.com/images/2509/b73fbdcd1fb1485dbaaabc4826343b9f.gif'
$url_var[14] = 'http://images3.hiboox.com/images/2509/44e4a47c28b2d4c49d2b9fa724e42ce8.gif'
$url_var[15] = 'http://images3.hiboox.com/images/2509/0874951b60ac4255834149b2c8f024d5.gif'
$url_var[16] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/009_v2.gif'
$url_var[17] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/083_v2.gif'
$url_var[18] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/115_.gif'
$url_var[19] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/001_-v2.gif'
$url_var[20] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/015_orz-v2.gif'
$url_var[21] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/114_.gif'
$url_var[22] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/113_.gif'
$url_var[23] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/112_-1.gif'
$url_var[24] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/112_01.gif'
$url_var[25] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/112_02.gif'
$url_var[26] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/112_03.gif'
$url_var[27] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/112_.gif'
$url_var[28] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/111_.gif'
$url_var[29] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/110_.gif'
$url_var[30] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/109_.gif'
$url_var[31] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/108_.gif'
$url_var[32] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/107_.gif'
$url_var[33] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/106_.gif'
$url_var[34] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/105_.gif'
$url_var[35] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/104_.gif'
$url_var[36] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/103_.gif'
$url_var[37] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/102_.gif'
$url_var[38] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/101_.gif'
$url_var[39] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/100_.gif'
$url_var[40] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/099_.gif'
$url_var[41] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/098_.gif'
$url_var[42] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/097_01.gif'
$url_var[43] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/097_02.gif'
$url_var[44] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/097_03.gif'
$url_var[45] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/097_04.gif'
$url_var[46] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/096_K.gif'
$url_var[47] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/095_.gif'
$url_var[48] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/094_01.gif'
$url_var[49] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/094_02.gif'
$url_var[50] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/094_03.gif'
$url_var[51] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/094_04.gif'
$url_var[52] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/093.gif'
$url_var[53] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/092_.gif'
$url_var[54] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/091_-3.gif'
$url_var[55] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/091_-2.gif'
$url_var[56] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/091_-1.gif'
$url_var[57] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/091_QQ.gif'
$url_var[58] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/091_.gif'
$url_var[59] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/090_.gif'
$url_var[60] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/089_02.gif'
$url_var[61] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/089_01.gif'
$url_var[62] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/088_.gif'
$url_var[63] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/087_.gif'
$url_var[64] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/086_64color.gif'
$url_var[65] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/086_.gif'
$url_var[66] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/085_.gif'
$url_var[67] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/084_.gif'
$url_var[68] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/083_.gif'
$url_var[69] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/082_-1.gif'
$url_var[70] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/082_.gif'
$url_var[71] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/081_.gif'
$url_var[72] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/080_.gif'
$url_var[73] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/079_.gif'
$url_var[74] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/078_.gif'
$url_var[75] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/077_.gif'
$url_var[76] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/076_.gif'
$url_var[77] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/075_.gif'
$url_var[78] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/074_.gif'
$url_var[79] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/073_.gif'
$url_var[80] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/072_.gif'
$url_var[81] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/071_.gif'
$url_var[82] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/070_goodjob.gif'
$url_var[83] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/069_.gif'
$url_var[84] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/068_.gif'
$url_var[85] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/067_.gif'
$url_var[86] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/066_Hi.gif'
$url_var[87] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/065_.gif'
$url_var[88] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/064_.gif'
$url_var[89] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/063_.gif'
$url_var[90] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/062_.gif'
$url_var[91] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/061_.gif'
$url_var[92] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/060_.gif'
$url_var[93] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/059_.gif'
$url_var[94] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/058_.gif'
$url_var[95] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/057_.gif'
$url_var[96] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/056_.gif'
$url_var[97] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/055_.gif'
$url_var[98] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/054_.gif'
$url_var[99] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/053_XD.gif'
$url_var[100] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/052_.gif'
$url_var[101] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/051_.gif'
$url_var[102] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/050_.gif'
$url_var[103] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/049_.gif'
$url_var[104] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/048_.gif'
$url_var[105] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/047_.gif'
$url_var[106] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/046_.gif'
$url_var[107] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/045_.gif'
$url_var[108] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/044_.gif'
$url_var[109] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/043_.gif'
$url_var[110] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/041_.gif'
$url_var[111] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/042_.gif'
$url_var[112] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/040_.gif'
$url_var[113] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/039_.gif'
$url_var[114] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/038_jolin.gif'
$url_var[115] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/037_.gif'
$url_var[116] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/036_omg.gif'
$url_var[117] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/035_.gif'
$url_var[118] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/034_.gif'
$url_var[119] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/033_.gif'
$url_var[120] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/032_.gif'
$url_var[121] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/031_.gif'
$url_var[122] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/030_.gif'
$url_var[123] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/029_.gif'
$url_var[124] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/028_.gif'
$url_var[125] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/027_.gif'
$url_var[126] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/026_.gif'
$url_var[127] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/025_.gif'
$url_var[128] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/024_.gif'
$url_var[129] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/023_.gif'
$url_var[130] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/022_a.gif'
$url_var[131] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/022_b.gif'
$url_var[132] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/021_.gif'
$url_var[133] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/020_bingo.gif'
$url_var[134] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/019_.gif'
$url_var[135] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/018_.gif'
$url_var[136] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/016_.gif'
$url_var[137] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/017_.gif'
$url_var[138] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/015_orz.gif'
$url_var[139] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/013_a.gif'
$url_var[140] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/013_b.gif'
$url_var[141] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/012_a.gif'
$url_var[142] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/012_b.gif'
$url_var[143] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/011_.gif'
$url_var[144] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/014_.gif'
$url_var[145] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/010_.gif'
$url_var[146] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/009_.gif'
$url_var[147] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/008_.gif'
$url_var[148] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/007_.gif'
$url_var[149] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/006_.gif'
$url_var[150] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/005_.gif'
$url_var[151] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/004_.gif'
$url_var[152] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/002_.gif'
$url_var[153] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/003_.gif'
$url_var[154] = 'http://i237.photobucket.com/albums/ff133/onionethan/Onion_Emoticons/001_.gif'
EndFunc
edit : rajout d'une petite boucle au début qui dl les images la ou il faut ! sinon,
http://rapidshare.com/files/250725400/images.rar
http://www.megaupload.com/?d=EMMZ4YWK
http://dl.free.fr/rer9HdWi4
Re: [Ex] Coller des bô smiley facilement
Posté : mer. 01 juil. 2009 17:09
par jbnh
J'en profite pour rappeler un script du même type que j'avais réalisé il y a longtemps. Le
voici.
L'avantage est que l'on choisit soit même les url des smileys à utiliser.
Re: [Ex] Coller des bô smiley facilement
Posté : mer. 01 juil. 2009 17:50
par Iste
En effet je n'avais pas vu ce topic, et meme si l'approche n'est pas la meme (voui mon script ne permet pas d'ajout de smiley (pour le moment), mais il n'est pas fait pour afficher des smilyer mais pour afficher
ces smileys :p)
Toutes fois j'aime beaucoup le principe du F2+numpad, et vais essayer de le développer a la manière d'un alt+xxx !
M'enfin, perso j'essaye principalement de jouer sur une interface graphique complette. D'ailleur, j'ai donné mon nouveau script mais pas les image qui vont avec
Je vais editer mon précédent post
Re: [Ex] Coller des bô smiley facilement
Posté : jeu. 02 juil. 2009 09:10
par GhostLine
Bah en fait, voilà comment s'affiche le code sur mon PC lorsque je le copie/colle :
[...]
ClipPut("
")
ClipPut("
")
Sleep(50)
ClipPut("
")
[...]
Evidemment, en remplaçant les %20 par des espaces, ou même par rien, ça marche mieux
Re: [Ex] Coller des bô smiley facilement
Posté : jeu. 02 juil. 2009 12:43
par Iste
oui j'ai compris, en fait c'est le gentil forum qui voyant des tentative d'image essaye de remplacer le code par des liens valide ^^'
ctrl+h "%20" -> " " devrait nettoyer le tout ^^