Generación de código de verificación sin componentes - Formato GIF
La copia del código es la siguiente:
<%
Declaración de visualización de OppectionExplicit '
Classcom_gifcode_class
'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '
'Autor: [email protected] (QQ)
'Gracias: Laomi, Laomiao, Netrube
'2006-01-02
'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '
Publicnoisy, recuento, ancho, altura, ángulo, offset, borde
PrivateGraph (), margen (3)
Privatesubclass_initialize ()
Aleatorizar
Ruidoso = 16 'probabilidad de ocurrencia de punto de interferencia
Conte = 4 'caracteres
Ancho = 80 'ancho de imagen
Altura = 20'Spicture Altura
Ángulo = 2 'Cambio de ángulo aleatorio
Desplazamiento = 20 'Cantidad de cambio aleatorio de compensación
Border = 1'border tamaño
Endsub
PublicFunctionCreate ()
Constccharset = "123456789"
Dimi, x, y
DimvValidCode: vvalidCode = ""
Dimvindex
Redimgraph (ancho-1, altura-1)
Fori = 0ToCount-1
Vindex = int (rnd*len (ccharset))
vvalidCode = vvalidcode+mid (ccharset, Vindex+1,1)
SetDrawVindex, yo
Próximo
Create = vValidCode
Función final
SubsetDot (PX, PY)
Ifpx*(width-px-1)> = 0andpy*(hight-py-1)> = 0then
Graph (PX, Py) = 1
Endif
Endsub
PublicsubSetDraw (Pindex, PNumber)
'Datos de personajes
Dimdotdata (8)
DotData (0) = Array (30,15,50,1,50,100)
Dotdata (1) = matriz (1,34,30,1,71,1,100,34,1,100,93,100,100,86)
Dotdata (2) = matriz (1,1,100,1,42,42,100,70,50,100,1,70)
Dotdata (3) = matriz (100,73,6,73,75,6,75,100)
Dotdata (4) = matriz (100,1,1,1,1,1,50,50,35,100,55,100,80,50,100,1,95)
Dotdata (5) = matriz (100,20,70,1,20,1,1,30,1,80,30,100,70,100,100,80,100,60,70,50,30,50,1,60)
DotData (6) = matriz (6,26,6,6,100,6,53,100)
Dotdata (7) = matriz (100,30,100,20,70,1,30,1,1,20,1,30,100,70,100,80,70,100,30,100,1,80,1,70,100,30)