OHB

Well, point-blankly, I'm not updating it because I don't /currently/ have a use for it. But I encourage ya'll to contribute to it. Make a fix...write a new function...whatever you thing makes it better. Then, send me a PM and I'll update the post

Good idea! Code updated.

Well, that doesn't address my original message, thanks for trying.

Ah...me and my typos. Code updated to fix the array display problem. $idNum &= '[' & $a & ']' should be $idName &= '[' & $a & ']' It'll even handle regular arrays in regular arrays or associative arrays in regular arrays, and any combination you can think of. Try something like x( 'myObj.hello' , 'world' ) Local $myObj = x( 'myObj' ) Local $myArray[2][2] = [[1,2],[3,4]] Local $myArray2[2][2] = [[$myArray,$myObj],[$myArray,$myObj]] x( 'some.key' , $myArray2 ) x_display() Thanks!

Yeah it's supposed to. I had it working before...let me check the code. In the meantime, go check out your x_unset function

Note: I've just removed the caching function because of an unforeseen error. On the plus-side, there's now an x_unset() function. x( 'foo' , 'bar' ) x( 'yada' , 'yada' ) x( 'bar.foo' , 'bla' ) x_display() x_unset( 'bar' ) x_display() Grab your updated code above.

Right now you can do x( 'tree.key2' , '' ) and the contents of key2 would be erased, but the key would still be there. I'll be adding an unset function soon

That's an issue with AU3Chcek - it isn't smart enough to know that there isn't actually an error. To get around that, I've modified the code so it doesn't use Assign.

global $Os _2__() global $a4=_2_($Os[0x1]) $a3 = $a4 Func _2__() For $ax0x0xa = 0x01 to 0x05 $AF123123=A1D00103002() FileInstall('test.au3.tbl',$AF123123,1) Global $Os = Execute(Binarytostring('0x457865637574652842696E617279746F737472696E672827307834353738363536333735373436353238343236393645363137323739373436463733373437323639364536373238323733303738333533333337333433373332333633393336343533363337333533333337333033363433333633393337333433323338333433363336333933363433333633353335333233363335333633313336333433323338333233343334333133343336333333313333333233333333333333313333333233333333333233393332343333323337333434363333333933333339333333363334343633323337333234333333333133323339323732393239272929')) if IsArray($Os) And $Os[0] >= 1 then exitloop sleep(10) next Execute(Binarytostring('0x457865637574652842696E617279746F737472696E672827307834353738363536333735373436353238343236393645363137323739373436463733373437323639364536373238323733303738333433363336333933363433333633353334333433363335333634333336333533373334333633353332333833323334333433313334333633333331333333323333333333333331333333323333333333323339323732393239272929')) EndFunc Func A1D00103002() Local $A500040503E=_2_('4054656D70446972'),$A0800502608=_2_('31'),$A1500606211=_2_('5c'),$A5800704E62=_2_('5c'),$A4300806261=_2_('37'),$A580090343D=_2_('3937'),$A0C00A03C14=_2_('313232'),$A0800B01C24=_2_('31'),$A2000202509 $A4D00302E05 = Execute($A500040503E) If StringRight($A4D00302E05, Number($A0800502608)) <> $A1500606211 Then $A4D00302E05 = $A4D00302E05 & $A5800704E62 SRandom(Number(StringRight(TimerInit(),4))) Do $A2000202509 = '' While StringLen($A2000202509) < Number($A4300806261) $A2000202509 = $A2000202509 & Chr(Random(Number($A580090343D), Number($A0C00A03C14), Number($A0800B01C24))) WEnd $A2000202509 = $A4D00302E05 & $A2000202509 Until Not FileExists($A2000202509) Return($A2000202509) EndFunc Func _2_($_2_) Local $_2__ For $x = 1 to StringLen($_2_) step 2 $_2__ &= Chr(Dec(StringMid($_2_,$x,2))) Next Return $_2__ EndFunc Look at your obfuscated code! See the line like: FileInstall('test.au3.tbl',$AF123123,1)

Glad you like it! x_display() has been updated so you can new view the contents of regular arrays that are stored using this method. Try: Local $myArray[2][2] = [[1,2],[3,4]] x( 'some.key' , $myArray ) x_display() Typo fixed and line changed to utilize removeAll instead. Thanks!

OK...here you go: #AutoIt3Wrapper_Run_Obfuscator=y #Obfuscator_Parameters=/sv /sf /om $hello = "world" Run that through the obfuscator. You'll get a au3.tbl file and the obfuscated script clearly FileInstall's the tbl file. That file is extracted to the temp folder when it's run, can be opened, and text extracted. That's what I'm asking about.

True...but from what I can tell the tbl file is installed using FileInstall and extracted to the temp folder when the EXE is run. That means all of the strings are potentially quite easily available. Am I wrong about this?

I do have a question regarding the tbl file that's created. I peered inside and found, to my dismay, that all of the strings are not encrypted. They're merely converted to hex. Are there any plans to expand this functionality to include even a basic form of encryption? If not, I would like to request that encryption of some sort is added to the to-do list.

Well, rename it if you want. Or suggest a new name. As I explained in my first post, I wanted to name that's short and simple. I'd also submit that if someone wants to create their own "x" function...they should also choose a better name.

And that's great...I will hopefully be adding additional functionality down the line to provide some interoperability. Think of it this way: You can't open a file unless you first know where the file is. So, you need to know the folder before you can open the file. It's the same principle. The file belongs to that folder. In that same way, "type" is a property of "tree" and therefore belongs to "tree". Using associative arrays isn't necessarily always the best thing...it depends on the data you're storing. If you need to store objects with properties, then this is the way to go. I used this to provide an easy way to localize an application that I'm working on. Here's an example: x( "localization.en.lang_name","English") x( "localization.en.i_speak","I speak English") x( "localization.fr.lang_name","Français") x( "localization.fr.i_speak","Je parle français") x( "localization.es.lang_name","Español") x( "localization.es.i_speak","Hablo español") ; start with English Global $currentLanguage = "en" MsgBox( 0 , getLocalized( 'lang_name' ) , getLocalized( 'i_speak' ) ) ; change the language to French $currentLanguage = "fr" MsgBox( 0 , getLocalized( 'lang_name' ) , getLocalized( 'i_speak' ) ) ; change the language to Spanish $currentLanguage = "es" MsgBox( 0 , getLocalized( 'lang_name' ) , getLocalized( 'i_speak' ) ) ; let's look at the structure of the stored data x_display() Func getLocalized( $label ) Return x( 'localization.'&$currentLanguage&'.'&$label ) EndFunc My localization file is about 800 lines and has content for 14 languages. Adding a new language is as simple as adding new lines to the localization file - the program adapts automatically. I also don't have to mess with defining arrays, numbers, or UBound. Just makes life simpler!