on SkypeCall("someuser")
    set AppleScript's text item delimiters to " "
    tell application "Skype"
        set foo to send command "GET USER " & login & " ONLINESTATUS" script name "MyScript"
        set UserStatus to my GetPart(foo, 4, " ")
        if UserStatus is "ONLINE" then
            say "just testing"
            send command "CALL " & login script name "MyScript"
            copy (run script "tell application \"Finder\" to desktop's window's bounds") to bounds of window 1
        else
            say "[a] hello!"
        end if
    end tell
end SkypeCall

on GetPart(s, p, d)
    set theList to every text item of s
    return (item p of theList)
end GetPart