Hi. PP Users..

There is A scripts that work well in PP version 4.5

But don't work in 4.7.01a , PPro shutdown.. 


--  short key --------------

Key = S+bumpscreenleft
Cmd1 = aleftbump.powerpro
----------------------------



------- aleftbump.powerpro -------------
local wincap = caption                      
local wincap2 = win.ExePath("active")     
local num1=index(wincap, " ")               
local wincap3 = select(wincap, 1, 6)   
local bbl = visiblewindow(wincap)
if (bbl==0)
quit

if (wincap=="")
quit

if (cl.Exists("leftbump") == 0)
cl.create("leftbump")

window.hide(wincap)  
cl.insert("leftbump",cl.length("leftbump"))

local last=cl.length("leftbump")-1
cl.SetIcon("leftbump", last, wincap2)
cl.SetLabel("leftbump",last, wincap3)   
cl.settooltip("leftbump",last, wincap)

cl.addleft("leftbump",last,"script", "runfile bumb2left.powerpro")
cl.addright("leftbump",last,"script", "runfile bumb2left.powerpro")

cl.SetProperties("leftbump", "Format=TopMost Vertical barsize ;;+
tooltips  3DFrame baricons  Position: fixedtopleft iconsize: 16  ;;+
ShowIfBump: NearestEdge HideAfter: 5000")

bar.Show("leftbump")
--------------------------------------------------------




-------- bumb2left.powerpro ------------

labaname = cl.GetLastBar()
leftbutton = cl.getlastpressed(labaname)
buttonl=cl.getlastmouse(labaname)

toolt = cl.gettooltip(labaname,leftbutton)

if (buttonl=="L") do
        window.show(toolt)
        cl.remove(labaname,leftbutton)
        if (buttonl<0)
        bar.hide(labaname)
endif


if (buttonl=="R") do
        window.close(toolt)
        cl.remove(labaname,leftbutton)
        if (buttonl<0)
        bar.hide(labaname)
endif
quit
---------------------------------------------



If Shift+leftdump, 
Activewindow hide and a Button appears in left-top corner.

then, Press a Button, 
The Activewindow come back.. 

Now.. PPro 4.7.01a 
Press a Button, PPro shutdown.. 

What change???
Thanks..

Regards.. 
kottami, 

 


Reply via email to