PDA

Ver la versión completa : Tarjetas de Credito



Cypress
24-07-2006, 18:13
Antes que nada, falsificar targetas de credito, es un crimen, y no se debe hacer, por sus consecuencias(estas dañando a otra presona y puedes ir preso).Pero decidí publicar esto, porque es realmente interesante, el algoritmo que usan las targetas de credito; e informar no es un crimen.

No me hago responsable por el uso que le puedas dar a esta informacion. Yo solo uso mi derecho de libre exprecion, y si algun moderador decide betarlo estare deacuerdo.

Tambien lo decidí poner, porque este texto lo encontre cuando tenía 11 años, luego lo perdí,y ahora de casualidad lo encotre denuevo. Asi que espero que lo disfruten.


= oSkWoRLd =
www.oskworld.cjb.net

Codificacion Tarjetas de credito
En este documento se explica el sistema de codificacion de las tarjetas de Credito, Debito y otras.
El algoritmo que se describe en este texto es valido para la mayor parte de tarjetas, no solo las de credito o debito, sino la de grandes centros comerciales aunque los datos particulares sean sobre las primeras.
Descripcion del Numero de Tarjeta
El Numero se compone de tres partes principales:

Los 4 primeros digitos componen el Identificativo del banco que cede la tarjeta. Hay un numero diferente para cada Banco pero estos numeros no son los mismos de acuerdo al continente en que se este. Segun esto el numero de CITIBANK en EEUU es el 4013 mientras que en Europa es el 4539 .
El 5 digito es el Tipo de tarjeta e indica que entidad financiera gestiona esa tarjeta. Las mas importantes son Visa, American Express y Master Card.
Los 10 digitos siguientes componen el Numero de usuario e identifican a este de manera unica.
Digito de control es el ultimo numero y se obtiene aplicando un algoritmo al resto del numero.
El formato es el siguiente:
1111 2333 3333 3334
Donde:


El Identificativo esta representado por 1111 el cual es un numero de 4 digitos siendo cada digito un numero del 0 al 9.
El Tipo esta representado por 2 el cual es un numero de 1 digitos siendo cada digito un numero del 0 al 9.
El Numero de usuario esta representada por 333 3333 333 el cual es un numero de 10 digitos siendo cada digito un numero del 0 al 9.
El Digito de Control esta representado por 4 el cual es un numero de 1 digitos siendo cada digito un numero del 0 al 9.
Identificativo del Banco
Cada banco o entidad financiera que distribuye tarjetas lleva un numero de cuatro digitos que lo identifica.


Identificativo Nombre del banco Tipo
4013 Citibank 4




Tipo de Tarjeta
El 5 digito identifica al tipo de tarjeta de acuerdo a los siguientes valores.

Tipo Entidad Financiera
3 American Express
4 Visa
5 Master Card
6 Discover


Algoritmo de Codificacion del Numero
La codificacion del numero de la tarjeta se realiza en tres pasos:

Se multiplican por dos todos los digitos de las posiciones impares y aquellos mayores de 9 se suman los dos digitos.
Resultado= Ax2 si Resultado>10 entonces Resultado=Resultado-9.

Despues de calcular los nuevos numeros de las posiciones impares se suman entre si todos los digitos.
a1b2 c3d4 e5f6 g7h8 i9j0 ->
Resultado= a+1+b+2+c+3+d+4+e+5+f+6+g+7+h+8+i+9+j+0

Si el resultado es multiplo de 10 entonces el numero de tarjeta es valido.
Resultado MOD 10 = 0

Ejemplo
Si tenemos el numero de tarjeta 4539 4512 0398 7356 y comprobar que es un numero valido:

Multiplicar por dos los numeros de las posiciones impares (4-3- 4-1- 0-9- 7-5-) y dejarlos con un solo digito:
4x2=8
3x2=6
4x2=8
1x2=2
0x2=0
9x2=18 -> 1+8=9
7x2=14 -> 1+4=5
5x2=10 -> 1+0=1
Sumar los digitos de las posiciones pares y los nuevos de las posiciones impares.
5+9+5+2+3+8+3+6+8+6+8+2+0+9+5+1=80
80 es multiplo de 10 por lo que el numero de tarjeta es valido.

SxR
24-07-2006, 23:25
Es un poco viejo, pero como nota está bien. Además de que actualemente no sirve de nada pq las comprobaciones se hacen contra un servidor y te hace falta el número que viene por detrás en la tarjeta y no sigue algoritmo ninguno.

Cypress
26-07-2006, 17:09
sip es verdad lo del numero atras

