NSTimer в Applescript OBJC не работает

Question

Я не уверен, что я делаю неправильно, я также не знаю, как использовать NSTimer ... Я просто хочу запустить простое приложение, когда вы нажмете Run ... it часть сценария (это то, что я пытаюсь получить NSTimer делать, а затем при нажатии кнопки стоп ... он останавливается

до сих пор у меня есть это ...

current application's NSTimer's timerWithTimeInterval_target_selector_userInfo_repeats_(1, me, "runOLEDWMESerial:", missing value, yes) 
on runOLEDWMESerial_(sender) 
    set player_active to false 
    set theString to "Error;00:00:00:00" 
    tell application "Finder" 
     if (get name of every process) contains "NicePlayer" then set player_active to true 
    end tell 
    if player_active then 
     try 
      tell application "NicePlayer" 
       if ((count of movies) is not 0) then 
        tell front playlist 
         set theName to name 
         set curSeconds to elapsed time as integer 
         set theSeconds to duration as integer 
         set theHours to theSeconds div 3600 
         set theSeconds to theSeconds - theHours * 3600 
         set theMinutes to theSeconds div 60 
         set theSeconds to theSeconds - theMinutes * 60 
         set theDuration to "" 
         if theHours > 0 then 
          if theHours < 10 then set theHours to "0" & theHours 
          set theDuration to theHours & ":" 
         end if 
         if theMinutes < 10 then set theMinutes to "0" & theMinutes 
         if theSeconds < 10 then set theSeconds to "0" & theSeconds 
         set theDuration to theDuration & theMinutes & ":" & theSeconds 
         set curHours to curSeconds div 3600 
         set curSeconds to curSeconds - curHours * 3600 
         set curMinutes to curSeconds div 60 
         set curSeconds to curSeconds - curMinutes * 60 
         set curTime to "" 
         if curHours > 0 then 
          if curHours < 10 then set curHours to "0" & curHours 
          set curDuration to curHours & ":" 
         end if 
         if curMinutes < 10 then set curMinutes to "0" & curMinutes 
         if curSeconds < 10 then set curSeconds to "0" & curSeconds 
         set curTime to curTime & curMinutes & ":" & curSeconds 
         set theString to theName & ";" & curTime & ";" & theDuration 
        end tell 
       end if 
      end tell 
     on error errmsg 
      set theString to "Error2;00:00;00:00" 
     end try 
    end if 
    textName's setStringValue_(theName) 
    textTime's setStringValue_(curTime & "/" & theDuration) 
end runOLEDWMESerial_ 

Да Я конечно, мой код уродлив, но по существу это будет отправка данных через последовательный порт, который является главной целью здесь, однако прямо сейчас я просто пытаюсь получить окно, чтобы отразить то, что воспроизводится ...

Так что runOLEDWMESerial привязан к кнопке запуска ... когда вы нажимаете кнопку запуска, цикл запускается один раз, но затем останавливается ... если я добавлю повтор вокруг всего на runOLEDWMESERIAL_ (отправитель) с задержкой (1) он работает, но также становится неуязвимым в ui, и я не могу его остановить ... Так кто-нибудь может помочь мне понять, почему NSTimer не работает

Answer 1

Я действительно понял это ... У меня было это заново ... runOLEDWMESerial_ была кнопка ... но если вы сделаете это так ... Мне также пришлось удалить секцию try, так как это не позволяло ей правильно работать

on ClickButton_(sender) 
    current application's NSTimer's timerWithTimeInterval_target_selector_userInfo_repeats_(1, me, "runOLEDWMESerial:", missing value, yes) 
end Clickbutton_ 
    on runOLEDWMESerial_() 
    set player_active to false 
    set theString to "Error;00:00:00:00" 
    tell application "Finder" 
     if (get name of every process) contains "NicePlayer" then set player_active to true 
    end tell 
    if player_active then 

     tell application "NicePlayer" 
      if ((count of movies) is not 0) then 
       tell front playlist 
        set theName to name 
        set curSeconds to elapsed time as integer 
        set theSeconds to duration as integer 
        set theHours to theSeconds div 3600 
        set theSeconds to theSeconds - theHours * 3600 
        set theMinutes to theSeconds div 60 
        set theSeconds to theSeconds - theMinutes * 60 
        set theDuration to "" 
        if theHours > 0 then 
         if theHours < 10 then set theHours to "0" & theHours 
         set theDuration to theHours & ":" 
        end if 
        if theMinutes < 10 then set theMinutes to "0" & theMinutes 
        if theSeconds < 10 then set theSeconds to "0" & theSeconds 
        set theDuration to theDuration & theMinutes & ":" & theSeconds 
        set curHours to curSeconds div 3600 
        set curSeconds to curSeconds - curHours * 3600 
        set curMinutes to curSeconds div 60 
        set curSeconds to curSeconds - curMinutes * 60 
        set curTime to "" 
        if curHours > 0 then 
         if curHours < 10 then set curHours to "0" & curHours 
         set curDuration to curHours & ":" 
        end if 
        if curMinutes < 10 then set curMinutes to "0" & curMinutes 
        if curSeconds < 10 then set curSeconds to "0" & curSeconds 
        set curTime to curTime & curMinutes & ":" & curSeconds 
        set theString to theName & ";" & curTime & ";" & theDuration 
       end tell 
      end if 
     end tell 
    end if 
    textName's setStringValue_(theName) 
    textTime's setStringValue_(curTime & "/" & theDuration) 
end runOLEDWMESerial_