Jump to content
Sign in to follow this  
jjump

ClipGet() and If

Recommended Posts

jjump

Hi,

I am trying to make a script which copies some txt from the source, checks to see if it has the work "Ink" in and if it does, it sends a function, if it doesn't, it carries on.. I have tried:

CODE

$Copy = ClipGet

If $Copy = "Ink" Then

Function1()

But this does not work.. Can this be done?

Ian

Edited by jjump

Share this post


Link to post
Share on other sites
tbodine88

Hi,

I am trying to make a script which copies some txt from the source, checks to see if it has the work "Ink" in and if it does, it sends a function, if it doesn't, it carries on.. I have tried:

CODE

$Copy = ClipGet

If $Copy = "Ink" Then

Function1()

But this does not work.. Can this be done?

Ian

Try This

CODE

$Copy = Clipget()

if StringInstr($Copy,"Ink",0) then

Function1()

endif


tbodine

Share this post


Link to post
Share on other sites
jjump

Perfect! Thank you!

Ian

Share this post


Link to post
Share on other sites
jjump

Is it also possible to do something like

"If $Copy DOES NOT = "Ink" , Then function1()"

Thanks

Ian

Share this post


Link to post
Share on other sites
jjump

I have the code like this:

CODE

$Copy = ClipGet()

If StringInStr($Copy, "Ink", 0) Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("Y")

Send("{DOWN}")

Send("{LEFT}")

If Not Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("N")

Send("{DOWN}")

Send("{LEFT}")

EndIf

Wend

Share this post


Link to post
Share on other sites
trancexx

I have the code like this:

CODE

$Copy = ClipGet()

If StringInStr($Copy, "Ink", 0) Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("Y")

Send("{DOWN}")

Send("{LEFT}")

If Not Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("N")

Send("{DOWN}")

Send("{LEFT}")

EndIf

Wend

so, is it working?

♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites
jjump

so, is it working?

CODE

$Copy = ClipGet()

If StringInStr($Copy, "Ink", 0) Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("Y")

Send("{DOWN}")

Send("{LEFT}")

EndIf

If Not StringInStr($Copy, "Ink", 0) Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("N")

Send("{DOWN}")

Send("{LEFT}")

EndIf

That works a lot better....

Ian

Share this post


Link to post
Share on other sites
Monamo

CODE

$Copy = ClipGet()

If StringInStr($Copy, "Ink", 0) Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("Y")

Send("{DOWN}")

Send("{LEFT}")

EndIf

If Not StringInStr($Copy, "Ink", 0) Then

WinActivate("Rank", "")

Send("{RIGHT}")

Send("N")

Send("{DOWN}")

Send("{LEFT}")

EndIf

That works a lot better....

Ian

Are you referencing the variable $Copy for anything else in your code? If not, you could reduce your amount of code (slightly) by using the following:

If StringInStr(ClipGet(), "Ink", 0) Then
    WinActivate("Rank", "")
    Send("{RIGHT}")
    Send("Y")
    Send("{DOWN}")
    Send("{LEFT}")
Else
    WinActivate("Rank", "")
    Send("{RIGHT}")
    Send("N")
    Send("{DOWN}")
    Send("{LEFT}")
EndIf

- MoChr(77)& Chr(97)& Chr(100)& Chr(101)& Chr(32)& Chr(121)& Chr(97)& Chr(32)& Chr(108)& Chr(111)& Chr(111)& Chr(107)-------I've told you 100,000 times not to exaggerate!-------Don't make me hit you with my cigarette hand...-------My scripts:Random Episode Selector, Keyboard MouseMover, CopyPath v2.1, SmartRename for XP,Window Tracer[sup]New![/sup]

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×