Well, some of you just like to be annoying. Heres a script for you. O, and to get a hacked msn with unlimited nudging, google "A-Patch"
*Ok its a lot longer then it needs to be, but who cares 
SCAR Code:
//***********************************************************************\\
//***********************************MSN*********************************\\
//*******************************Super Nudger****************************\\
//***********************************and*********************************\\
//*****************************Blocker & Unblocker***********************\\
//***********************************************************************\\
////////////////////{[]-----Made by: Infantry001-----[]}\\\\\\\\\\\\\\\\\\\
{*Just drag the crosshair and run!*}
program nudgerandblocker;
var
x, y, i : integer;
BBlock, BNudge : integer;
Times, WaitTime : integer;
Nudge : boolean;
frmDesign : TForm;
NBLabel : TLabel;
Label1 : TLabel;
Label2 : TLabel;
StartButton : TButton;
NudgeButton : TRadioButton;
BlockButton : TRadioButton;
TimesEdit : TEdit;
WaitEdit : TEdit;
Procedure LoadBMaps;
begin
BNudge := BitmapFromString(16, 14, 'z78DA6D9469B2EC200' +
'885B78471223F6570FF4B7AC790B1EFEBAEA22C821F7240679BFB' +
'14671753CF6ADD9C94324D322EB04E85AFB5516627E18DCDB4B5E' +
'E9BA9DA3C08557B1D4DD9E00B4F58DF5D54179DEBA2559AE0557E' +
'59789CC32217329CB9C8D56A7310B21623DBBC4496B18BD8B9F68' +
'A209FB4684A03E70CFBCDF2F03F3191A56A2D471614413A509A76' +
'1B2EACAB165A7B23BE7222E286553A3C4F2D470C9F79EFFFE9C11' +
'728A638B2BBFA9C5B132EC3C4A196ACB8B668A8BAD0FADD7C2A5F' +
'FEE579F8A7E7A862F585BC7B920C365BE6B467D137FF7F7B1FFDC' +
'313D9E3246F3EAAA08D7D37690A8D9AA75A9AED1627BC357FF3F9' +
'DBD95023F80DAC7CE973F1A192B3618850C59884763BCF771F0DD' +
'47CDA3F33734E8EB1703EED41E60FBF586F62EED5D15CF0FDE1FC' +
'B55FF2658D0F26DFE4B73E9B39EF982237ABA9C9AE37077629B21' +
'D91F94B3E3CF1F51BF3F0D15FF89D4C078D2C09220D5CDA3D6E65' +
'D062AF3263128C76EC52EAB0E10F4FD833CBEBE4506CC54C6F5E5' +
'A651A2249A6D5A5E4465796F50EBCCF79737ED478AAD8E824BB65' +
'A183D95AED3C640C4C69C3AB93B4E30ECE26AB47F957E15F9DDF6' +
'AE3094037CD7699D0BC41F3DED32818D2A433D69E314BD986212F' +
'5E2DC4C74D8979F8B18B797CB5A6A915543F9483103434B463F60' +
'F4FD87FF1FB3318');
BBlock := BitmapFromString(10, 12, 'z78DA8D924B6E00210' +
'C43AF1406F25B920FF73F52CD4CD75537964079B113304A53520A' +
'6363715D9AA324BDEBCC237FAB5A929868109B73B8CF8EF31CFE8' +
'F5E47212E6F866376D2FF59B66D0BF43626CD60E5A4ACD4CE8A92' +
'66777F3AA5840F8B30D272B39CA1A12BA8C1A535B27F1A1518A21' +
'7EAA585759D9485E35EAB96C4645E55EF4DDAA14B7D5A48D1989F' +
'71C6EEA868D9A2ADC67A7246E588B89AF0DB815A73DB0405EBE09' +
'A1844825C5476D96C7D246A17D7A86AEFFED4C11AE826A3D711FE' +
'B71E9738C5D0297930E1D23AB239CA338B2ADABA1CBD1585458A2' +
'E0C9F0D7622C106ED6387656D3D365A96CC532D2EB32CA3E8A5E0' +
'99F6A6BDAC5DD6D043D12150815D235F3DAAEA6F074187218FBDF' +
'FEAD3DBE54EBAE8FADED9C1DE2E0B7BE9EC7A4A90B2545B664FF9' +
'9D97EEBC1B7333DCAF6F04DEA27782922CECE9E0FBDC57FFF4069' +
'41F1B02A63A');
end;
Procedure DeclareVar;
begin
Times := StrToInt(TimesEdit.Text);
WaitTime := StrToInt(WaitEdit.Text);
if(NudgeButton.Checked = true)then
Nudge := true;
if(BlockButton.Checked = true)then
Nudge := false;
end;
Procedure ButtonClick(sender: TObject);
begin
frmDesign.Caption:= frmDesign.Caption + '.';
frmDesign.ModalResult:= mrOk;
end;
Procedure InitForm;
begin
frmDesign := CreateForm;
frmDesign.Left := 250;
frmDesign.Top := 114;
frmDesign.Width := 304;
frmDesign.Height := 134;
frmDesign.Caption := 'MSN Super Nudger and Blocker';
frmDesign.Color := clBtnFace;
frmDesign.Font.Color := clWindowText;
frmDesign.Font.Height := -11;
frmDesign.Font.Name := 'MS Sans Serif';
frmDesign.Font.Style := [];
frmDesign.Visible := False;
frmDesign.PixelsPerInch := 96;
NBLabel := TLabel.Create(frmDesign);
NBLabel.Parent := frmDesign;
NBLabel.Left := 20;
NBLabel.Top := 10;
NBLabel.Width := 80;
NBLabel.Height := 13;
NBLabel.Caption := 'Nudge or Block?';
Label1 := TLabel.Create(frmDesign);
Label1.Parent := frmDesign;
Label1.Left := 115;
Label1.Top := 10;
Label1.Width := 83;
Label1.Height := 13;
Label1.Caption := 'How many times?';
Label2 := TLabel.Create(frmDesign);
Label2.Parent := frmDesign;
Label2.Left := 100;
Label2.Top := 41;
Label2.Width := 100;
Label2.Height := 13;
Label2.Caption := 'How often (milisecs)?';
StartButton := TButton.Create(frmDesign);
StartButton.Parent := frmDesign;
StartButton.OnClick := @ButtonClick;
StartButton.Left := 24;
StartButton.Top := 64;
StartButton.Width := 251;
StartButton.Height := 25;
StartButton.Caption := 'Start annoying the heck out of ur friends!';
StartButton.TabOrder := 8;
NudgeButton := TRadioButton.Create(frmDesign);
NudgeButton.Parent := frmDesign;
NudgeButton.Left := 15;
NudgeButton.Top := 25;
NudgeButton.Width := 113;
NudgeButton.Height := 17;
NudgeButton.Caption := 'Nudge';
NudgeButton.TabOrder := 9;
BlockButton := TRadioButton.Create(frmDesign);
BlockButton.Parent := frmDesign;
BlockButton.Left := 15;
BlockButton.Top := 43;
BlockButton.Width := 113;
BlockButton.Height := 17;
BlockButton.Caption := 'Block';
BlockButton.TabOrder := 10;
TimesEdit := TEdit.Create(frmDesign);
TimesEdit.Parent := frmDesign;
TimesEdit.Left := 215;
TimesEdit.Top := 6;
TimesEdit.Width := 65;
TimesEdit.Height := 21;
TimesEdit.TabOrder := 11;
WaitEdit := TEdit.Create(frmDesign);
WaitEdit.Parent := frmDesign;
WaitEdit.Left := 215;
WaitEdit.Top := 35;
WaitEdit.Width := 65;
WaitEdit.Height := 21;
WaitEdit.TabOrder := 12;
end;
procedure SafeInitForm;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('InitForm', v);
end;
procedure ShowFormModal;
begin
frmDesign.ShowModal;
end;
procedure SafeShowFormModal;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('ShowFormModal', v);
end;
Procedure ProgRep;
begin
if(Nudge=true)then
begin
Writeln('[]------------------------------------------------[]');
Writeln('You nudged your friend ' +IntToStr(Times) +' times in ' +IntToStr(Times * WaitTime / 1000) +' seconds.');
Writeln('[]------------------------------------------------[]');
end;
if(Nudge=false)then
begin
Writeln('[]------------------------------------------------[]');
Writeln('You blocked and unblocked your friend ' +IntToStr(Times) +' times in ' +IntToStr(Times * WaitTime / 1000) +' seconds.');
Writeln('[]------------------------------------------------[]');
end;
end;
Procedure MouseClick;
begin
MoveMouse(x,y);
repeat
Wait(WaitTime);
ClickMouse(x,y,true);
i := i + 1;
until(i=Times)
end;
begin
SafeInitForm;
SafeShowFormModal;
LoadBMaps;
DeclareVar;
ActivateClient;
if(Nudge=true)then
begin
if(FindBitmapSpiralTolerance(BNudge,x,y,0,0,1000,1000,20))then
MouseClick;
end else
if(Nudge=false)then
begin
if(FindBitmapSpiralTolerance(BBlock,x,y,0,0,1000,1000,20))then
MouseClick;
end;
ProgRep;
end.