Time AutoLISP

[JuniorNogueira]

This code works fine for running lisp at a given time.
However, if the computer's schedule changes, it will still work, how can I fix it?

(defun C:Temp (/ ha)
  (setq ha (rtos (getvar "cdate") 2 6))
  (if
    (>= (atof ha) 20180901.091000);Set time
     (alert "\nYour time is over!")
     (command "_.Line");Subrotina
  )
)

 

[BIGAL]

Are you trying to set a check time and if invalid stop working ? This is a common security questions and has been answered a few times here. One way around is to get International time via the internet. have a look at www.lee-mac.com.

[JuniorNogueira]

@BIGAL I do not understand, do you have an example?

[BIGAL]

This is internet time by lee-mac independent of the computer time.

 

 

internet time.lsp

[JuniorNogueira]

@BIGALThank you, perfect !!