Jump to content

AuPad 1.9.5

   (1 review)

1 Screenshot

About This File

This is a notepad program written entirely in AutoIt. It has all the basics of notepad that you would expect. This is NOT feature complete, yet.

I have included the source code for your pleasure, and feel free to give me pointers if you'd like to help out development (This is all done

with AutoIt version 3.3.14.0) If you use any code from this, please leave a comment or something linking to this post, thank you.

Prev dls from old forum: 783

run the install to put the AuPad.exe and AuPad.ico in the program files directory under AuPad.

Also, the install puts the RESH.au3 (all thanks to @Beege) UDFs into your include folder for you.

 

Included in the .zip: Install.exe, Install.au3, AuPad.au3, AuPad.exe,

aupad.ico, uninstall.au3, Uninstall.exe, and RESH.au3

Current Features:

 

File - New, Open, Save, Save As, Exit, Print

Edit - Undo, Cut, Copy, Paste, Del, Find, Replace, Select All, Tab, Time/Date, Word Count, Line Count, Uppercase Text, Lowercase Text

Format - Word Wrap, Font, Font Color, Background Color

Help - About

---Rich Edit (picture support), Au3 Syntax Highlighting, Drag & Drop support, open any file type, Grey certain menu items if there is txt or sel, print by line support---

Compile scripts, Forum Tags, version history, web search, au3 helpfile search, text to speech, recent files, Syntax highlighting for au3 when opened

Custom Context Menu for Rich Edit and Status Bar

 

Version History:

---==== 1.0.0 ====---

- Basic file features (open, new, save, save as, print, exit, )

- Basic edit features (undo, cut, copy, paste, find, replace, delete, select all, time/date)

- Basic format features (word wrap, font)

- Basic help features (help, about)

 

---==== 1.5.0 ====---

- Took out extra save dialog in the Save() function.

- Drag and drop functionality added (thanks to AZJIO)

- Took out check for txt file when opening

- Fixed open function to delete text already in control and ask to save

- Added $ws_ex_composite to stop flicker on xp machines.

- Added default font

- Set the font in the setWW() function

- added word count functionality with a accelerator key

 

---==== 1.5.1 ====---

- Fixed word count function

- Added line count thanks to DreamVB

- Added uppercase and lowercase thanks to DreamVB

 

---==== 1.6.0 ====---

- Added better text limit

- Fixed the edit control to show the horizontal scrollbar

- Made resizing of the edit control AUTO; making the menu AUTO, instead of just 5 pixel height

- Changed any file over 100 MB to read in as binary

- Changed any file dragged and dropped to read in as binary if over 100 MB in size

- Added accelerator keys for uppercase, lowercase and save as

- Took out unnecarry MsgBox in save function

- Added print by line support

- Added ini file for settings saved

- Added setting in ini for word wrap

 

---==== 1.7.0 ====---

- Added cancel button when quitting

- Took out extra include

- Set default font into font variables

- Set default font when word wrap has been selected

- Set default font when taking off word wrap

- Added RTF files and All files to save dialog

- Added redo functionality

- added character attribute functionality for rich edit

- added rtf files to the open file dialog

- Added color support

- Added picture support

- Added background color support

- Added stream rtf from file support

- Added stream rtf to file support

- Added recent files to menu item

- Added AutoIt syntax highlighting; thanks goes to Beege for RESH UDF

- Took out word wrap function and menu item as RichEdit is word wrapped already

- Took out ini for the word wrap, but want to be very portable anyway

- Added check for character attributes change

- Added au3 file type for open and save dialog boxes

 

---==== 1.8.0 ====---

- Fixed upper, lower, tab

- Fixed resizing of window and rich edit control

- Fixed recent files

- Fixed time/date at cursor position

- Fixed RESH.au3 comment block functionality (added check in Do..While loop & added -1 to Ubound call)

 

---==== 1.8.2 ====---

- Took out HotkeySets and made GUI accelerator keys (F2 (about), F5 (time/date))

- Fixed Au3 syntax highlighting setting caret position

- Added cancel to New file dialog

- Switched to ASM RESH UDF by Beege (thanks!)

- Added check when Syntax Highlighting to not highlight if there has not been any more user interaction. Cutting down a ton of processing.

- Added check for quotes, due to problem with RESH - It will crash the entire program when trying to syntax highlight an unterminated quote.

