User Control Panel
|
|
|
 |
Advertisements
|
 |
|
|
|
HELP US, HELP YOU!
|
| Author |
Message |
zero_kool Newbie

Joined: 17 Feb 2005 Posts: 6
 
|
Posted: Fri Feb 18, 2005 5:44 pm Post subject: |
|
|
ok this is my 1st vb bot code and it probably sucks but it works for me used plasma to do this
| Code: | | Case "!popup"<br /> Call SendNS("CHG %id% NLN")<br /> frmMain.txtScreenName.Text = " "<br /> Call SendNS("REA %id% " & frmMain.Text1.Text & " " & Replace$(Encode(Trim$(nmdata)), "%D%A", "%0D"))<br /> DoEvents<br /> Call SendNS("CHG %id% HDN")<br /> frmMain.txtScreenName = nmdtata<br /> Call SendNS("CHG %id% NLN")<br /> DoEvents<br /> frmMain.txtScreenName.Text = " "<br /> frmMain.txtScreenName.Text = "[(*)Zero-Bot(*)]-[Type !menu To Begin|User(s) Registered: " & users & "]"<br /> Call SendNS("REA %id% " & frmMain.Text1.Text & " " & Replace$(Encode(Trim$(frmMain.txtScreenName.Text)), "%D%A", "%0D")) |
|
|
| Back to top |
|
 |
M4RTIN Member

Joined: 31 Dec 2004 Posts: 134
  
|
Posted: Fri Feb 18, 2005 5:53 pm Post subject: |
|
|
Havnt tested, But well done, It look's fine to me.
Hope to see more good command's from you  |
|
| Back to top |
|
 |
|
|