[Jacob]

Here is the source for my unfinished program; Handy Characters v2. V1 was a lousy project so after gaining some better programming knowledge I had decided to start work on v2. Its now unfinished, but easier to read than v1.


You can combine the two version and get v2 to work.....just think.......(v2 gui + v1 functions)

Here is a screeny



Here is the source: If you modify it please add credits. If you release it please at least release on HC

Code:

#NoTrayIcon #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("Handy Characters 2.0", 689, 380, 226, 232) $mainpic = GUICtrlCreatePic("C:\Documents and Settings\Admin\Desktop\hcicon7x.jpg",6,0,677,150) GUISetBkColor(0x000000) $Tab = GUICtrlCreateTab(6, 160, 673, 209) $hometab = GUICtrlCreateTabItem("Home") GUICtrlSetState(-1,$GUI_SHOW) ;===================================================================================================================== $counttab = GUICtrlCreateTabItem("Counting") $countedit = GUICtrlCreateEdit("", 16, 204, 361, 153, -1, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE)) GUICtrlSetData(-1, "") GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateLabel("<--- Paste your text to the left", 400, 212, 172, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateLabel("This counts all spaces,punctuation, and extra characters", 392, 324, 279, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateLabel("not how many words. Words will be for next update.", 384, 340, 263, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $countbutton = GUICtrlCreateButton("Count", 416, 244, 161, 49) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $TabSheet1 = GUICtrlCreateTabItem("String-Hex") ;===================================================================================================================== $Group1 = GUICtrlCreateGroup("String to Hex", 16, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $s2hbutton = GUICtrlCreateButton("Convert", 272, 292, 49, 41) $s2hedit = GUICtrlCreateEdit("", 24, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) ;===================================================================================================================== $group2 = GUICtrlCreateGroup("Hex to String", 344, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $h2sbutton = GUICtrlCreateButton("Convert", 600, 292, 49, 41) $h2sedit = GUICtrlCreateEdit("", 356, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateLabel("Paste text and Press button", 278, 194, 151, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $TabSheet2 = GUICtrlCreateTabItem("Case Conversions") ;===================================================================================================================== $Group3 = GUICtrlCreateGroup("All to Uppercase", 16, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $upbutt = GUICtrlCreateButton("Convert", 272, 300, 49, 41) $upbuttedit = GUICtrlCreateEdit("", 24, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) ;===================================================================================================================== $Group4 = GUICtrlCreateGroup("All to Lowercase", 344, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $lowbutt = GUICtrlCreateButton("Convert", 600, 300, 49, 41) $lowbuttedit = GUICtrlCreateEdit("", 352, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateLabel("Paste text and Press button", 278, 194, 151, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $TabSheet3 = GUICtrlCreateTabItem("Spaces") ;===================================================================================================================== $Group5 = GUICtrlCreateGroup("Spaces Go Bye Bye", 16, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $remspacbutt = GUICtrlCreateButton("Convert", 272, 300, 49, 41) $remspaceedit = GUICtrlCreateEdit("", 24, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) ;===================================================================================================================== $Group6 = GUICtrlCreateGroup("Spaces Come Back!", 344, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;$Button6 = GUICtrlCreateButton("Convert", 600, 300, 49, 41) $Edit11 = GUICtrlCreateEdit("", 352, 266, 241, 81) GUICtrlSetData(-1, "Will be next major update") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateLabel("Paste text and Press button", 278, 194, 151, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;===================================================================================================================== $TabSheet4 = GUICtrlCreateTabItem("RC4 Cryptography") $Group7 = GUICtrlCreateGroup("RC4 Encryption", 16, 196, 313, 161) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $rc4encbutt = GUICtrlCreateButton("Encrypt",240,210,50,20) $encryptionlevel = GUICtrlCreateInput("1", 170, 210, 50, 22, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER)) $UpDownLevelEnc = GUICtrlSetLimit(GUICtrlCreateUpdown($encryptionlevel), 10, 1) $rc4encedit = GUICtrlCreateEdit("", 24, 264, 289, 81) GUICtrlSetData(-1, "Paste text to be encrypted here") GUICtrlCreateLabel("Encryption Level", 48, 216, 84, 18) GUICtrlSetColor(-1, 0x0000FF) $rc4encpass = GUICtrlCreateInput("", 170, 234, 121, 22) GUICtrlCreateLabel("Encryption Password", 48, 240, 108, 18) GUICtrlSetColor(-1, 0x0000FF) ;===================================================================================================================== $Group8 = GUICtrlCreateGroup("RC4 Decryption", 344, 196, 313, 161) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $rc4edecbutt = GUICtrlCreateButton("Decrypt",570,210,50,20) $decryptionlevel = GUICtrlCreateInput("1", 498, 210, 50, 22, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER)) $UpDownLeveldec = GUICtrlSetLimit(GUICtrlCreateUpdown($decryptionlevel), 10, 1) $rc4decedit = GUICtrlCreateEdit("", 352, 264, 289, 81) GUICtrlSetData(-1, "Paste text to be decrypted here") GUICtrlCreateLabel("Decryption Level", 376, 216, 85, 18) GUICtrlSetColor(-1, 0x0000FF) $rc4decpass = GUICtrlCreateInput("", 498, 234, 121, 22) GUICtrlCreateLabel("Decryption Password", 376, 240, 109, 18) GUICtrlSetColor(-1, 0x0000FF) ;===================================================================================================================== $TabSheet5 = GUICtrlCreateTabItem("ASCII Conversions") $Group9 = GUICtrlCreateGroup("From ASCII", 344, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $fromasciibutt = GUICtrlCreateButton("Convert", 600, 300, 49, 41) $fromasciiedit = GUICtrlCreateEdit("", 352, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) ;===================================================================================================================== $Group10 = GUICtrlCreateGroup("To ASCII", 16, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $toasciibutton = GUICtrlCreateButton("Convert", 272, 300, 49, 41) $toasciiedit = GUICtrlCreateEdit("", 24, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateLabel("Paste text and Press button", 278, 194, 151, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;===================================================================================================================== $TabSheet6 = GUICtrlCreateTabItem("Copy X") $Group11 = GUICtrlCreateGroup("Copy X Amount of Times", 16, 196, 313, 161) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $copybutt = GUICtrlCreateButton("Convert", 272, 300, 49, 41) $copyedit = GUICtrlCreateEdit("", 24, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateLabel("Paste text to be copied and Press button", 61, 226, 207, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 336, 185, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0xFF0000) GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 352, 209, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0x00FF00) GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 368, 281, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0xFF0000) GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 368, 233, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0xFF0000) GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 376, 257, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0x0000FF) GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 336, 329, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0xFF0000) GUICtrlCreateLabel("RANDOM EMPTY SPACE!!!!!! :)", 360, 305, 270, 22) GUICtrlSetFont(-1, 12, 800, 0, "Arial Rounded MT Bold") GUICtrlSetColor(-1, 0xFFFF00) ;===================================================================================================================== $TabSheet7 = GUICtrlCreateTabItem("Text Reversing") $Group12 = GUICtrlCreateGroup("Reverse Text", 16, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $revbutt = GUICtrlCreateButton("Convert", 272, 300, 49, 41) $revedit = GUICtrlCreateEdit("", 24, 266, 241, 81) GUICtrlSetData(-1, "") GUICtrlCreateGroup("", -99, -99, 1, 1) ;===================================================================================================================== $Group13 = GUICtrlCreateGroup("Forward Text", 344, 212, 313, 145) GUICtrlSetFont(-1, 8, 400, 0, "Arial") $Button13 = GUICtrlCreateButton("Convert", 600, 300, 49, 41) $Edit4 = GUICtrlCreateEdit("", 352, 266, 241, 81) GUICtrlSetData(-1, "Next major update") GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateLabel("Paste text and Press button", 278, 194, 151, 17) GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateTabItem("") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg #cs Case $upbutt Case $lowbutt Case $remspacebutt Case $rc4encbutt Case $rc4decbutt Case $fromasciibutt Case $toascibutt Case $copybutt Case $revbutt Case $s2hbutton Case $h2sbutton #ce Case $countbutton $length = StringLen(GUICtrlRead($countedit)) MsgBox(0,'Total Count is:','' &$length) Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd

[1234hotmaster]

this is actually pretty useful :d

[1234hotmaster]

this is actually pretty useful :d

[Jacob]

this is actually pretty useful :d

If you know how to finish it then it would be ^__^

[Jacob]

this is actually pretty useful :d

If you know how to finish it then it would be ^__^