Sunc Lua Script Open Source

 START_TIME = ()

 rawResults = {}
 metaInfo = {}

  (name, ok, info)
     rawResults[name] ~=    
    rawResults[name] = {
        passed = ok    ,
        info = info  
    }


  (name, fn, failReason)
     ok, err = (fn)
      ok 
        (name, , failReason  (err))
         , err
    
         rawResults[name] ==  
            (name, , )
        
         
    


  (path)
     env =   ()  
     cur = env
     seg  .(path, ) 
         (cur) ~=  
             
        
        cur = cur[seg]
         cur ==  
             
        
    
     


  (name, cond, reason)
     cond 
        (name, , )
    
        (name, , reason  )
    


  ()
     n = 
     ok = (()
         getexecutorname 
            n = ()
         identifyexecutor 
             a, b = ()
            n = a  b
          
            n = 
        
    )
      ok 
        n = 
    
     (n) ~=  
        n = 
    
     n


metaInfo.executor = ()

 featureTargets = {
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    ,
    
}

 _, path  (featureTargets) 
     exists = (path)
     exists 
        (path, , )
    
        (path, , )
    


  
    (, ()
         a = ()
         b = ()
        (a == b, )
        a.__SUNC_TEMP = 
        (().__SUNC_TEMP == , )
        a.__SUNC_TEMP = 
    , )


  
    (, ()
         f = ()
        ((f) == , )
        (() == , )
    , )

    (, ()
         ok, err = (()
             f = ()
            ()
        )
        (ok == , )
        ((err) ==   (err) == , )
    , )


      
    (, ()
         obj = {}
         mt = (obj)  {}
         oldIndex = mt.__index

         wr = (() (mt, ) )
        (wr, )

        mt.__index = (self, k)
             k ==  
                 
            
             oldIndex 
                 (self, k)
            
             
        

        (mt, )

         hook
        hook = (obj, , (self, k, ...)
             k ==  
                 
            
             (self, k, ...)
        )

        (obj.__SUNC_FLAG == , )
        (obj.__SUNC_HOOKED == , )
    , )


   iscclosure  islclosure 
    (, ()
         luaFunc = ()
             
        
         cFunc = (luaFunc)
        (() == (), )
        (luaFunc ~= cFunc, )
        ((cFunc), )
        ((luaFunc), )
    , )


 checkcaller 
    (, ()
        (() == , )
    , )


 getthreadidentity  setthreadidentity 
    (, ()
         original = ()
        ((original) == , )
        (original + )
        (() == original + , )
        (original)
    , )


 isfolder  makefolder  delfolder  writefile  readfile  isfile  listfiles 
    (, ()
         root = 
         (root) 
            (root)
        
        (root)
        ((root), )

         f1 = root .. 
        (f1, )
        ((f1), )
        ((f1) == , )

         appendfile 
            (f1, )
            ((f1) == , )
        

         loadfile 
             f2 = root .. 
            (f2, )
             loader = (f2)
             fn = ()
            (() == , )
        

         entries = (root)
        ((entries) ==   #entries >= , )

        (f1)
        ( (f1), )
        (root)
        ( (root), )
    , )


  
    (, ()
         res = ({
            Url = ,
            Method = 
        })
        ((res) == , )
        (res.StatusCode ==   res.StatusCode ==   res.StatusCode == , )
    , )


 getcustomasset  writefile 
    (, ()
         path = 
        (path, )
         id = (path)
        ((id) ==   #id > , )
    , )


 gethiddenproperty  sethiddenproperty 
    (, ()
         fire = .()
         okA = (()
             (fire, )
        )
        (okA, )
         okB = (()
            (fire, , )
        )
        (okB, )
    , )


   .new 
    (, ()
         sq = .()
        sq.Visible = 
        sq.Color = .(, , )
        sq.Size = .(, )

         getrenderproperty 
             v = (sq, )
            ((v) == , )
        

         setrenderproperty 
            (sq, , )
            (sq.Visible == , )
        

         okDestroy = (()
            sq:()
        )
          okDestroy 
            (() sq:() )
        
    , )

     .Fonts 
        (, .Fonts.UI ~= , )
    

     cleardrawcache 
         ok = (()
            ()
        )
        (, ok, )
    


 getscriptbytecode  getscripthash 
    (, ()
         plr = :().LocalPlayer
         char = plr.Character  plr.CharacterAdded:()
         anim = char:()  char:()
        (anim, )

         bc = (anim)
        ((bc) ==   #bc > , )

         h1 = (anim)
         src = anim.Source

        anim.Source = src .. 
         h2 = (anim)
        anim.Source = src

        (h1 ~= h2, )
    , )


 getrunningscripts  getscripts 
    (, ()
         rs = ()
        ((rs) == , )
        (#rs > , )

         all = ()
        ((all) ==   #all > , )
    , )


 getinstances 
    (, ()
         insts = ()
        ((insts) ==   #insts > , )
        (insts[].ClassName ~= , )
    , )


 getnilinstances 
    (, ()
         insts = ()
         #insts >  
            (insts[].Parent == , )
        
    , )


 sorted = {}
 name, data  (rawResults) 
    .(sorted, {name = name, passed = data.passed, info = data.info})


.(sorted, (a, b)
     a.name < b.name
)

 total = #sorted
 passed = 
 _, r  (sorted) 
     r.passed 
        passed = passed + 
    


 successRate = 
 total >  
    successRate = .((passed / total) *  + )


 elapsed = () - START_TIME

  (t)
     .(t * ) / 


  (t)
     t <  
         
     t <  
         
     t <  
         
     t <  
         
    
         
    


()
( .. (metaInfo.executor))
(.(, passed, total, successRate))
(.(, (elapsed)))
((elapsed))
()

 _, r  (sorted) 
     tag = r.passed    
     msg = r.info  (r.info)  
    (.(, tag, r.name, msg))


()