- Commented out Addrecent as problems with messageloop and GUI dummy

- F2 was fixed to bring up help instead of about AuPad.

 

---==== 1.8.4 ====---

- added version developed in the about child window

- added tags quote, link, autoit (code). (all thanks for the Idea from The Saint's webpad -

- added GUI Accelerator keys for tags.

- added compiler GUI.

- added ability to compile au3 scripts.

- ability to open aut2exe for more options.

 

---==== 1.8.6 ====---

- fixed tag labels to show gui accelerator keys.

- fixed add recent function.

- ability to open recent files in recent files menu.

- Added text to speech ability (idea from betapad - http://www.autoitscript.com/forum/topic/38353-betapad/

- added menu item for text to speech

- accel key added for text to speech and web search

- added child gui for web search

- fixed tag accelerator keys to ctrl + shft combo.

- added ability to search web using 4 search providers in seperate gui.

- added accelerator keys for web search GUI.

- fixed version number in directives.

- added version history gui.

 

---==== 1.8.8 ====---

- took off $ES_READONLY style on version history edit control.

- fixed view about aupad event. When opening it would call folderpath() in a loop, making it unable to close.

 

---==== 1.9.0 ====---

- added ability to highlight, then websearch the selected text.

- Took out printing UDF by martin

- Took out x86 force directive. Can now be used as x64.

- ability to open AutoIt helpfile.

- ability to highlight and search the AutoIt helpfile with keyword.

- changed _guictrlrichedit_setsel() hide sel to false, instead of true, as it would hide the selection after changing the highlighting.

- printing will print to default printer only. Trying to make more portable, which will exclude print dll and library now. Changing of printer is in the works.

- took out debugging code from last version to fix folderpath() loop.

 

---==== 1.9.1 ====---

- added default style to web search button. - idea by mLipok.

- deleted the child window for web search on successfully opening IE.

- added abillity to open au3 file and have syntax highlighting start automatically. - idea by mLipok.

- added tooltip to show when syntax highlighting for AutoIt has started or ended.

 

---==== 1.9.2 ====---
- added default style to version history "okay" button (un-highlights edit text).
- added dpi awareness to about AuPad GUI. Thanks to mLipok -http://www.autoitscript.com/forum/topic/166479-writing-dpi-awareness-app-workaround/
- added context menu with much thanks to Mat -
- state changing for context menu, just like regular menu items.
- events with context menu use GUI accelerators.
 

---==== 1.9.3 ====---

- Fixed version number in directives
- Used Jefrey's code to cut back aChild function and event loop -
https://www.autoitscript.com/forum/topic/164383-aupad-notepad-in-autoit-updated-march-31th-2015/?do=findComment&comment=1255986
- Added status bar feature to add box at bottom of AuPad window.
- Added checked state to menu item for status bar to show if it is working.
- Added line and column number to status bar.
- Fixed problem with RESH adding lines unintentially during syntax highlighting.
- Added V1.9.3 version history.

---==== 1.9.4 ====---

- Fixed text to speech w/ new AutoIt 3.3.14.0 update.
- Fixed version history text.
- Added V1.9.4 version history.


What's New in Version 1.9.5

Released

---==== 1.9.5 ====---

- Fixed crash when selecting AutoIt Help

- Set version number as 1.9.5

- Updated version history

  • Like 2



User Feedback

You may only provide a review once you have downloaded the file.


TheDcoder

   1 of 1 member found this review helpful 1 / 1 member

Good job, It has all the basic functionality + some extra options

I am giving it 4 stars, requires a little cleanup in the code side...

Share this review


Link to review
  • Similar Content

    • therks
      By therks
      I'm trying to create a simple clock widget that automatically scales the text to the size of the window. I came up with the following method, but it doesn't work as well as I'd like. It especially has trouble scaling to the width of the window for some reason (in the example, try resizing the window to be narrow and tall).
      Does anyone have a better method?
      #include <Misc.au3> #include <WinAPIConv.au3> #include <GUIConstants.au3> #include <GDIPlus.au3> Opt('MustDeclareVars', 1) Global $_FONT_FAMILY = 'Arial', $_LB_TEXT Main() Func Main() _GDIPlus_Startup() Local $hGUI GUIRegisterMsg($WM_SIZE, WM_SIZE) $hGUI = GUICreate('', 300, 100, Default, Default, $WS_OVERLAPPEDWINDOW, BitOR($WS_EX_TOOLWINDOW, $WS_EX_TOPMOST)) $_LB_TEXT = GUICtrlCreateLabel('This is a string', 0, 0, 300, 100, BitOR($SS_CENTER, $SS_CENTERIMAGE)) GUICtrlSetFont($_LB_TEXT, _MeasureString($hGUI, GUICtrlRead($_LB_TEXT), $_FONT_FAMILY), 0, 0, $_FONT_FAMILY, 5) GUISetState() Local $iGM While 1 $iGM = GUIGetMsg() Switch $iGM Case $GUI_EVENT_CLOSE ExitLoop EndSwitch WEnd _GDIPlus_Shutdown() EndFunc Func WM_SIZE($hWnd, $iMsg, $wParam, $lParam) GUICtrlSetFont($_LB_TEXT, _MeasureString($hWnd, GUICtrlRead($_LB_TEXT), $_FONT_FAMILY), 0, 0, $_FONT_FAMILY, 5) EndFunc Func _MeasureString($hWnd, $sString, $sFont = 'Arial') Local $iError, $aSize, $hGraphic, $hFormat, $hFamily, $tLayout, $iFontSize, $hFont, $aInfo If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd) EndIf $aSize = WinGetClientSize($hWnd) $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hWnd) $hFormat = _GDIPlus_StringFormatCreate() $hFamily = _GDIPlus_FontFamilyCreate($sFont) $tLayout = _GDIPlus_RectFCreate(0, 0, $aSize[0], $aSize[1]) $iFontSize = 0 Do If Not $hFamily Then $iError = 1 $iFontSize = 10 ExitLoop EndIf $iFontSize += 1 $hFont = _GDIPlus_FontCreate($hFamily, $iFontSize, 0) $aInfo = _GDIPlus_GraphicsMeasureString($hGraphic, $sString, $hFont, $tLayout, $hFormat) _GDIPlus_FontDispose($hFont) If $aInfo[1] = 0 Then ExitLoop Until DllStructGetData($aInfo[0], 3) >= $aSize[0] Or DllStructGetData($aInfo[0], 4) >= $aSize[1] $iFontSize -= 1 _GDIPlus_FontFamilyDispose($hFamily) _GDIPlus_StringFormatDispose($hFormat) _GDIPlus_GraphicsDispose($hGraphic) Return SetError($iError, 0, $iFontSize) EndFunc
    • dadalt95
      By dadalt95
      Hi!
      I want to get the signal in this website:
      https://binary-signal.com/pt/chart/eurusd
      I have tried using _IEBodyReadText  and some _StringBetween. What happens is that the text are being update every tick and _IEBodyReadText doesn't.
      To perform the update I used  _IEAction($oIE, "refresh") but it's not good because the website block me after some time due too many requests..
      Is there any other way to get this text every tick?
      PS: The text I want to get is WAIT, CALL or PUT.
       
      Here is the code:
      global $oIE = _IECreate ('https://binary-signal.com/pt/chart/eurusd', 0, 1 , 1 , 0) Local $sText = _IEBodyReadText($oIE) $result = _StringBetween ( $sText , 'PUTEUR/USD on Binary-signal.com', 'sinal está PRONTA') ;MsgBox ( 0, "asf", $result[0]) $espera=StringInStr($result[0], "WAIT") $compra=StringInStr($result[0], "CALL") $venda=StringInStr($result[0], "PUT") ;MsgBox($MB_SYSTEMMODAL, "", $espera) $n=0 $c=0 Captar() Func Captar() ;_IENavigate($oIE, "https://binary-signal.com/pt/chart/eurusd") ;MsgBox($MB_SYSTEMMODAL, "", $n) Local $sText = _IEBodyReadText($oIE) $result = _StringBetween ( $sText , 'PUTEUR/USD on Binary-signal.com', 'sinal está PRONTA') If (Not $compra=0) And $n=0 Then MsgBox($MB_SYSTEMMODAL, "", "COMPRE") $n=1 $c=$c+1 ;_IEAction($oIE, "refresh") Sleep(60000) Captar() ElseIf (Not $venda=0) And $n=0 Then MsgBox($MB_SYSTEMMODAL, "", "VENDA") $c=$c+1 $n=1 ;_IEAction($oIE, "refresh") ;MsgBox($MB_SYSTEMMODAL, "", $n) Sleep(60000) Captar() ElseIf (Not $venda=0) And $n=1 Then ;MsgBox($MB_SYSTEMMODAL, "", "Esperando próxima rodada") $n=1 ;MsgBox($MB_SYSTEMMODAL, "", $n) ;_IEAction($oIE, "refresh") Sleep(60000) Captar() ElseIf (Not $venda=0) And $n=1 Then ;MsgBox($MB_SYSTEMMODAL, "", "Esperando próxima rodada") $n=1 ;MsgBox($MB_SYSTEMMODAL, "", $n) ;_IEAction($oIE, "refresh") Sleep(60000) Captar() Else ;MsgBox("", "", "ESPERE") $n=0 Sleep(1000) ;_IEAction($oIE, "refresh") Local $sText = _IEBodyReadText($oIE) $result = _StringBetween ( $sText , 'PUTEUR/USD on Binary-signal.com', 'sinal está PRONTA') Captar() EndIf EndFunc  
    • vin1
      By vin1
      i need a script that can replace words in text with other words from a words list
      it has to have 2 edit boxes input/output and a button "run"
      from word_list.txt it choses which word to replace with. words are separated with commas for multiple choice
       

       
       

       
       
      ; AutoIt GUI Example ; Created: 17/01/2005 - CyberSlug ; Modifed: 05/12/2011 - guinness ; Modifed: 09/06/2014 - mLipok #Region INCLUDE #include <AVIConstants.au3> #include <GuiConstantsEx.au3> #include <TreeViewConstants.au3> #EndRegion INCLUDE #Region GUI GUICreate("Sample GUI", 400, 420) GUISetIcon(@SystemDir & "\mspaint.exe", 0) #EndRegion GUI #Region EDIT GUICtrlCreateEdit(@CRLF & " Sample Edit Control", 10, 10, 380, 175) GUICtrlSetTip(-1, '#Region EDIT') #EndRegion EDIT #Region EDIT2 GUICtrlCreateEdit(@CRLF & " Sample Edit Control", 10, 185, 380, 175) GUICtrlSetTip(-1, '#Region EDIT') #EndRegion EDIT2 #Region BUTTON GUICtrlCreateButton("Sample Button", 10, 360, 100, 30) GUICtrlSetTip(-1, '#Region BUTTON') #EndRegion BUTTON #Region GUI MESSAGE LOOP GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch WEnd GUIDelete() #EndRegion GUI MESSAGE LOOP  
    • SkysLastChance
      By SkysLastChance
      Run("notepad.exe") GLOBAL $One = ('Line1' & _ 'Line2' & _ 'Line3' & _ 'Line4' & _ 'Line5') ClipPut($One) $Notepad = WinWait("[CLASS:Notepad]", "", 10) ControlSend("Untitled - Notepad", "", "", ("^v")) Instead of having this paste as Line1Line2Line3Line4Line5
      How can I make it paste it into notepad as (without double spacing.)
      Line1
      Line2
      Line3
      Line4
      Line5
    • Ambient
      By Ambient
      I have tried several way sto get this to work to no avail. Any help would be appreciated. #include <ListViewConstants.au3> #include <GuiListView.au3> #include "GuiListViewEx.au3" $idItem = GUICtrlCreateListViewItem($r & " | " & $c & $adoRs.Fields("TransactionAmount").value & " | " & $Timestamp & " | " & _StringProper($adoRs.Fields("Tillid").value) & @CRLF & @CRLF & "Card Number : " & $cardnum & " " , $idListView) ConsoleWrite( "IDITEM" & $idItem) If STRINGLEFT($adoRs.Fields("TransactionAmount").value,1)= "-" Then Consolewrite(" String is Negative" & @CRLF) ;Drops in Here as expected ;GUICtrlSetColor(-1, $COLOR_RED) ; Colour line if item is negative this didn' work $TxC= _GUICtrlListView_SetTextColor($hListView, $CLR_RED) ; I also tried $TxC= _GUICtrlListView_SetTextColor(-1, 0xFF0000) CONSOLEWRITE("TEXTCOLOUR RETURNED " & $TxC & @crlf) ; This is returning True ELSE Consolewrite(" String is NOT Negative" & @CRLF) EndIf  
×