GMBR
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Conectar-se

Esqueci minha senha

Últimos assuntos
» [Ideia] Concurso para relembrar os bons tempos
por vinians Hoje à(s) 09:40

» GMBR 2020 (jogo comemorativo)
por Diemorth Hoje à(s) 09:24

» Rodar o jogo em iOS
por matheushdj Ontem à(s) 20:04

» [XCREATOR] [JAM] [UPD] Farm Defense
por vinians Qui 09 Jul 2020, 23:31

» Dúvida sobre GameMaker
por Super Games Qui 09 Jul 2020, 19:32

» Apresentação de Rojas231
por Super Games Qui 09 Jul 2020, 19:17

» Vender extensões no marketplace da yoyo games?
por Willy Qui 09 Jul 2020, 09:55

» [DOWNLOAD] Manual Game Maker 8 traduzido
por matheushdj Qua 08 Jul 2020, 21:41

» Máquina de estado/State Machine no Unity
por theguitarmester Ter 07 Jul 2020, 22:17

» Eu sou o MoisesBR
por GabrielXavier Ter 07 Jul 2020, 22:04

» Melhor pontuação
por matheushdj Seg 06 Jul 2020, 22:23

» Problemas com animação e ataque
por moisesBR Seg 06 Jul 2020, 22:05

» Ideia para futuros concursos
por moisesBR Seg 06 Jul 2020, 20:51

» Para quem quer mexer com a Godot
por Super Games Seg 06 Jul 2020, 09:45

» MOON - [Indie Game Solo]
por vinians Seg 06 Jul 2020, 08:40


valida CPF

Ir em baixo

valida CPF Empty valida CPF

Mensagem por Borgo em Ter 05 Maio 2009, 20:06

Script para validar CPFs


Código:
//Criado por Borgo william@neonerds.com.br
//msn: link_wall@hotmail.com Usem sem moderação!!
//argument0 CPF
//uso: if valida_cpf(12312312312){.......}
//retorna true ou false



cpft=string(argument0)
for(cpfi=1;cpfi<=11;cpfi+=1){
    dd[cpfi]="0"
}
for(cpfi=1;cpfi<=11;cpfi+=1){
    dd[cpfi+11-string_length(cpft)]=string_copy(cpft,cpfi,1)
}
cpfsum=0

for(cpfi=2;cpfi<=10;cpfi+=1){
    dx[cpfi-1] = (12-cpfi)*real(dd[cpfi-1])
    cpfsum+=dx[cpfi-1]
}
if cpfsum mod 11 < 2{
    dv1=0
}else{
    dv1=11-(cpfsum mod 11)
}
cpfsum=0
for(cpfi=2;cpfi<=10;cpfi+=1){
    dx[cpfi-1] = (13-cpfi)*real(dd[cpfi-1])
    cpfsum+=dx[cpfi-1]
}
dx[11] = 2*real(dv1)
cpfsum+=dx[11]

if cpfsum mod 11 < 2{
    dv2=0
}else{
    dv2=11-(cpfsum mod 11)
}
if string(dv1)=string_copy(cpft,string_length(cpft)-1,1) && string(dv2)=string_copy(cpft,string_length(cpft)-0,1){
    return true;
}else{
    return false;
}


Última edição por Borgo em Qui 07 Maio 2009, 09:09, editado 2 vez(es)
Borgo
Borgo

Data de inscrição : 06/01/2009
Reputação : 0
Número de Mensagens : 69
Prêmios : valida CPF Empty

Medalhas x 0 Tutoriais x 0 Moedas x 0

Ouro x 0 Prata x 0 Bronze x 0

Insignia 1 x 0 Insignia 2 x 0 Insignia 3 x 0

http://www.neonerds.com.br

Voltar ao Topo Ir em baixo

valida CPF Empty Re: valida CPF

Mensagem por Igor KinGamer em Qua 06 Maio 2009, 00:31

Ooooookaaaay....

Não consegui entender o que faz confused
Igor KinGamer
Igor KinGamer

Data de inscrição : 26/09/2008
Reputação : 11
Número de Mensagens : 890
Prêmios : valida CPF Empty

Medalhas x 0 Tutoriais x 1 Moedas x 0

Ouro x 0 Prata x 0 Bronze x 0

Insignia 1 x 0 Insignia 2 x 0 Insignia 3 x 0

Voltar ao Topo Ir em baixo

valida CPF Empty Re: valida CPF

Mensagem por Borgo em Qui 07 Maio 2009, 08:31

é um script que valida CPFs, crie um script, nomei-o de por exemplo valida_cpf e ai, quando for necessário validar um CPF, basta usar valida_cpf(12345678978), como ele retorna true ou false, pode-se usar com o IF

if valida_cpf(nrCpf){
show_message("CPF Válido")
}else{
show_message("CPF Inválido")
}

Vou criar mais para frente um script que valida CPF, CNPJ e RG.
Borgo
Borgo

Data de inscrição : 06/01/2009
Reputação : 0
Número de Mensagens : 69
Prêmios : valida CPF Empty

Medalhas x 0 Tutoriais x 0 Moedas x 0

Ouro x 0 Prata x 0 Bronze x 0

Insignia 1 x 0 Insignia 2 x 0 Insignia 3 x 0

http://www.neonerds.com.br

Voltar ao Topo Ir em baixo

valida CPF Empty Re: valida CPF

Mensagem por CPinheiro em Qui 07 Maio 2009, 16:43

Whopa, excelente script! Ficou bem interessante mesmo, e será bastante uso caso alguém crie um programa de compras. Parabéns!
CPinheiro
CPinheiro

Data de inscrição : 01/06/2008
Reputação : 0
Número de Mensagens : 1015
Prêmios : valida CPF Empty

Medalhas x 0 Tutoriais x 1 Moedas x 0

Ouro x 0 Prata x 0 Bronze x 0

Insignia 1 x 0 Insignia 2 x 0 Insignia 3 x 0

http://supermariobrasileiro.blogspot.com

Voltar ao Topo Ir em baixo

valida CPF Empty Re: valida CPF

Mensagem por wac2007 em Ter 28 Jul 2009, 17:29

@CPinheiro escreveu:Whopa, excelente script! Ficou bem interessante mesmo, e será bastante uso caso alguém crie um programa de compras. Parabéns!

Programa de Compras?? No Game Maker??/ Shocked

Tem q ser mto cranio =P

Mto legal seu script mas naum creio q alguem usaria isso n GM =/
wac2007
wac2007

Data de inscrição : 07/11/2008
Reputação : 0
Número de Mensagens : 521
Prêmios : valida CPF Empty

Medalhas x 0 Tutoriais x 0 Moedas x 0

Ouro x 0 Prata x 0 Bronze x 1

Insignia 1 x 0 Insignia 2 x 0 Insignia 3 x 0

http://wac2007.blogspot.com/

Voltar ao Topo Ir em baixo

valida CPF Empty Re: valida CPF

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Voltar ao Topo Ir em baixo

Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum