_ArrayAdd_2dim

[draco105457]

a 2-Dimensional Version of _ArrayAdd

i hope someone need the Script

expandcollapse popup

#region #### Includes ============================================================================================================
#include-once
#include <array.au3>
#endregion ======================================================================================================================
 
#cs
#CURRENT# =====================================================================================================================
  _ArrayAdd_2dim
#CURRENT# =====================================================================================================================
#ce
 
; #Function -  _ArrayAdd_2dim ======================================================================================================================================
; Parameters ....: $avArray = Array to add with additional Array
;    $newARRAY = aditional Array
; Error .........: 1 = Master Array is no Array
;    2 = add. Array is no Array
;    3 = Master Array is no 2D Array
;    4 = add. Array is no 2D Array
; Return ........: 0 = All OK
; Description ...: to ad a 2dimensional Array to another 2 dimensional Arry
; ==========================================================================================================================================================================
Func _ArrayAdd_2dim(ByRef $avArray, $newARRAY)
If Not IsArray($avArray) Then Return SetError(1, 0, -1)
If Not IsArray($newARRAY) Then Return SetError(2, 0, -1)
If UBound($avArray, 0) <> 2 Then Return SetError(3, 0, -1)
If UBound($newARRAY, 0) <> 2 Then Return SetError(4, 0, -1)
 
Local $i, $j,$jj
;##################################################################
;### check which Array is the Biggest
;##################################################################
 
If UBound($avArray,2) > UBound($newARRAY,2) then $newdim = UBound($avArray,2)
If UBound($avArray,2) < UBound($newARRAY,2) then $newdim = UBound($newARRAY,2)
 
;##################################################################
;### Redim the Array Size
;##################################################################
 
ReDim $avArray[(UBound($avArray,1))+(UBound($newARRAY,1))][$newdim] ; 1 Array zeile hinzufügen
 
;##################################################################
;### add the Array
;##################################################################
 
for $i = (UBound($avArray)-1) to (UBound($avArray))-(UBound($newARRAY)) Step -1
   $j = UBound($newARRAY)-$jj-1
   for $k = 0 to (UBound($newARRAY,2)-1)
    ConsoleWrite('+$avArray['&$i&']['&$k&'] = $newARRAY['&$j&']['&$k&']'&@CRLF)
     $avArray[$i][$k] = $newARRAY[$j][$k]
   Next
   ConsoleWrite(@CRLF)
   $jj +=1
Next
;~ _ArrayDisplay($avArray)
return(0)
EndFunc

_ArrayAdd_2dim.au3

Edited September 8, 2011 by draco105457

[MvGulik]

- Suggest using a empty string("") as SetError() return data. As that's the general default when a AutoIt function, that generally returns a array, fails(error)(or fails to return a array as data.)

(that was before I noticed the leading ByRef of course.)

- oops, you seems to have broken your code box.

Edited September 9, 2011 by iEvKI3gv9Wrkd41u

[Shaggi]

- Suggest using a empty string("") as SetError() return data. As that's the general default when a AutoIt function, that generally returns a array, fails(error)(or fails to return a array as data.)

- oops, you seems to have broken your code box.

"", 0 or False is considered the same in boolean expressions. except "" allocates a string

[czardas]

I'm not sure how this relates to _ArrayAdd. With _ArrayAdd a new element is added (and its value is declared) to a one dimensional array. I would expect a two dimensional version to also add data. A new row or column of values ought to be added, otherwise it is simply a Redim.

[MvGulik]

@Shaggi

Both true (Within AutoIt(and other Type-less languages)), but I fail to see your point.

(I overlooked the Byref use. Previous message corrected.)

[Shaggi]

@Shaggi

Both true (Within AutoIt(and other Type-less languages)), but I fail to see your point.

(I overlooked the Byref use. Previous message corrected.)

While i dont know autoit internals (this may be optimized), allocating a string is slower and thus should be avoided.

[MvGulik]

While i dont know autoit internals (this may be optimized),

If this is true. (not knowing AutoIt's internals)

Than how can you be sure about ...

allocating a string is slower and thus should be avoided.

It makes sense that that's also the case in AutoIt, but that's about it. Unless you have some direct or indirect proof ... its still only a guess.

Think your going to be hard pressed to log a significant difference in using a 'empty string' or 'zero as number' as function return data. Besides AutoIt is not like assembly, where speed differences are bigger relative to different used commands/data-types)

Edited September 11, 2011 by iEvKI3gv9Wrkd41u

[draco105457]

how can i repair the script in the Post ?

my script in the BOX is damaged

[guinness]

I would suggest contacting a moderator >> http://www.autoitscript.com/forum/index.php?app=members&module=list&max_results=30&filter=7&sort_order=asc&sort_key=members_display_name&st=0&b=1