r1ck92
31-07-2006, 02:08
Es un poco viejo, pero como nota está bien. Además de que actualemente no sirve de nada pq las comprobaciones se hacen contra un servidor y te hace falta el número que viene por detrás en la tarjeta y no sigue algoritmo ninguno.


De hecho el cvv2 o el numero de atras como le dices si sigue un algoritmo yo ya lo comprobe..... ¬¬.... :mad: :mad: tener cuidado con lo que dices podria no ser verdad :D :D :D :mad: :( :(

rower
31-07-2006, 04:34
jaja, ahora q me acuerdo ese algoritmo me lo dieron en una clase de la facultad para implementar pilas y colas, y decía que era el algoritmo que usan las targetas, pero nunca me hubiera imaginado que era en serio, jeje

bennettone
04-08-2006, 07:40
seA... ese algoritMo no solo es posible de sakar, sino k Es tan facil k INkluso tu lo puedes hacer kon papel o si t komplikas muXo la vida, hay un PrograMa k bajÉ ke lo Saka por ti ;)

xAlu2 a tOoos

clarinetista
04-08-2006, 09:31
bennettone, escribe correctamente.
Gracias por tu colaboracion

bennettone
04-08-2006, 22:41
oshhh... que todos aquì son tan agüados??
primero me borran un tema y ahora ya no puedo escribir así? --__-- uU

clarinetista
07-08-2006, 08:34
Las normas son para todos, echales un ojo:

http://www.hackhispano.com/foro/announcement.php?f=2

Meli55
07-08-2006, 22:19
nececito una tarjeta de credi con dinero para poder hacerme premmi en tibia gracias xDD

SanLeviaThan
08-08-2006, 01:23
nececito una tarjeta de credi con dinero para poder hacerme premmi en tibia gracias xDD

Justamente acabo de vender la ultima :p
Preguntale a tus padres si te prestan una xDDDDDDDDDDDDDDDDD
y lee las normas.

Saludos

sesmar
09-08-2006, 00:06
entoces como se saca el numero de atras?

Cypress
12-08-2006, 09:19
pero che... nunca pensé que me volvería tan popular con un post como este...
siempre que abro mi secion aqui en hackhispano, me encuentro con un nuevo mesage privado...

pero, lo importante es esto....
costo pero salio (y no muy bien)
hize un programita en qbasic para que te genere numeros siguiendo el algoritmo yyyy funciona... tiene un problemita que quizas alguien me pueda ayudar
y aqui esta recien horneado:

*********
CLS
DIM dig(5)
DIM digsum(15)
PRINT "N£mero de Banco"
INPUT "digito 1"; dig(0)
INPUT "digito 2"; dig(1)
INPUT "digito 3"; dig(2)
INPUT "digito 4"; dig(3)
CLS
PRINT "American Express 3"
PRINT "Visa 4"
PRINT "Master Card 5"
PRINT "Discover 6"
PRINT
INPUT "Tipo de targeta"; dig(4)
INPUT "Ultimo Numero"; dig(5)

digsum(0) = (dig(0) * 2)
digsum(2) = (dig(2) * 2)
digsum(4) = (dig(4) * 2)
digsum(1) = dig(1)
digsum(3) = dig(3)
digsum(15) = dig(5)
FOR a = 0 TO 2
a = a * 2
IF digsum(a) = 16 THEN digsum(a) = 14
IF digsum(a) = 14 THEN digsum(a) = 10
IF digsum(a) = 12 THEN digsum(a) = 6
IF digsum(a) = 10 THEN digsum(a) = 2
a = a / 2
NEXT a
CLS

FOR a = 0 TO 9
digsum(5) = a
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, digsum(0), digsum(1), digsum(2), digsum(3), digsum(4), digsum(5), digsum(6), digsum(7), digsum(8), digsum(9), digsum(10), digsum(11), digsum(12), digsum(13), digsum(14), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont


END IF
FOR b = 0 TO 9
digsum(6) = b * 2
IF (b * 2) = 16 THEN digsum(6) = 14
IF (b * 2) = 14 THEN digsum(6) = 10
IF (b * 2) = 12 THEN digsum(6) = 6
IF (b * 2) = 10 THEN digsum(6) = 2
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, (digsum(0) / 2), digsum(1), (digsum(2) / 2), digsum(3), (digsum(4) / 2), digsum(5), (digsum(6) / 2), digsum(7), (digsum(8) / 2), digsum(9), (digsum(10) / 10), digsum(11), (digsum(12) / 2), digsum(13), (digsum(14) / 2), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont

END IF


FOR c = 0 TO 9
digsum(7) = c
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, digsum(0), digsum(1), digsum(2), digsum(3), digsum(4), digsum(5), digsum(6), digsum(7), digsum(8), digsum(9), digsum(10), digsum(11), digsum(12), digsum(13), digsum(14), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont


END IF
FOR d = 0 TO 9
digsum(8) = (d * 2)
IF (d * 2) = 16 THEN digsum(8) = 14
IF (d * 2) = 14 THEN digsum(8) = 10
IF (d * 2) = 12 THEN digsum(8) = 6
IF (d * 2) = 10 THEN digsum(8) = 2
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, (digsum(0) / 2), digsum(1), (digsum(2) / 2), digsum(3), (digsum(4) / 2), digsum(5), (digsum(6) / 2), digsum(7), (digsum(8) / 2), digsum(9), (digsum(10) / 10), digsum(11), (digsum(12) / 2), digsum(13), (digsum(14) / 2), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont

END IF

FOR e = 0 TO 9
digsum(9) = e
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, digsum(0), digsum(1), digsum(2), digsum(3), digsum(4), digsum(5), digsum(6), digsum(7), digsum(8), digsum(9), digsum(10), digsum(11), digsum(12), digsum(13), digsum(14), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont


END IF
FOR f = 0 TO 9

digsum(10) = (f * 2)
IF (f * 2) = 16 THEN digsum(10) = 14
IF (f * 2) = 14 THEN digsum(10) = 10
IF (f * 2) = 12 THEN digsum(10) = 6
IF (f * 2) = 10 THEN digsum(10) = 2
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, (digsum(0) / 2), digsum(1), (digsum(2) / 2), digsum(3), (digsum(4) / 2), digsum(5), (digsum(6) / 2), digsum(7), (digsum(8) / 2), digsum(9), (digsum(10) / 10), digsum(11), (digsum(12) / 2), digsum(13), (digsum(14) / 2), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont

END IF

FOR g = 0 TO 9
digsum(11) = g
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, digsum(0), digsum(1), digsum(2), digsum(3), digsum(4), digsum(5), digsum(6), digsum(7), digsum(8), digsum(9), digsum(10), digsum(11), digsum(12), digsum(13), digsum(14), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont


END IF
FOR h = 0 TO 9
digsum(12) = (h * 2)
IF (h * 2) = 16 THEN digsum(12) = 14
IF (h * 2) = 14 THEN digsum(12) = 10
IF (h * 2) = 12 THEN digsum(12) = 6
IF (h * 2) = 10 THEN digsum(12) = 2
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, (digsum(0) / 2), digsum(1), (digsum(2) / 2), digsum(3), (digsum(4) / 2), digsum(5), (digsum(6) / 2), digsum(7), (digsum(8) / 2), digsum(9), (digsum(10) / 10), digsum(11), (digsum(12) / 2), digsum(13), (digsum(14) / 2), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont

END IF

FOR i = 0 TO 9
digsum(13) = i
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
PRINT total
IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1
PRINT #1, digsum(0), digsum(1), digsum(2), digsum(3), digsum(4), digsum(5), digsum(6), digsum(7), digsum(8), digsum(9), digsum(10), digsum(11), digsum(12), digsum(13), digsum(14), digsum(15)
CLOSE #1
cont = cont + 1
LOCATE 1, 1
PRINT "cant. de Targetas"; cont


END IF
FOR j = 0 TO 9
digsum(14) = (j * 2)
IF digsum(14) = 16 THEN digsum(14) = 14
IF digsum(14) = 14 THEN digsum(14) = 10
IF digsum(14) = 12 THEN digsum(14) = 6
IF digsum(14) = 10 THEN digsum(14) = 2
total = digsum(0) + digsum(1) + digsum(2) + digsum(3) + digsum(4) + digsum(5) + digsum(6) + digsum(7) + digsum(8) + digsum(9) + digsum(10) + digsum(11) + digsum(12) + digsum(13) + digsum(14) + digsum(15)
LOCATE 1, 1
PRINT total


IF INT(total / 10) = (total / 10) THEN
OPEN "c:\target.qwe" FOR APPEND AS #1

rem ******************** ERROR *********************
REM POR ALGUN MOTIVO INEXPLICABLE DE LA VIDA
REM CUANDO ENTRA POR 7º VEZ ESTE OPEN MULTIPLICA
REM LOS VALORES, LO DEPURE MUCHAS VECES y NADA...
REM SI ALGUIEN PUEDE AYUDARME; SE LOS AGRADECERÍA
REM sALUDOS
REM Cypress
rem ******************** ERROR *********************
PRINT #1, (digsum(0) / 2), digsum(1), (digsum(2) / 2), digsum(3), (digsum(4) / 2), digsum(5), (digsum(6) / 2), digsum(7), (digsum(8) / 2), digsum(9), (digsum(10) / 10), digsum(11), (digsum(12) / 2), digsum(13), (digsum(14) / 2), digsum(15)
CLOSE #1
cont = cont + 1
PRINT "cant. de Targetas"; cont

END IF


NEXT j
NEXT i
NEXT h
NEXT g
NEXT f
NEXT e
NEXT d
NEXT c
NEXT b
NEXT a
*************
por cierto, no critiquen la programacion, si esta media fea... puede que haya cosas de mas pero bue... salio

Saludos
Cypress

Cypress
15-08-2006, 19:53
pero... espere unos días para que alguien comente algo sobre el programita... no se si les gusto o algo por el estilo... no se.
no lo compile para que lo vean y lo mejoren...
Saludos
Cypress

vhs0
03-09-2006, 20:44
cypress, estoy interesado en el tema y se bastante acerca de este, pero no entiendo acerca de tu programa para los numeros de atras, puedes explicar como aplicarlo? soy nuevo en este foro y no se si pueda agregar mi correo para compartir informacion referente a este tema. vhs0@hotmail. gracias

Cypress
03-09-2006, 22:55
no es para los número de atras, es para los numeros de adelante.

vhs0
04-09-2006, 04:59
Hey r1ck92! tienes informacion acerca de los numeros de atras de las tarjetas puedo compartir informacion acerca de lo demas asi como cells tambien.

vhs0
04-09-2006, 05:05
Hey r1ck92! tienes informacion acerca de los numeros de atras de las tarjetas puedo compartir informacion acerca de lo demas asi como cells tambien.

taliban
12-09-2006, 18:40
:0= :0=

El cvv2 (tambien llamado cvc2 o CID depende de la tarjeta) es un numero creado por las compañias de tarjetas de creditos para evitar el fraude en internet, este codigo debe ser introducido para verificar ke la tarjeta este en manos del dueño.

Los codigos CVV2 (VISA) y CVC2 (master card) tienen 3 digitos. El codigo CID (American Express) tiene 4

SI la tarjeta es american express:

El primer numero del CID es el sexto de la tarjeta de credito, el segundo es el octavo de la tarjeta, el tercero es el doceavo (12) y el cuarto depende: Si el tercer numero de la tarjeta es 9, sera 1 y si es otro se le uma 1 a ese numero, ej: si es 4, el cuarto sera 5

SI la tarjeta es VISA, MAster Card o Discovery:
El primero es el octavo, el segundo es el doceavo (12) y el tercero es como el 4° de American Express: Si es 9 va a ser1 y si es otro numero le sumas 1, ej: si el 3 es 6, va a ser 7

Cypress
12-09-2006, 18:48
Bien, como lo sabes?

LUK
13-09-2006, 00:24
Taliban... de donde has sacado esa info? el cvv2 no sigue ningun algoritmo ni nada... se crea alternativametne el numero de tarjeta.. ahi esta la clave para evitar (si venga xD) el fraude.

smaug_
13-09-2006, 10:04
Mi tarjeta es VISA y no cumple esos requisitos ni para atras XD

CrAcKzMe
13-09-2006, 14:52
Precisamente taliban el numero no tiene ningúna relación con nada de la tarjeta para, como bien dices, evitar un fraude.

Un saludo.

taliban
13-09-2006, 16:40
ummmm estan seguros x q ami eso me ha funcionado un par de veces pa pagarme membresias en juegos como runescape y ogame tambien he hecho algunas donaciones en l2 ^^

Arky
14-09-2006, 12:28
pues va a ser que no eh jejeje , efectivamente lo acabo d comprobar en mis tarjetas y ningun numero de atras encaja con ninguno de las convinaciones que tu dijiste :p

vhs0
21-09-2006, 18:39
que tan cierto es eso taliban, lo has intentado?

vhs0
21-09-2006, 18:45
quien tiene esa informacion real referente al cvv o codigos en tracks 1 y 2?

alonedark
28-06-2007, 01:01
el CVV 2 basado en el algoritmo DES, el cual consiste en utilizar datos propios de la misma banda magnética, los cuales al combinarse con una clave secreta que sólo el Banco conoce, dan como resultado dicho valor.

Este valor está grabado en la tarjeta y viaja con la transacción, el sistema lo recalcula y compara con el recibido, si son iguales, entonces la tarjeta se asume válida.


^^!