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
}
}
}
