- Case "button_break"
item.Control = New Button
item.Control.Text = item.Text
ToolTip1.SetToolTip(item.Control, item.Tooltip)
AddHandler item.Control.Click, AddressOf hi
AddHandler item.Control.Click, AddressOf actionCommand
'AddHandler hi(), AddressOf actionCommand
'sector = hi()
Call hi()
item.Action &= ("hf mf nested 1" & sector)
item.Control.Tag = item.Action
item.Control.SetBounds(0, i * 35, 140, 20)
item.Control.AutoSize = True
Public Sub hi()
Dim sector_num() As String
sector_num = Split(prompt.Text, vbCrLf)
For i = 0 To UBound(sector_num)
If Strings.Left(sector_num(i), 11) = "block data:" Then
sector = Strings.Right(sector_num(i), Strings.Len(sector_num(i)) - 11)
End If
Next i
End Sub
The reault is:
proxmark3> hf mf nested 1
Usage:
all sectors: hf mf nested <key A/B> <key (12 hex symbols)> [t,d]
]]>