scriptTracker/ScriptTracker_Scripts/stack_ScriptTracker_button_id_1008.livecodescript at master · bwmilby/scriptTracker · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Script "stack_ScriptTracker_button_id_1008"

/*
# Name: button "StackMenu" of card "Tracker" of stack "ScriptTracker"
# ID: button id 1008 of card id 1002 of stack "ScriptTracker"
*/


on menuPick pItemName
   put pItemName into field "StackName" of this card
   send "textChanged" to field "StackName" of this card
end menuPick


on mouseDown pButtonNumber
   local tStackList, tStacks

   # altkey-mouseUp selection doesn't work on linux
   if the altkey is down or the controlkey is down then
      put the mainstacks into tStackList
   else
      put IDEUserMainstacks() into tStackList
   end if
   repeat for each line tStack in tStackList
      if the mode of stack tStack > 0 then
         put tStack & lf after tStacks
      end if
   end repeat
   delete char -1 of tStacks
   set the text of button "StackMenu" to tStacks
end mouseDown


on mouseEnter
   set the hilite of me to true
end mouseEnter


on mouseLeave
   set the hilite of me to false
end mouseLeave