alias f5 cvv2
menu status,channel,query {
  -
  Cari CVV:cvv2
}
alias cekcvv2 {
  set %cv1 $left(%cc,8)
  set %cv1.1 $right(%cv1,1)
  set %cv2 $left(%cc,12)
  set %cv2.2 $right(%cv2,1)
  set %cv3 $left(%cc,3)
  set %cv3.3 $right(%cv3,1)
  set %cv4 $left(%cc,1)
  set %cv4.4 $calc(%cv3.3 + 1)
  set %cvv2 %cv1.1 $+ %cv2.2 $+ %cv4.4
  set %cvv $left(%cvv2,3)
  .timer 2 2 /echo CVV dari %cc adalah %cvv Enjoy!!!
  .timer 1 5 /echo ----- CVV2 Edited by Intifadha # CrAsH_0veRHeaD -----

}
alias cvv2 dialog -m cvv2 cvv2
dialog cvv2 {
  title "CVV Finder by LeNK"
  size -1 -1 250 145
  box "Enjoy..!!",2, 4 4 242 110
  text "Masukan No CC Yang akan di cari CVV-nya",4, 1 30 249 25, center
  edit "",5, 55 57 140 20 ,autohs
  button "&Cari..!!!",3, 80 85 100 20,defult,ok
  text "Email : newbie.permanent@gmail.com ",7, 1 120 249 25, center,disable
}
on 1:dialog:cvv2:*:*: {
  if ($devent == sclick) {
    if ($did == 3) {
      .set %cc $did(5)
      .timer 1 1 cekcvv2
    }
  }
}