OK I made a simple bitmap script I for example, it's suppose to click on the my computer icon on the desktop.
And I'm wondering about a few things.Code:program Script; var x,y,DesktopComputer:integer; procedure DeclareBMPS; begin DesktopComputer := BitmapFromString(11, 9, 'beNpbdtZ513+3Pf' + '899/733vffZz8IARlArtvu/047/9tt/2++5b/Vtv822//b70AgINd' + 'r26+aTS+7Zl3TXvdfb8N/w43/jTeBkM3mvzm7vkza9GT69EsVFSe7' + 'u88prPivvOq/6ur/nlv/TDvxefn6e11d5zMyjkRH78nO3n3mzEOlF' + 'f/Lj/7efPb9ihU3a2tP5uYeS08/mZJyIiHhaFbWUaCCY8eezpx5qb' + '7+aF/fif7+0+Xlx4BqcnKOZ2WdzMw8tW3btQULLp44cefevftLlpx' + 'avvzixIknS0v3FRcfKCw8VFBwZNmycx8+fHj58uXDhw/37r0I5K5a' + 'dbGmZkdV1c6Kit3l5XtWr7748ePHV69eARVcuXJr6tSDhw/fbWra2' + 'Ni4qaFhc13d1mUA283EQg=='); end; procedure ClickBMPS; begin wait(200+random(100)) movemousesmooth(x,y) wait(40+random(12)) clickmouse(x,y,true) end; Procedure FindBMPS; begin if(FindBitmap(DesktopComputer,x,y))then ClickBMPS; end; begin repeat wait(2000+random(200)) DeclareBMPS; FindBMPS; until(false) end.
Is there anyway so it will double click?
Any way that it will right click?
And is there a way so if I add multiple bitmaps it will only click on each of them one time instead of clicking on them every time it sees them?
This is the first script I've made so it's not good i know that![]()


Reply With Quote






