initial commit

1 - install/MSIFileRunAsAdmin.reg

@@ -0,0 +1,8 @@
+Windows Registry Editor Version 5.00
+
+[HKEY_CLASSES_ROOT\Msi.Package\shell\runas\command]
+@=hex(2):22,00,25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,\
+  00,25,00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,6d,00,\
+  73,00,69,00,65,00,78,00,65,00,63,00,2e,00,65,00,78,00,65,00,22,00,20,00,2f,\
+  00,69,00,20,00,22,00,25,00,31,00,22,00,20,00,25,00,2a,00,00,00
+

2 - scripts/ACAD_TRUSTED/allToZero.lsp

@@ -0,0 +1,29 @@
+(defun C:alltozero (/ i imax il ss currElem currPos newPos newElem)
+    ;variables:
+    (setq i 0);counter to zero
+    (setq imax 1);while variable
+
+    (graphscr)
+
+    (setq ss (ssget "_A" '((0 . "insert"))));select all
+    (setq il (sslength ss));length of selection
+
+    (while imax
+
+        (setq currElem (entget (ssname ss i) ))
+        (setq currPos (assoc 10 currElem))
+
+        ;; (cdr (assoc 10 currElem))
+
+        (setq newPos (list 10 0 0 0))
+
+        (setq newElem (subst newPos currPos currElem))
+        (entmod newElem)
+
+
+        ;while specific: 
+        (setq i (1+ i));increments i
+        (if (= i il) (setq imax nil));finish function if i equals il
+    )
+
+)

2 - scripts/ACAD_TRUSTED/revitCleaner.scr

@@ -0,0 +1,31 @@
+_.model
+_.-scalelistedit
+r
+y
+e
+_.cannoscale
+1:50
+_.ltscale
+0.2
+_.change
+all
+
+p
+c
+bylayer
+lw
+bylayer
+
+_.bindtype
+1
+_.-xref
+b
+*
+(LOAD "C:/ACAD_TRUSTED/allToZero.lsp")
+alltozero
+_.zoom
+e
+(LOAD "C:/ACAD_TRUSTED/saveasPlus.lsp")
+saveasplus
+p
+acad_

2 - scripts/ACAD_TRUSTED/saveasPlus.lsp

@@ -0,0 +1,17 @@
+(defun C:saveasplus (/ x s currPath currName savePath)
+(initget 1 "Prefix Suffix")
+(setq x (getkword "Prefix or suffix? [Prefix/Suffix]"))
+(setq s (getstring (strcat x "?")))
+(setq currPath (getvar "dwgprefix"))
+
+
+(setq currName (cadr(fnsplitl (getvar "DWGname"))))
+(if (= x "Prefix") 
+    (setq savePath (strcat currPath s currName ".dwg")) 
+    (setq savePath (strcat currPath currName s ".dwg"))
+)
+(command "_.saveas" "2013" savePath)
+
+
+
+)

3 - settings/addTrustedPath.scr

@@ -0,0 +1,2 @@
+._TRUSTEDPATHS
+"C:\ACAD_TRUSTED"

readme.txt

@@ -0,0 +1,58 @@
+V1.0 
+2018-11-03
+
+SCROLL DOWN FOR ENGLISH!!
+
+Elõkövetelmény: minimum Autocad 2013 vagy frissebb, sima vagy vertikális az mindegy. Több verzió is fent lehet.
+
+1 - install mappában:
+	1a. Futtasd: MSIFileRunAsAdmin.reg
+	1b. ScriptPro 2.0.msi - jobbklikk, futtatás rendszergazdaként, telepítsd
+
+2 - scripts mappában
+	Másold a mappa tartalmát a c gyökérbe, elérési útnak így kell kinéznie: C:\ACAD_TRUSTED\...
+
+3. beállítások, ez kicsit macerás lesz, nézd a képeket a mappában. 
+	3a. C:\ACAD_TRUSTED mappára jobbklikk - tulajdonságok - Biztonság fül - Speciális - Alul: Öröklõdés letiltása - Örökölt engedélyek kifejezett engedélyekké konvertálása. 
+	Ezután a listában jelöld ki a "Hitelesített felhasználók"-at, majd eltávolítás - OK - OK
+	3b. Nyisd meg az autocad-et, kezdj egy új rajzot, majd húzd rá az autocad ablakra az addTrustedPath.scr fájlt. Ha lefutott hiba nélkül, zárd be az autocadet, az új rajzot nem kell elmenteni. (Ha több Autocad verzió is fent van a gépen, akkor ajánlott ezt megtenni midegyik autocadben, VAGY a scriptproban beállítani, hogy melyik autocadet használja. Ha nincs beállítva, akkor általában a legutóbb megnyitott autocadet nyitja meg.)
+(ez nem muködik!!)
+
+4. használat
+	4a. Revitbõl Lapokat exportálj ki, ne Nézeteket, csak azzal mûködik. Exportáláskor válaszd ki, hogy a a nézeteket xrefként mentse. A revit így létre fog hozni minden tervlaphoz egy tervlap fájl, és minden nézethez és minden revit linkhez egy-egy fájlt. 
+	4b. Start menübõl nyisd meg a Scriptpro-t
+	4c. Scriptproban fent nagy zöld 'Add' gomb, majd válaszd ki a tervlap fájlokat. Úgy egyszerû megtalálni õket, hogy ezeknek a legrövidebb a nevük.
+	4d. Scriptproban Script file Browse gomb, válaszd ki ezt a fájlt: "C:\ACAD_TRUSTED\revitCleaner.scr"
+	4e. Ha több autocad is telepítve van és nem állított be a trusted path-t mindegyikben, akkor a Settingsben állítsd be, hogy melyik autocadet futtassa, az acad.exe-t kell betallózni.
+	4e. Szalagmenün (Run) Checked gomb.
+	4f. Ha elkészült az eredeti fájlok mellé létrehoz egy-egy acad_... kezdetû fájlt, ezekben benne van minden, a többi nem kell, törölhetõ
+
+-------
+ENGLISH
+-------
+
+If it's already installed, you can start from 4!
+
+Prerequisites: Autocad 2013 or later, vanilla or vertical. Multiple versions can be installed
+
+1 - install folder:
+	1a. Run MSIFileRunAsAdmin.reg
+	1b. ScriptPro 2.0.msi - rightclick, run as admin, install
+
+2 - scripts mappában
+	Copy the ACAD_TRUSTED folder to the root of the C: drive. It should look like this: C:\ACAD_TRUSTED\...
+
+3 - settings, see images in folder
+	3a. C:\ACAD_TRUSTED rightclick - properties - security tab - Advanced - Down there: Disable inheritance - Convert inherited permissions into explicit permissions on this object.
+	Select Authenticated users in the list and Remove - Ok - Ok
+	3b. Open autocad, start a new drawing, drag and drop addTrustedPath.scr to the window. If it runs without an error close Autocad, you don't have to save the new drawing. (If multiple versions of Autocad installed: It's recommended to do this in all autocad OR set up in scriptpro which Autocad to use. Of it's not setup it will open the last used one.)
+
+4 - usage
+	4a. Export sheets from Revit, not views! On export select Export views on sheets as external references. Revit will create a file for each sheets and views. 
+	4b. From Start menu start Scriptpro
+	4c. In Scriptpro push the big green 'Add' button on the ribbon, and select the files of the sheets. You can easily find them, they have the shortest name.
+	4d. In scriptpro, Script file Browse button, select this file: "C:\ACAD_TRUSTED\revitCleaner.scr"
+	4e. If multiple verions of Autocad installed, select the version you set up the trusted path in the settings. You have to find acad.exe
+	4f. On the ribbon click on (Run) Checked button
+	4g. When it's finished it will create a new file for each sheet, starting with acad_... You can delete all of the other files
+