VB Help!!!

[nub_g0t_high]

How do i make it so that when i zoom in, i press the right mouse button, and also use right mouse button for zoom out?

[ZeaS]

if getkeypress(vbKeyRButton) then
call writealong ("warrock", &HAdress, 1)
else:
call writealong ("warrock", &HAdress, 0)
end if

i think this work :P

[wr194t]

if getkeypress(vbKeyRButton) then
call writealong ("warrock", &HAdress, 1)
else:
call writealong ("warrock", &HAdress, 0)
end if

i think this work :P

That's hold right click on/off. He is asking for click on then click again for off.

[ZeaS]

That's hold right click on/off. He is asking for click on then click again for off.

omg i see it now amm
timer1: (interval = 100)
if getkeypress(vbKeyRbutton) then
call writealong("warrock", &HAdress, 1)
timer2.interval = 100
timer1.interval = 0
end if
end sub

timer2: (intervall = 0 )
if getkeypress(vbkeyRButton) then
call writealong("warrock", &HAdress, 0)
timer1.interval = 100
timer2.interval = 0
end if
end sub

maby this :P

[radnomguywfq3]

Thats vary risky code, as the mechine could record the mouse press two times in a row, you better sleeping it for 1 second after click.

[pbsucks]

or just make everythink with low risk in another way:

timer1 has interval 1 from the beginning

if GetKeyPressed(vbKeyRButton) and Timer2.Enabled=False then Timer2.Enabled=True

if GetKeyPressed(vbKeyRButton) and Timer2.Enabled=True then Timer2.Enabled=False

timer2 has interval 1, too, but disabled

call writealong("warrock", Adress, Value);