Farbflash projects: Imaging lingo table | 3-D scene list | Find all | Handler menu | Lingo message window

Changeset 136 for trunk/lingosource


Ignore:
Timestamp:
02/14/08 11:34:24 (4 years ago)
Author:
alex
Message:

finding osc bug

Location:
trunk/lingosource
Files:
7 edited

Legend:

Unmodified
Added
Removed

  • trunk/lingosource/castlib1/OSCmenu_Handlers.ls

    r63 r136  
    192192  scrtype = listref.getaprop(#scripttype) 
    193193  if ilk(scrtype) = #symbol then 
    194     if ((the optiondown + the commanddown) > 0) and not(the shiftdown) then 
     194    if ((the optiondown + the commanddown + the controldown) > 0) and not(the shiftdown) then 
    195195       
    196196      tell the stage 
    … …  
    220220        glob[#theParams] = [:] 
    221221        glob[#theTargetInstance] = 0 
    222         glob[#copy2ClipBoard] = the shiftdown + the optiondown 
     222        glob[#copy2ClipBoard] = the shiftdown + (the optiondown or the controldown) 
    223223         
    224224        if cmdli.word.count then 
    … …  
    235235        if integerP(spnum) then glob[#spritenum] = spnum 
    236236        glob[#theTargetInstance] = 0 
    237         glob[#copy2ClipBoard] = the shiftdown + the optiondown 
     237        glob[#copy2ClipBoard] = the shiftdown + (the optiondown or the controldown) 
    238238        glob[#isBehavior] = 1 
    239239         
    … …  
    272272        glob[#theParams] = [:] 
    273273         
    274         glob[#copy2ClipBoard] = the shiftdown + the optiondown 
     274        glob[#copy2ClipBoard] = the shiftdown + (the optiondown or the controldown) 
    275275         
    276276        tell the stage 

  • trunk/lingosource/castlib1/OSCmenu_Utilities.ls

    r129 r136  
    419419   
    420420   
    421   if sprite(me.spritenum).member.type = #OSmenu then 
     421  if sprite(me.spritenum).member.type = #OSmenu and not(the shiftdown) then 
    422422     
    423423    mConvertToOSC li 
    … …  
    467467    cmdli = pLookUpCommandList.getaprop(theName) 
    468468    if not(listP(cmdli)) then 
    469     cmdli = [theName, "alexUtilities"] 
     469      cmdli = [theName, "alexUtilities"] 
    470470    else 
    471     if count(cmdli) < 1 then exit 
    472     if count(cmdli) < 2 then cmdli.add("alexUtilities") 
    473     theName = string(cmdli[1]) 
     471      if count(cmdli) < 1 then exit 
     472      if count(cmdli) < 2 then cmdli.add("alexUtilities") 
     473      theName = string(cmdli[1]) 
    474474    end if 
    475475     
    … …  
    486486    else 
    487487       
     488      put cmdli 
     489       
    488490      cmdStr = cmdli[1] 
    489491      targetScriptName = cmdli[2] 

  • trunk/lingosource/castlib1/alexUtilities.ls

    r131 r136  
    19661966      --  tempTextmember.alignment = #center 
    19671967       
    1968       if the optionDown then 
     1968      if the optionDown or the controldown or the shiftdown or the commanddown then 
    19691969        tempTextmember.fontStyle = [#bold] 
    19701970      else 

  • trunk/lingosource/castlib1/memberInfo.xml

    r113 r136  
    55                <comments></comments> 
    66                <memberName>doCommandMovieScript</memberName> 
    7                 <fName>doCommandMovieScript</fName> 
     7                <fname>doCommandMovieScript</fname> 
    88        </doCommandMovieScript> 
    99        <thisMoviesScript> 
    … …  
    1111                <comments></comments> 
    1212                <memberName>thisMoviesScript</memberName> 
    13                 <fName>thisMoviesScript</fName> 
     13                <fname>thisMoviesScript</fname> 
    1414        </thisMoviesScript> 
    1515        <keyboardNavigation_FrameLoop> 
    … …  
    1717                <comments></comments> 
    1818                <memberName>keyboardNavigation_FrameLoop</memberName> 
    19                 <fName>keyboardNavigation_FrameLoop</fName> 
     19                <fname>keyboardNavigation_FrameLoop</fname> 
    2020        </keyboardNavigation_FrameLoop> 
    2121        <menu1_button> 
    … …  
    2323                <comments></comments> 
    2424                <memberName>menu1_button</memberName> 
    25                 <fName>menu1_button</fName> 
     25                <fname>menu1_button</fname> 
    2626        </menu1_button> 
    2727        <menu2_button> 
    … …  
    2929                <comments></comments> 
    3030                <memberName>menu2_button</memberName> 
    31                 <fName>menu2_button</fName> 
     31                <fname>menu2_button</fname> 
    3232        </menu2_button> 
    3333        <simpleBMMenu> 
    … …  
    3535                <comments></comments> 
    3636                <memberName>simpleBMMenu</memberName> 
    37                 <fName>simpleBMMenu</fName> 
     37                <fname>simpleBMMenu</fname> 
    3838        </simpleBMMenu> 
    3939        <OSCmenu_Utilities> 
    … …  
    4141                <comments></comments> 
    4242                <memberName>OSCmenu_Utilities</memberName> 
    43                 <fName>OSCmenu_Utilities</fName> 
     43                <fname>OSCmenu_Utilities</fname> 
    4444        </OSCmenu_Utilities> 
    4545        <alexUtilities> 
    … …  
    4747                <comments>~/Documents/Scripts/lingo/commonMovieScript.ls</comments> 
    4848                <memberName>alexUtilities</memberName> 
    49                 <fName>alexUtilities</fName> 
     49                <fname>alexUtilities</fname> 
    5050        </alexUtilities> 
    5151        <convert_Lingo_2_CSS_Html> 
    … …  
    5353                <comments>~/Documents/Scripts/lingo/convert_Lingo_2_CSS_Html.ls</comments> 
    5454                <memberName>convert_Lingo_2_CSS_Html</memberName> 
    55                 <fName>convert_Lingo_2_CSS_Html</fName> 
     55                <fname>convert_Lingo_2_CSS_Html</fname> 
    5656        </convert_Lingo_2_CSS_Html> 
    5757        <OSCmenu_Handlers> 
    … …  
    5959                <comments></comments> 
    6060                <memberName>OSCmenu_Handlers</memberName> 
    61                 <fName>OSCmenu_Handlers</fName> 
     61                <fname>OSCmenu_Handlers</fname> 
    6262        </OSCmenu_Handlers> 
    6363        <pastefeld> 
    … …  
    6565                <comments></comments> 
    6666                <memberName>pastefeld</memberName> 
    67                 <fName>pastefeld</fName> 
     67                <fname>pastefeld</fname> 
    6868        </pastefeld> 
    6969        <oldclipboard> 
    … …  
    7171                <comments></comments> 
    7272                <memberName>oldclipboard</memberName> 
    73                 <fName>oldclipboard</fName> 
     73                <fname>oldclipboard</fname> 
    7474        </oldclipboard> 
    7575        <searchword> 
    … …  
    7777                <comments></comments> 
    7878                <memberName>searchword</memberName> 
    79                 <fName>searchword</fName> 
     79                <fname>searchword</fname> 
    8080        </searchword> 
    8181        <resizewindowfs> 
    … …  
    8383                <comments></comments> 
    8484                <memberName>resizewindowfs</memberName> 
    85                 <fName>resizewindowfs</fName> 
     85                <fname>resizewindowfs</fname> 
    8686        </resizewindowfs> 
    8787        <showHideHelp> 
    … …  
    8989                <comments></comments> 
    9090                <memberName>showHideHelp</memberName> 
    91                 <fName>showHideHelp</fName> 
     91                <fname>showHideHelp</fname> 
    9292        </showHideHelp> 
    9393        <helptext> 
    … …  
    9898rtf</comments> 
    9999                <memberName>helptext</memberName> 
    100                 <fName>helptext</fName> 
     100                <fname>helptext</fname> 
    101101        </helptext> 
    102102        <texthyperlinkBehavior> 
    … …  
    104104                <comments>/Users/alex/Documents/ALIEN/myLinkedScripts/texthyperlinkBehavior.ls</comments> 
    105105                <memberName>texthyperlinkBehavior</memberName> 
    106                 <fName>texthyperlinkBehavior</fName> 
     106                <fname>texthyperlinkBehavior</fname> 
    107107        </texthyperlinkBehavior> 
    108108        <statusOutput> 
    … …  
    113113rtf</comments> 
    114114                <memberName>statusOutput</memberName> 
    115                 <fName>statusOutput</fName> 
     115                <fname>statusOutput</fname> 
    116116        </statusOutput> 
    117117        <bbedit_Utilities> 
    … …  
    119119                <comments>~/Documents/Scripts/lingo/commonMovieScript.ls</comments> 
    120120                <memberName>bbedit_Utilities</memberName> 
    121                 <fName>bbedit_Utilities</fName> 
     121                <fname>bbedit_Utilities</fname> 
    122122        </bbedit_Utilities> 
    123123        <svn_Utilities> 
    … …  
    125125                <comments>~/Documents/Scripts/lingo/commonMovieScript.ls</comments> 
    126126                <memberName>svn_Utilities</memberName> 
    127                 <fName>svn_Utilities</fName> 
     127                <fname>svn_Utilities</fname> 
    128128        </svn_Utilities> 
    129129        <custom_Utilities> 
    … …  
    131131                <comments>~/Documents/Scripts/lingo/commonMovieScript.ls</comments> 
    132132                <memberName>custom_Utilities</memberName> 
    133                 <fName>custom_Utilities</fName> 
     133                <fname>custom_Utilities</fname> 
    134134        </custom_Utilities> 
    135135</Untitled> 

  • trunk/lingosource/castlib1/svn_Utilities.ls

    r133 r136  
    100100            tempSrcHFSPath = mConvertUnix2Hfs(me, tempSrcPath) 
    101101             
    102              
    103              
    104             ------------------------------------------ trac subversion support works better with unix linebreaks... 
    105             if voidP(convertLineBreaksToUnix) then convertLineBreaksToUnix = 1 
    106             if convertLineBreaksToUnix = "" then convertLineBreaksToUnix = 1 
    107              
    108             if convertLineBreaksToUnix = 1 then 
    109                
    110               if mCheckForXtra(me, "Pregex") = 1 then 
    111                  
    112                 scrTextLi = [st] 
    113                 pregex_replace(scrTextLi, "\x0D\x0A?", "g", "\x0A") 
    114                 st = scrTextLi[1] 
    115                  
    116               else 
    117                  
    118                 fndStr = numToChar(13) & numToChar(10) 
    119                 offs = offset(fndStr, st) 
    120                 repeat while offs > 0 
    121                   delete char offs of st 
    122                   offs = offset(fndStr, st) 
    123                 end repeat 
    124                  
    125                 fndStr = numToChar(13) 
    126                 offs = offset(fndStr, st) 
    127                 repeat while offs > 0 
    128                   put numToChar(10) into char offs of st 
    129                   offs = offset(fndStr, st) 
    130                 end repeat 
    131                  
    132               end if 
    133             end if 
    134             ----------------------------------------- 
    135              
    136              
    137102          else 
    138103             
    … …  
    142107          end if 
    143108           
     109           
     110          ------------------------------------------ trac subversion support works better with unix linebreaks... 
     111          if voidP(convertLineBreaksToUnix) then convertLineBreaksToUnix = 1 
     112          if convertLineBreaksToUnix = "" then convertLineBreaksToUnix = 1 
     113           
     114          if convertLineBreaksToUnix = 1 then 
     115             
     116            if mCheckForXtra(me, "Pregex") = 1 then 
     117               
     118              scrTextLi = [st] 
     119              pregex_replace(scrTextLi, "\x0D\x0A?", "g", "\x0A") 
     120              st = scrTextLi[1] 
     121               
     122            else 
     123               
     124              fndStr = numToChar(13) & numToChar(10) 
     125              offs = offset(fndStr, st) 
     126              repeat while offs > 0 
     127                delete char offs of st 
     128                offs = offset(fndStr, st) 
     129              end repeat 
     130               
     131              fndStr = numToChar(13) 
     132              offs = offset(fndStr, st) 
     133              repeat while offs > 0 
     134                put numToChar(10) into char offs of st 
     135                offs = offset(fndStr, st) 
     136              end repeat 
     137               
     138            end if 
     139          end if 
     140          ----------------------------------------- 
    144141           
    145142           

  • trunk/lingosource/castlib1/thisMoviesScript.ls

    r113 r136  
    131131                  currMScripts = [] 
    132132                  -- mscr.add([#title:"Castlib" && n &":", #items:currMScripts, #type:#divider]) 
    133                   mscr.add([#title:"Castlib" && n &":", #items:currMScripts, #name:"Castlib"&n]) 
     133                  mscr.add([#title:"Castlib" && n && QUOTE & the name of castlib n & QUOTE & ":", #items:currMScripts, #name:"Castlib"&n]) 
    134134                   
    135135                end if 
    … …  
    144144                  currPScripts = [] 
    145145                  -- pscr.add([#title:"Castlib" && n &":", #items:currPScripts, #type:#divider]) 
    146                   pscr.add([#title:"Castlib" && n &":", #items:currPScripts, #name:"Castlib"&n]) 
     146                  pscr.add([#title:"Castlib" && n && QUOTE & the name of castlib n & QUOTE & ":", #items:currPScripts, #name:"Castlib"&n]) 
    147147                end if 
    148148                ---------------- // menu divider 
    … …  
    156156                  currBScripts = [] 
    157157                  -- bscr.add([#title:"Castlib" && n &":", #items:currBScripts, #type:#divider]) 
    158                   bscr.add([#title:"Castlib" && n &":", #items:currBScripts, #name:"Castlib"&n]) 
     158                  bscr.add([#title:"Castlib" && n && QUOTE & the name of castlib n & QUOTE & ":", #items:currBScripts, #name:"Castlib"&n]) 
    159159                end if 
    160160                ---------------- // menu divider 
    … …  
    172172    end repeat 
    173173     
     174    -- quick and dirty way to check for D10 in order to check for sprite names 
     175    dummyMem = member("nonexistingmember" & the milliseconds) 
    174176     
    175177    anz = the lastchannel 
    … …  
    191193        end repeat 
    192194        if count(thisSil) > 0 then 
    193           silscr.add([#title:"sprite(" & n & ")", #items: thisSil]) 
     195           
     196          if voidP(dummyMem) then 
     197            spritename = sprite(n).name 
     198          else 
     199            spritename = "" 
     200          end if 
     201          if length(spritename) < 1 then spritename = string(sendSprite(n, #mGetMyKanalName)) 
     202          silscr.add([#title:"sprite(" & n & ")" && spritename, #items: thisSil, #name:"sprite(" & n & ")"]) 
    194203        end if 
    195204      end if 

  • trunk/lingosource/castlib2/memberInfo.xml

    r82 r136  
    55                <comments>~/Documents/Scripts/lingo/commonMovieScript.ls</comments> 
    66                <memberName>commonMovieScript</memberName> 
    7                 <fName>commonMovieScript</fName> 
     7                <fname>commonMovieScript</fname> 
    88        </commonmoviescript> 
    99        <FileIOFunktionen> 
    … …  
    1111                <comments>~/Documents/Scripts/lingo/FileIOFunktionen.ls</comments> 
    1212                <memberName>FileIOFunktionen</memberName> 
    13                 <fName>FileIOFunktionen</fName> 
     13                <fname>FileIOFunktionen</fname> 
    1414        </FileIOFunktionen> 
    1515        <GetSetPrefs> 
    … …  
    1717                <comments>~/Documents/Scripts/lingo/GetSetPrefs.ls</comments> 
    1818                <memberName>GetSetPrefs</memberName> 
    19                 <fName>GetSetPrefs</fName> 
     19                <fname>GetSetPrefs</fname> 
    2020        </GetSetPrefs> 
    2121        <aleXtrasMovieScript> 
    … …  
    2323                <comments>~/Documents/Scripts/lingo/aleXtrasMovieScript.ls</comments> 
    2424                <memberName>aleXtrasMovieScript</memberName> 
    25                 <fName>aleXtrasMovieScript</fName> 
     25                <fname>aleXtrasMovieScript</fname> 
    2626        </aleXtrasMovieScript> 
    2727        <PseudoXMLPS> 
    … …  
    2929                <comments>~/Documents/Scripts/lingo/PseudoXMLPS.ls</comments> 
    3030                <memberName>PseudoXMLPS</memberName> 
    31                 <fName>PseudoXMLPS</fName> 
     31                <fname>PseudoXMLPS</fname> 
    3232        </PseudoXMLPS> 
    3333        <simpleGoToAction> 
    … …  
    3535                <comments>/Users/alex/Documents/ALIEN/myLinkedScripts/simpleGoToAction.ls</comments> 
    3636                <memberName>simpleGoToAction</memberName> 
    37                 <fName>simpleGoToAction</fName> 
     37                <fname>simpleGoToAction</fname> 
    3838        </simpleGoToAction> 
    3939        <SpriteNameBeaver> 
    … …  
    4141                <comments>~/Documents/Scripts/lingo/SpriteNameBeaver.ls</comments> 
    4242                <memberName>SpriteNameBeaver</memberName> 
    43                 <fName>SpriteNameBeaver</fName> 
     43                <fname>SpriteNameBeaver</fname> 
    4444        </SpriteNameBeaver> 
    4545</Untitled> 
Note: See TracChangeset for help on using the changeset viewer.