Powered by Invision Power Board CaseModding.de.vu Radio Nachteule - Eure Augen werden Ohren machen


  Reply to this topicStart new topicStart Poll

> Skype Plugin
Predator_MF
Posted: May 20, 2008 12:11 am
Quote Post



*

Group: Members
Posts: 36
Member No.: 2056
Joined: February 18, 2006



Skype Plugin for LCDHype
------------------------------------------

1. Description:

Use this plugin to extract information from Skype.

2. Commands:

All the commands are accessible in Plugins section of LCDHype.

Note that first time you run this plugin Skype will popup a window for your aproval that LCDHype can use Skype, you must allow it.


3. Examples:

This will give you your Skype name
%UsePlugin('skype\skype.dll',MyInfo, Name)

This will give you your contact count in Skype
%UsePlugin('skype\skype.dll',ClientCount)



4. Installation:

Place the folder from the archive in LCDHypeFolder\plugins\ ,
restart LCDHype and you should see the plugin in the plugins section of LCDHype
(by the name of Skype).

Place the file "Skype4COM.dll" in Windows\System32\ folder.
Press Start->RUN, type in "regsvr32.exe C:\Windows\System32\Skype4COM.dll" (wihouth the quotes).
If you see a message saying "Registration successfull", then the plugin will work.



5. Version History
- 0.9.3: Fixed multilanguage bug, better unicode support
- 0.9.1: Added "MissedCallEvent", "ContactsOnline", fixed parameters in LCDHype
- 0.9.0: Initial release.

Example script:
CODE

#Header
%KeyInit()
%CleanUp.ClearVRAM()
%Common.SetPriority(20)
%LCD.Gfx_SetTextArea(0,0,127,31)
%Param.RenderMode(Simple)
%CleanUp.ClearInputBuffer(All)
/%Param.AvoidPluginCleanUp()/
%Graph.SetInvertArea(1,1,127,11)

%Graph.Font('Arial',7,1)

%DefVar(stime=%System.Uptime())
%DefVar(i=0)

  %DefVar(SkypeLine, Local='')
  %DefFunc(SkypeCheck, Local=
   %If(%UsePlugin('Skype\Skype.dll',MissedChatEvent) ! 0)
   Then{
     %UsePlugin('GLED\GLED.dll','LED', 1, 1/status/)
     %Assign(SkypeLine,
     %Loop.For(i, 0, %Dec(%UsePlugin('Skype\Skype.dll',MissedChatCount),1), 1)
     {
       / get the last line from every chat /
       '**['
       %UsePlugin('Skype\Skype.dll',MissedChatInfo, Name, %i()/chatnumber/)
       ']: '
       %UsePlugin('Skype\Skype.dll',MissedChatLine, %i()/chatnumber/, 0/chatline/)
       ' **    '
     }
     )
   }
  )
#EndHeader

#GfxMode

/%If(%Skype_running() = 0)
Then{%SkipScreen()}/
%Common.CreateNewLine(,1,1)
'Skype: '

%Common.CreateNewLine(,32,1)
%Param.EnableScrolling(Horizontal,Ticker,0.6,100,1,0)
%UsePlugin('Skype\Skype.dll',MyInfo, Name)
%Common.CreateNewLine(,1,11)
'Status:' %UsePlugin('Skype\Skype.dll',MyInfo, Status)
%Common.CreateNewLine(,2,18)
%Graph.Font('Arial',8,1)
%Param.EnableScrolling(Horizontal,Ticker,1,125,1,0)
%SkypeCheck()
%SkypeLine()
#EndGfxMode


Attached File ( Number of downloads: 1196 )
Attached File  SkypePlugin_0.9.3.zip_
PMEmail PosterICQ
Top
0 User(s) are reading this topic (0 Guests and 0 Anonymous Users)
0 Members:

Topic Options Reply to this topicStart new topicStart Poll

 





[ Script Execution time: 0.0786 ]   [ 13 queries used ]   [ GZIP Enabled ]