Here is an example of a Replace.ini file:
Code: Select all
; Texts
npp=Notepad++
pb=PureBasic
sci=Scintilla
g2=Grub2
g4d=Grub4Dos
pe=WinPE
-=—
—=-
; PureBasic
proc=Procedure Name()~ Protected~ ~ ProcedureReturn~EndProcedure~
func=Procedure Name()~ Protected~ ~ ProcedureReturn~EndProcedure~
prot=Protected
de=Debug
gui=~If OpenWindow(0, 0, 0, 220, 100, "Пример...", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)~ ButtonGadget (1, 10, 60, 200, 30, "Закрыть")~~ Repeat~ Select WaitWindowEvent()~ Case #PB_Event_Gadget~ Select EventGadget()~ Case 1~ CloseWindow(0)~ End~ EndSelect~ Case #PB_Event_CloseWindow~ CloseWindow(0)~ End~ EndSelect~ ForEver~~EndIf~
win=~If OpenWindow(0, 0, 0, 220, 100, "Пример...", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)~ ButtonGadget (1, 10, 60, 200, 30, "Закрыть")~~ Repeat~ Select WaitWindowEvent()~ Case #PB_Event_Gadget~ Select EventGadget()~ Case 1~ CloseWindow(0)~ End~ EndSelect~ Case #PB_Event_CloseWindow~ CloseWindow(0)~ End~ EndSelect~ ForEver~~EndIf~
mr=MessageRequester("Message", "Text")
mr2=MessageRequester(Message, Text)
fe=ForEach List()~ ~Next
sel=~Select Value~ Case 1~ Debug "Value = 1"~ Default~ Debug "не знаю"~EndSelect~
ww=~While 1~ Delay(1000)~WEnd~
ru=~Repeat~ Delay(1000)~Until 0~
ret=ProcedureReturn
if=~If expression~ result~EndIf~
ifn=~If Not expression~ result~EndIf~
iff=~If FileSize(file) > -1~ result~EndIf~
rs=Text$ = ReplaceString(Text$, "Find", "Replace")
fs=pos = FindString(Text$, "Find")
inc=XIncludeFile "file.pb"
; BBCode
blink=[url=][/url]
bred=[color=#FF000][/color]
; HTML
hstyle=<style>~~</style>
hlist=<ul>~<li>item</li>~</ul>
hlistn=<ol>~<li>item</li>~</ol>
htable=<table class="param" cellspacing="0" cellpadding="3">~<tr>~<td></td>~</tr>~</table>
font=<font size="+1">текст</font>
hlink=<a href="линк.htm">Имя</a>
<=<
>=>
rem=<!--~~-->
; mnemonic code
space=
dia=Ø
arrow=→
I think it's not difficult to write a tool in PureBasic, repeating the functionality.
In my case, I use Russian words to make typing easier.