mycheck:
VarSetCapacity(greek,9024000000)
greek=
	array:=Object()
	IniRead,greek,greek.ini,α
	FileAppend, %greek%, test.txt
	msgbox, test.txt
	counta := 0
	countb := 0
	countc := 0
	countd := 0
	counte := 0
	countz:=0
	counth:=0
	countth:=0
	counti:=0
	countk:=0
	countl:=0
	countm:=0
	countn:=0
	countks:=0
	counto:=0
	countp := 0
	countr:=0
	counts:=0
	countt:=0
	countu:=0
	countf:=0
	countx:=0
	countw:=0

	Loop,read,test.txt
	{
		array[a_index]:=A_LoopReadLine
		;msgbox,  % array[a_index]
		FileAppend, % a_index " -> " array[a_index]"`n",debuggingA.txt
		counta := counta + a_index
	}
	msgbox, Array A done
	;msgbox, Section α finished
	FileDelete,test.txt