Jump to content

Mateocedillo

Active Members
  • Posts

    72
  • Joined

  • Last visited

Recent Profile Visitors

463 profile views

Mateocedillo's Achievements

  1. Hi, Regarding to the matches and regex. The loop that is used is to combine numbers and text at the same time, that is why I have included it. For example. $sText = "July 23, 2024." _NumTextNum_wrapper($sText) So, this can return July twenty three, twenti twenti three becaus the original UDF is not cappable to process text and numbers at same time. The decimal thing is a good idea that I have to develop as well. Thanks for your suggestions!
  2. Hi, Thanks for the bug fixes! You did a good job!👏🏻 I wrote an wrapper for your library that allows you to combine text and numbers at the same time:NumTextNum_wrapper.au3 And, if you want, I can use your library with a G2p (Grapheme to Phoneme) conversor that I'm doing these days.
  3. Hi, This library is awesome, good job! Using the latest update, in the case of Spanish, it still does not behave well in some scenarios: 892867881741517 eight hundred ninety two trillion eight hundred sixty seven billion eight hundred eighty one million seven hundred forty one thousand five hundred seventeen Actual result: ochocientos noventa y dos billones ochocientos sesenta y siete mil ochocientos ochenta y un millones setecientos cuarenta y mil quinientos diecisiete Espected result: ochocientos noventa y dos billones ochocientos sesenta y siete mil ochocientos ochenta y un millones setecientos cuarenta y un mil quinientos diecisiete. The error is in "cuarenta y mil" > cuarenta y un mil.
  4. Hi, I have been trying to do something for Spanish, but there are things that I surely have to improve. Here's my code: #include <MsgBoxConstants.au3> #include <StringConstants.au3> #include-once Global $nNumber, $bIncludeAnd, $sNumber MsgBox(0, "Result", NumberToWords(23456, False)) Func NumberToWords($nNumber, $bIncludeAnd = True) Local $aOnes = StringSplit("cero,uno,dos,tres,cuatro,cinco,seis,siete,ocho,nueve", ",") local $aTildes = StringSplit("dós,trés,cuatro,cinco,séis,siete,ocho,nueve", ",") Local $aTeens = StringSplit("diez,once,doce,trece,catorce,quince,dieciseis,diecisiete,dieciocho,diecinueve", ",") Local $aTens = StringSplit("dieci,veinte,treinta,cuarenta,cincuenta,sesenta,setenta,ochenta,noventa", ",") Local $aHundreds = StringSplit("cien,doscientos,trescientos,cuatrocientos,quinientos,seiscientos,setecientos,ochocientos,novecientos", ",") local $bTilde Local $sNumber = "" If $nNumber = 0 Then $sNumber = "cero" ElseIf $nNumber < 0 Then $sNumber = "menos " & NumberToWords(Abs($nNumber), $bIncludeAnd) Else If $nNumber >= 1000000 Then $sNumber = NumberToWords(int($nNumber / 1000000), $bIncludeAnd) & " millones " If $bIncludeAnd And mod($nNumber, 1000000) Then $sNumber &= "y " $nNumber = mod($nNumber, 1000000) EndIf switch $nNumber case 1 to 1999 ; para evitar que convierta "uno mil xxx" if StringLen($nNumber) = 4 and StringLeft($nNumber, 1) = 1 then $sNumber &= "mil " case 2000 to 999999 $sNumber &= NumberToWords(Int($nNumber / 1000), $bIncludeAnd) & " mil " EndSwitch If $bIncludeAnd And mod($nNumber, 1000) Then $sNumber &= "y " $nNumber = mod($nNumber, 1000) switch $nNumber $bTilde = False case 100 ; número propio. $sNumber &= "cien " case 101 to 199 ; aquí se tendrá que convertir ciento. $sNumber &= "ciento " case 200 to 999 ; aquí doscientos, trescientos, cuatrocientos, etc. $sNumber &= $aHundreds[Int($nNumber / 100)] & " " EndSwitch $nNumber = mod($nNumber, 100) If $nNumber >= 20 Then if StringRight($nNumber, 1) >= 1 then If not StringLeft($nNumber, 1) = 2 then $bTilde = False $sNumber &= $aTens[Int($nNumber / 10)] & " y " Else $sNumber &= "veinti" $bTilde = True EndIf Else $sNumber &= $aTens[Int($nNumber / 10)] & " " EndIf $nNumber = mod($nNumber, 10) ElseIf $nNumber >= 10 Then $sNumber &= $aTeens[$nNumber - 9] & " " ;$nNumber = StringRight($nNumber, 1) $nNumber = 0 EndIf If $nNumber > 2 Then if $bTilde then $bTilde = False $sNumber &= $aTildes[$nNumber-1] & " " Else $sNumber &= $aOnes[$nNumber+1] & " " EndIf EndIf EndIf Return StringStripWS($sNumber, $STR_STRIPLEADING + $STR_STRIPTRAILING + $STR_STRIPSPACES) EndFunc
  5. Hi @kcvinu, Thank you! I hope key accelerators or navigating will be implemented, I read through the wrapper glance.au3 and only found possible things that can be done with EventHandler (key_handle and key_press) of which I doubt that key accelerators can be set for all GUI controls that possible to create, I think it is related to the library in Nym. Please let me know news about this, and if you need to do tests regarding this function (eg. With a screen reader), I will be happy to do it.
  6. Hi, First, thanks @kcvinker for this great work! I have a suggestion: can be add navigation through the controls using the keyboard? Something like what $ws_tapstop does. I ran the example code, but keyboard navigation (for example, using tab key) isn't possible. This can be useful to improve accessibility for blind people.
  7. Hi @SOLVE-SMART, Thanks for the collection, I'm on the list and it's also appreciated. Currently, I'm working on a project in au3, which I will publish soon once I finish fixing many bugs. Also, I apologize. I admit my above code isn't the best in the world, but I'm open to pull requests for improvements.
  8. Hello, Does this work with AVG Antivirus? Because this is overprotecting execution whit a compiled script and autoit3.exe. An exclusion could be added, but it's really annoying.
  9. Cheers, I have a plan to develop something but there is a problem. I want to develop a load function, this function will generate two arrays with totally different values and the problem is how AutoIT could return these two different arrays in one function. Here's an example of what I'm trying to say: local $aArray1, $aArray2 $aArray1, $aArray2 = _Test_func() Func _Test_func() local $aArrayA = [1, 2, 3] local $aArrayB = [4, 5, 6] return $aArrayA, $aArrayB EndFunc
  10. Hello, I have written a small UDF containing some Python string functions for AutoIt, because I know it can be useful to many. ; misc string functions ; by Mateo C ; #FUNCTION# ==================================================================================================================== ; Name ..........: _String_startsWhit ; Description ...: Checks if the string starts with a specific criteria, similar to the function in Python. ; Syntax ........: _String_startsWhit($sString, $sStart) ; Parameters ....: $sString - The string to be examined. ; $sStart - A value (string) to check. ; Return values .: True if the string starts with that value; otherwise, return false. If $sString is not a string, return @error. ; Author ........: Mateo Cedillo ; Modified ......: ; Remarks .......: ; Related .......: ; Link ..........: ; Example .......: Yes ; =============================================================================================================================== Func _String_startsWhit($sString, $sStart) If Not IsString($sString) Then Return SetError(1, 0, "") Return $sStart = StringLeft($sString, 1) EndFunc ;==>_String_startsWhit ; #FUNCTION# ==================================================================================================================== ; Name ..........: _String_EndsWhit ; Description ...: Checks if the string ends with a specific criteria, similar to the function in Python. ; Syntax ........: _String_EndsWhit($sString, $sEnd) ; Parameters ....: $sString - The string to be examined. ; $sEnd - A value (string) to check. ; Return values .: True if the string ends with that value; otherwise, return false. If $sString is not a string, return @error ; Author ........: Mateo Cedillo ; Modified ......: ; Remarks .......: ; Related .......: ; Link ..........: ; Example .......: Yes ; =============================================================================================================================== Func _String_EndsWhit($sString, $sEnd) If Not IsString($sString) Then Return SetError(1, 0, "") Return $sStart = StringRight($sString, 1) EndFunc ;==>_String_EndsWhit miscstring.au3
  11. This is a toolkit, aimed at the topic of cloning voices. FakeYou is a page where artificial intelligence technology is used to clone voices. This is about algorithms that seek to imitate the original speaker, this is based on audio or recordings of the speaker, from sound files such as wav. You can publish your own creations, which means that you can train your own voices or the one you want. There are thousands of voices. The page has API support where you can use this service in an app, like Discord for example. Therefore, this toolkit has the support to use the FakeYou API with AutoIt. In addition to other features such as data set management that are used to train a voice that we want, for example: Fix audios and transcriptions, convert, among many other things! Note: this toolkit does not have enough examples to demonstrate all the features, but you can see the code for each of the libraries/includes. credits: Special thanks to: @danifirex, @pixelsearch and @Subz Here is the code. I look forward to your suggestions or comments!: https://github.com/rmcpantoja/FakeYouTools
  12. Hello, tf has nothing to do with audio, transcripts and such. In fact I'm looking for the same thing to train tt2 models, there may be some ASR or voice recognition API that allows me to do this.
  13. I understand. Well, anyway feel free to send pull requests and so on, although I know I have to do my part and I take it into account. It takes me about 20-30 seconds to finish. And yes, I think the last items (created at and updated at) may not be necessary for now, so I'll think about doing something to speed up the process, as well as alternatives. Thank you anyway...
  14. Well, in case more is needed, a sample of this is a UDF that I have been making in the company of @Danyfirex. Especially, in the FakeYou.au3 UDF, functions _FakeYouGetVoicesList and _FakeYouGetCategoriesList (in the latter it is acceptable but in the previous function it takes time to process the data) This is the GitHub: UDF repository BTW, I'm sorry for my english...
×
×
  • Create New...