#sha
Add(VBJScript,279962,707,447)
{
 @Hint=#7:SendKey|
 WorkPoints=#6:onWork|
 EventPoints=#5:Sleep|
 Script=#23:Sub doWork(Data, Index)|47:   set WshShell = CreateObject("WScript.Shell")|16:   Sys.Sleep 100|22:   WshShell.Run "calc"|16:   Sys.Sleep 100|36:   WshShell.AppActivate "Calculator"|16:   Sys.Sleep 100|27:   WshShell.SendKeys "1{+}"|16:   Sys.Sleep 500|24:   WshShell.SendKeys "2"|16:   Sys.Sleep 500|24:   WshShell.SendKeys "~"|16:   Sys.Sleep 500|25:   WshShell.SendKeys "*3"|16:   Sys.Sleep 500|24:   WshShell.SendKeys "~"|17:   Sys.Sleep 2500|14:   MsgBox "OK"|7:End Sub|
 link(Sleep,4363418:doEvent1,[])
}
Add(Beep,11419446,798,454)
{
 Freq=0
 Duration=100
 link(Freq,2149200:Value,[])
 link(Duration,9689648:Value,[])
}
Add(Hub,4363418,756,447)
{
 link(onEvent1,9689648:doValue,[(796,453)(796,418)])
 link(onEvent2,11419446:doBeep,[])
}
Add(Memory,9689648,805,412)
{
}
Add(Memory,2149200,798,377)
{
 Default=Integer(0)
}