Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
QM Auto Message Text
#1

This is a macro I made because I got sick of color coding my comments on the forum. It could also be used for adding text to your post, something like a siggie.

It works off of a window trigger and when go to make post on QM forum your auto text will be added to the Message Body of the post. It should work on any Internet Browser, but I have only tested it on IE7.


Function ( QM_AutoText ) Trigger ( !n"Quick Macros :: Post" )
Code:
Copy      Help
int cnt hwnd=val(_command);str istext AutoText;Htm x0
;1a
if cnt=400
,end
x0=htm("TEXTAREA" "" "" hwnd 0 0 0x20)
err
,cnt+1
,0.1
,goto 1a
istext=x0.Text
if len(istext)<>0
,end
;!!!!!!!!!!! Edit the the code between (AutoText=) and (x0.SetText(AutoText)) !!!!!!!!!!
AutoText=
;[color=darkblue][b]
;
;;[/b]
[/color]
x0.SetText(AutoText)
;If you need any help PM me on QM forum (JOHN_)
[Image: autotexttf4.jpg]


Attached Files
.qml   QM_AutoText.qml (Size: 450 bytes / Downloads: 577)
#2

Pretty cool John.
Is there any other colors?
Taking on Quick Macros one day at a time
#3
Code:
Copy      Help
[color=darkblue][b]

Edit this part of the code you could change 'darkblue to anything you want. see Font colour menu (that would be when your posting a message) for more colors, Tip: you can also use color=#FF0000 coding.

Example: (of red)
Function ( QM_AutoText ) Trigger ( !n"Quick Macros :: Post" )
Code:
Copy      Help
int cnt hwnd=val(_command);str istext AutoText;Htm x0
;1a
if cnt=400
,end
x0=htm("TEXTAREA" "" "" hwnd 0 0 0x20)
err
,cnt+1
,0.1
,goto 1a
istext=x0.Text
if len(istext)<>0
,end
;!!!!!!!!!!! Edit the the code between (AutoText=) and (x0.SetText(AutoText)) !!!!!!!!!!
AutoText=
;[color=red][b]
;
;;[/b]
[/color]
x0.SetText(AutoText)
;If you need any help PM me on QM forum (JOHN_)
#4

Awesome.
Thanks.
Taking on Quick Macros one day at a time
#5

Here is a site with some color codes that should work.

Code:
Copy      Help
http://www.brobstsystems.com/colors1.htm

Example:
Code:
Copy      Help
[color=#6C3336]
#6

This is very very usefull!


Forum Jump:


Users browsing this thread: 1 Guest(s)