Показывает статистику мыши в метрах, количество нажатий на клавиш и кликов. Самое главное - установите настройки, иначе через 60 мин. работы (WorkTime) прога сделает вам принудительный перерыв в 15 минут (RestTime). Управлять копьютером все равно будет возможно через маленькое окошко кружочка, но комфортно работать - врядли. За работу засчитывается только время когда движется мышь, то есть если вы отошли от компьютера, ваше время работы до перерыва не изменится. На время перерыва мышь не влияет. Статистика Switches указывет сколько раз в день вы переключались между окнами, что тоже нагружает мозг.
http://www.u-studio.narod.ru/Software/Health/brainfuse1.0.rar
Вот еще схемка из предохранителя - мышиная статистика - подсчет километров ее бега.
code_31993.txt
И подсчет глобальных кликов и нажатий
Add(MainForm,2953706,21,105)
{
Point(Handle)
link(onCreate,15035773:doData,[])
}
Add(DoData,15035773,77,119)
{
Data=Integer(1)
link(onEventData,15501598:doPopup,[(121,125)(121,149)(9,149)(9,174)])
}
Add(Label,760660,742,322)
{
Left=135
Top=40
}
Add(WinTools,15501598,21,161)
{
link(Handle,2953706:Handle,[])
}
Add(Label,8706352,742,385)
{
Left=125
Top=100
}
Add(Timer,8452931,203,322)
{
Interval=10
link(onTimer,14491021:doSync,[(359,328)(359,356)])
}
Add(MultiElementEx,14491021,476,350)
{
@Hint=#37:Global Mouse and Keys clicks counters|0:|24:10.10.2013 - Aziz Baku|
link(KeyPresses,760660:doText,[(629,356)(629,328)])
link(MouseClicks,8706352:doText,[(625,363)(625,391)])
}
BEGIN_SDK
Add(EditMultiEx,7920161,21,21)
{
WorkCount=#6:doSync|11:doKeysValue|12:doMouseValue|
EventCount=#10:KeyPresses|11:MouseClicks|
VarCount=#15:KeyPressesCount|16:MouseClicksCount|
Width=531
Height=291
link(doSync,7842663:doEvent1,[(35,27)(35,125)])
link(doKeysValue,7260097:doValue,[(231,34)(231,132)])
link(doMouseValue,9327925:doValue,[(231,41)(231,195)])
link(KeyPressesCount,7260097:Count,[(27,232)(447,232)])
link(MouseClicksCount,9327925:Count,[(34,263)(447,263)])
}
Add(ArrayEnum,1478148,105,182)
{
link(onItem,12299984:doEvent1,[(149,188)(149,62)])
link(Array,9449272:Keys,[])
}
Add(Keyboard,9449272,105,119)
{
}
Add(StrList,14459476,259,49)
{
}
Add(If_else,5681984,189,56)
{
Type=1
Op2=Integer(256)
link(onTrue,14459476:doAdd,[(240,62)(240,55)])
link(Op1,14459476:Count,[(195,44)(241,44)(241,106)(272,106)])
}
Add(Hub,12299984,161,56)
{
OutCount=3
link(onEvent1,5681984:doCompare,[])
link(onEvent2,12585005:doRead,[(224,69)(224,125)])
link(onEvent3,16466374:doCompare,[(182,76)(182,104)])
}
Add(Hub,7842663,49,119)
{
OutCount=3
link(onEvent1,15371840:doReset,[(227,125)(227,132)])
link(onEvent2,10369114:doReset,[(227,132)(227,195)])
link(onEvent3,1478148:doEnum,[(84,139)(84,188)])
}
Add(ArrayRW,12585005,273,119)
{
link(Array,14459476:Array,[])
link(Index,2850802:Var1,[(286,103)(335,103)])
link(Value,1478148:Item,[(293,107)(202,107)(202,226)(111,226)])
}
Add(If_else,7949616,329,126)
{
Type=2
Op2=Integer(2)
link(onTrue,15371840:doOn,[(377,132)(377,139)])
link(onFalse,10369114:doOn,[(377,139)(377,202)])
link(Op1,2850802:Var2,[])
}
Add(GetDataEx,2850802,329,109)
{
Angle=3
link(Data,1478148:Index,[(225,114)(225,226)(118,226)])
}
Add(Switch,15371840,392,119)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(onOn)
Point(onOff)
link(onOn,7260097:doNext,[(432,132)(432,125)])
}
Add(Switch,10369114,392,182)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(onOn)
Point(onOff)
link(onOn,9327925:doNext,[(432,195)(432,188)])
}
Add(CounterEx,7260097,441,119)
{
Max=99999999
Point(doValue)
link(onNext,7920161:KeyPresses,[(513,125)(513,27)])
}
Add(CounterEx,9327925,441,182)
{
Max=99999999
Point(doValue)
link(onNext,7920161:MouseClicks,[(513,188)(513,34)])
}
Add(If_else,4696767,189,154)
{
Op2=Integer(1)
link(onTrue,7949616:doCompare,[(266,160)(266,132)])
}
Add(If_else,16466374,189,98)
{
link(onFalse,4936350:doEvent1,[])
link(Op2,12585005:Item,[(202,86)(240,86)(240,163)(279,163)])
}
Add(Hub,4936350,238,105)
{
link(onEvent1,4696767:doCompare,[(264,111)(264,135)(177,135)(177,160)])
link(onEvent2,12585005:doWrite,[(262,118)(262,132)])
}
END_SDK
Если убрать картинку похоже на луч фонаря в темном подвале
------------ Дoбавленo в 19.12:
Обновил прогу, добавил экстренный выход по ctrl+e (нужно решить филос. задачу)
------------ Дoбавленo в 11.02:
Сегодня с утра при включении компа прога меня порадовала неожиданным глюком: "Вы превысили дневной лимит движений мышью на 65 000 000 метров." И заблокировала комп, мигая красным экраном и показывая красный мозг.)) Пришлось воспользоваться экстренным выходом - вводить слова молитвы в окошко..
Наверное где-то произошло вычитание из нуля или что-то такое - неиниц. переменные.
------------ Дoбавленo в 12.51:
Нашел причину глюка - компонент MouseEvent на своей точке Х выдавал совершенно дикие значения, при пробуждении компа из ждущего или спящего режима. Возможно это глюк компонента, возможно - специфика моей системы.
Проверить можно на схеме мышиной статистики выложенной выше. Попробуйте зпустить ее, затем войти в ждущий режим.
Исправленная схема статистики без подобного глюка:
Add(MainForm,2953706,21,105)
{
@Hint=#22:by Aziz 8.10.2013 baku|
Width=421
Height=140
Caption=" Mouse path length screen inches to mm - by Aziz"
}
Add(MultiElementEx,3769498,189,98)
{
@Hint=#14:Mouse Path 1.0|7:By Aziz|9:8.10.2013|4:Baku|
link(onFString,9582378:doText,[])
}
BEGIN_SDK
Add(EditMultiEx,8267009,21,21)
{
WorkCount=#7:doClear|
EventCount=#9:onFString|
VarCount=#2:mm|2:cm|2:mt|2:km|2:in|
Width=1007
Height=445
link(doClear,14200287:doEvent1,[(175,27)(175,125)])
link(mm,10353003:Var2,[(27,284)(503,284)])
link(cm,10716070:Var2,[(34,284)(601,284)])
link(mt,4592002:Var2,[(41,284)(706,284)])
link(km,7990350:Var2,[(48,284)(811,284)])
link(in,4818970:Var1,[(55,456)])
}
Add(ChangeMon,14878754,119,112)
{
link(onData,15771192:doCompare,[])
link(Data,5344395:MouseX,[])
}
Add(ChangeMon,458599,119,154)
{
link(onData,9439733:doCompare,[])
link(Data,5344395:MouseY,[(125,118)(132,118)])
}
Add(Hub,1702291,91,112)
{
link(onEvent1,14878754:doData,[])
link(onEvent2,458599:doData,[(112,125)(112,160)])
}
Add(MouseEvent,5344395,119,49)
{
Point(WheelDelta)
Point(doWheel)
Point(Handle)
}
Add(Timer,12855934,35,112)
{
Interval=10
link(onTimer,1702291:doEvent1,[])
}
Add(SampleDelta,1701876,210,112)
{
link(onCalcDelta,8669986:doOperation,[])
}
Add(SampleDelta,16059601,210,154)
{
link(onCalcDelta,6748014:doOperation,[])
}
Add(Math,8669986,252,112)
{
OpType=33
link(onResult,1141869:doOperation,[])
}
Add(Math,6748014,252,154)
{
OpType=33
link(onResult,14105339:doOperation,[])
}
Add(Math,1141869,329,112)
{
Point(doClear)
link(onResult,12421493:doOperation,[])
link(Op2,1141869:Result,[(342,100)(338,100)(338,156)(335,156)])
}
Add(Math,14105339,329,154)
{
Point(doClear)
link(onResult,5106452:doOperation,[])
link(Op2,14105339:Result,[(342,142)(338,142)(338,198)(335,198)])
}
Add(Screen,11988861,350,49)
{
Point(CurDPIX)
Point(CurDPIY)
}
Add(Memory,11412070,420,49)
{
@Hint=#7:mm/inch|
Default=Real(25.4)
}
Add(Math,12421493,378,112)
{
OpType=3
link(onResult,11795154:doOperation,[])
link(Op2,11988861:CurDPIX,[(391,93)(377,93)])
}
Add(Math,5106452,378,154)
{
OpType=3
link(onResult,2596796:doOperation,[])
link(Op2,11988861:CurDPIY,[(391,114)(384,114)])
}
Add(Math,11795154,427,112)
{
OpType=2
link(onResult,11936904:doEvent1,[])
link(Op2,13064016:Var3,[(440,96)])
}
Add(Math,2596796,427,154)
{
OpType=2
link(onResult,11936904:doEvent2,[(464,160)(464,125)])
link(Op2,13064016:Var2,[(440,127)(433,127)])
}
Add(GetDataEx,13064016,427,91)
{
Angle=3
link(Data,11412070:Value,[(426,96)])
}
Add(Math,5732424,497,112)
{
link(onResult,9103992:doOperation,[])
link(Op1,11795154:Result,[(503,100)(468,100)(468,156)(433,156)])
link(Op2,2596796:Result,[(510,100)(472,100)(472,198)(433,198)])
}
Add(Hub,11936904,469,112)
{
InCount=2
link(onEvent1,5732424:doOperation,[])
link(onEvent2,13905818:doOperation,[(495,125)(495,244)(380,244)(380,363)])
}
Add(InfoTip,4535994,476,63)
{
Info=#11:Millimeters|
Width=85
Height=102
}
Add(Math,9103992,595,112)
{
OpType=3
Op2=10
link(onResult,9440482:doOperation,[])
}
Add(InfoTip,3160324,574,63)
{
Info=#11:Centimeters|
Width=85
Height=102
}
Add(Math,9440482,700,112)
{
OpType=3
Op2=100
link(onResult,16188843:doOperation,[])
}
Add(InfoTip,538606,679,63)
{
Info=#6:Meters|
Width=85
Height=102
}
Add(Math,16188843,805,112)
{
OpType=3
Op2=1000
link(onResult,15324645:doOperation,[(849,118)(849,160)(485,160)(485,202)])
}
Add(InfoTip,13298419,784,63)
{
Info=#10:Kilometers|
Width=85
Height=102
}
Add(FormatStr,10750243,497,273)
{
DataCount=5
Mask="Mouse path: Km:%1 Mt:%2 In:%3 Cm:%4 Mm:%5"
link(onFString,8267009:onFString,[(740,279)(740,27)])
link(Str1,7990350:Var1,[(503,243)])
link(Str2,4592002:Var1,[(510,243)])
link(Str3,4818970:Var3,[(517,261)(384,261)])
link(Str4,10716070:Var1,[(524,243)])
link(Str5,10353003:Var3,[(531,243)])
}
Add(Math,15324645,497,196)
{
OpType=35
Op2=0.1
link(onResult,9461505:doOperation,[])
link(Op1,5732424:Result,[])
}
Add(Math,9461505,595,196)
{
OpType=35
Op2=0.1
link(onResult,11537204:doOperation,[])
link(Op1,9103992:Result,[])
}
Add(Math,11537204,700,196)
{
OpType=35
Op2=0.1
link(onResult,5762656:doOperation,[])
link(Op1,9440482:Result,[])
}
Add(Math,5762656,805,196)
{
OpType=35
Op2=0.1
link(onResult,10750243:doString,[(849,202)(849,240)(485,240)(485,279)])
link(Op1,16188843:Result,[])
}
Add(GetDataEx,10353003,497,238)
{
link(Data,15324645:Result,[])
}
Add(GetDataEx,10716070,595,238)
{
link(Data,9461505:Result,[])
}
Add(GetDataEx,4592002,700,238)
{
link(Data,11537204:Result,[])
}
Add(GetDataEx,7990350,805,238)
{
link(Data,5762656:Result,[])
}
Add(Hub,14200287,301,119)
{
link(onEvent1,1141869:doClear,[])
link(onEvent2,14105339:doClear,[(322,132)(322,167)])
}
Add(Math,13905818,392,357)
{
link(onResult,13981858:doOperation,[(436,363)(436,391)(380,391)(380,412)])
link(Op1,12421493:Result,[(398,251)(384,251)])
link(Op2,5106452:Result,[(405,271)(384,271)])
}
Add(InfoTip,6285748,371,308)
{
Info=#6:Inches|
Width=85
Height=102
}
Add(Math,13981858,392,406)
{
OpType=35
Op2=0.1
link(Op1,13905818:Result,[])
}
Add(GetDataEx,4818970,378,451)
{
Angle=1
link(Data,13981858:Result,[(398,456)])
}
Add(If_else,15771192,168,112)
{
Type=3
link(onTrue,1701876:doCalcDelta,[])
link(Op2,11988861:Width,[(181,96)(356,96)])
}
Add(If_else,9439733,168,154)
{
Type=3
link(onTrue,16059601:doCalcDelta,[])
link(Op2,11988861:Height,[(181,118)(363,118)])
}
END_SDK
Add(Label,9582378,266,98)
{
Left=25
Top=40
}