All pastes #912468 Raw Edit

Something

public text v1 · immutable
·published 2008-02-21 12:08 UTC
rendered paste body
Private Sub infammo_Click()

Dim Poke(0) As Byte
    
    Poke(0) = &H90
    Poke(1) = &H90
    Poke(2) = &H90
    Poke(3) = &H90
    Poke(4) = &H90

   WriteNRestore &H503162, Poke
End Sub