Advertisement
InsAnya

DNI Avanzado

Feb 21st, 2024 (edited)
449
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.68 KB | None | 0 0
  1. DNI Avanzado 2 Variables (Próximamente con API)
  2.  
  3. Variable:
  4. dni = no
  5. ndni = 0
  6.  
  7. Código 1: !ce-dni (Trigger Opcional) (Crear/Editar DNI)
  8. $nomention
  9. $if[$getVar[dni;$authorID]==no]
  10. $title[Crear DNI]
  11. $description[Para crear un DNI debes enviar un mensaje con la siguiente información:
  12. (Nombre) (Apellido) (Fecha de Nacimiento) (Género) (Nacionalidad)
  13. Ejemplo:
  14. Juan Bodoque 01/02/2004 Masculino Perú]
  15. $else
  16. $title[Editar DNI]
  17. $description[Para editar tu DNI debes enviar un mensaje con la siguiente información:
  18. (Nombre) (Apellido) (Fecha de Nacimiento) (Género) (Nacionalidad)
  19. Ejemplo:
  20. Juan Bodoque 01/02/2004 Masculino Perú]
  21. $endif
  22. $awaitFunc[dni;$authorID;$channelID]
  23. $addTimestamp
  24. $color[FCBFCB]
  25.  
  26. Código 2: $awaitedCommand[dni;] (Trigger Obligatorio) (Creación/Edición DNI)
  27. $nomention
  28. $time[America/Tijuana]
  29. $onlyIf[$argCount[$message]>=5;¡Debes incluir todos los argumentos que se indican!
  30. Ejemplo: Juan Bodoque 01/02/2004 Masculino Perú]
  31. $onlyIf[$checkContains[$message[1];1;2;3;4;5;6;7;8;9;0;+;×;÷;=;/;_;€;£;(;);@;#;$;%;^;&;*;¿;¡;!;-;';";:;,;?;.;`;~;\;|;<;>;{;}]==false;¡Tu nombre solo debe contener letras!
  32. Ejemplo: Juan]
  33. $onlyIf[$checkContains[$message[2];1;2;3;4;5;6;7;8;9;0;+;×;÷;=;/;_;€;£;(;);@;#;$;%;^;&;*;¿;¡;!;-;';";:;,;?;.;`;~;\;|;<;>;{;}]==false;¡Tu apellido solo debe contener letras!
  34. Ejemplo: Bodoque]
  35. $onlyIf[$isNumber[$replaceText[$message[3];/;]]==true;¡Debes incluir una fecha válida!
  36. Ejemplo: 01/02/2004]
  37. $onlyIf[$or[$toTitleCase[$message[4]]==Masculino;$toTitleCase[$message[4]]==Femenino;$toTitleCase[$message[4]]==Otro]==true;¡Debes incluir un género válido!
  38. Géneros Válidos: Masculino / Femenino / Otro]
  39. $onlyIf[$message[5]!=;¡Debes incluir una nacionalidad!
  40. Ejemplo: Perú]
  41. $if[$getVar[dni;$authorID]==no]
  42. $title[Crear DNI]
  43. $description[Creaste un DNI con la siguiente información:]
  44. $addField[Nombre;$message[1]]
  45. $addField[Apellido;$message[2]]
  46. $addField[Fecha de Nacimiento;$message[3]]
  47. $addField[Sexo;
  48. $message[4]]
  49. $addField[Nacionalidad;
  50. $message[5]]
  51. $var[m;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$month;January;01];February;02];March;03];April;04];May;05];June;06];July;07];August;08];September;09];October;10];November;11];December;12]]
  52. $setVar[dni;$message[1]♡$message[2]♡$message[3]♡$message[4]♡$message[5]♡<t:$getTimestamp:D>♡<t:$sum[$getTimestamp;315569260]:R>;$authorID]
  53. $setVar[ndni;$sum[$getVar[ndni;$botID];1];$botID]
  54. $else
  55. $title[Editar DNI]
  56. $description[Editaste tu DNI con la siguiente información:]
  57. $addField[Nombre;$message[1]]
  58. $addField[Apellido;$message[2]]
  59. $addField[Fecha de Nacimiento;$message[3]]
  60. $addField[Sexo;
  61. $message[4]]
  62. $addField[Nacionalidad;
  63. $message[5]]
  64. $var[m;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$month;January;01];February;02];March;03];April;04];May;05];June;06];July;07];August;08];September;09];October;10];November;11];December;12]]
  65. $setVar[dni;$message[1]♡$message[2]♡$message[3]♡$message[4]♡$message[5]♡<t:$getTimestamp:D>♡<t:$sum[$getTimestamp;315569260]:R>;$authorID]
  66. $endif
  67. $if[$charCount[$getVar[ndni;$botID]]==1]
  68. $var[ndni;000000000$getVar[ndni;$botID]]
  69. $elseif[$charCount[$getVar[ndni;$botID]]==2]
  70. $var[ndni;00000000$getVar[ndni;$botID]]
  71. $elseif[$charCount[$getVar[ndni;$botID]]==3]
  72. $var[ndni;0000000$getVar[ndni;$botID]]
  73. $elseif[$charCount[$getVar[ndni;$botID]]==4]
  74. $var[ndni;000000$getVar[ndni;$botID]]
  75. $elseif[$charCount[$getVar[ndni;$botID]]==5]
  76. $var[ndni;00000$getVar[ndni;$botID]]
  77. $elseif[$charCount[$getVar[ndni;$botID]]==6]
  78. $var[ndni;0000$getVar[ndni;$botID]]$elseif[$charCount[$getVar[ndni;$botID]]==7]
  79. $var[ndni;000$getVar[ndni;$botID]]
  80. $elseif[$charCount[$getVar[ndni;$botID]]==8]
  81. $var[ndni;00$getVar[ndni;$botID]]
  82. $elseif[$charCount[$getVar[ndni;$botID]]==9]
  83. $var[ndni;0$getVar[ndni;$botID]]
  84. $elseif[$charCount[$getVar[ndni;$botID]]>=10]
  85. $var[ndni;$getVar[ndni;$botID]]
  86. $endif
  87. $footer[Tu número de DNI es $var[ndni]]
  88. $color[FCBFCB]
  89. $addTimestamp
  90.  
  91.  
  92.  
  93. Código 3: !ver-dni (Trigger Opcional) (Visualización DNI)
  94. $nomention
  95. $onlyIf[$getVar[dni;$mentioned[1;yes]]!=no;¡El usuario no tiene un DNI!]
  96. $var[m;$mentioned[1;yes]]
  97. $textSplit[$getVar[dni;$var[m]];♡]
  98. $var[n;$toTitleCase[$splitText[1]]]
  99. $var[a;$toTitleCase[$splitText[2]]]
  100. $var[b;$splitText[3]]
  101. $var[viva el sexo;$splitText[4]]
  102. $var[peru;$toTitleCase[$splitText[5]]]
  103. $var[e;$splitText[6]]
  104. $var[v;$splitText[7]]
  105. $title[DNI de $nickname[$var[m]]]
  106. $addField[Nombre;$var[n]]
  107. $addField[Apellido;$var[a]]
  108. $addField[Fecha de Nacimiento;$var[b]]
  109. $addField[Sexo;$var[viva el sexo]]
  110. $addField[Nacionalidad;$var[peru]]
  111. $addField[Emitido en;$var[e]]
  112. $addField[Caducidad;$var[v]]
  113. $if[$charCount[$getVar[ndni;$botID]]==1]
  114. $var[ndni;000000000$getVar[ndni;$botID]]
  115. $elseif[$charCount[$getVar[ndni;$botID]]==2]
  116. $var[ndni;00000000$getVar[ndni;$botID]]
  117. $elseif[$charCount[$getVar[ndni;$botID]]==3]
  118. $var[ndni;0000000$getVar[ndni;$botID]]
  119. $elseif[$charCount[$getVar[ndni;$botID]]==4]
  120. $var[ndni;000000$getVar[ndni;$botID]]
  121. $elseif[$charCount[$getVar[ndni;$botID]]==5]
  122. $var[ndni;00000$getVar[ndni;$botID]]
  123. $elseif[$charCount[$getVar[ndni;$botID]]==6]
  124. $var[ndni;0000$getVar[ndni;$botID]]$elseif[$charCount[$getVar[ndni;$botID]]==7]
  125. $var[ndni;000$getVar[ndni;$botID]]
  126. $elseif[$charCount[$getVar[ndni;$botID]]==8]
  127. $var[ndni;00$getVar[ndni;$botID]]
  128. $elseif[$charCount[$getVar[ndni;$botID]]==9]
  129. $var[ndni;0$getVar[ndni;$botID]]
  130. $elseif[$charCount[$getVar[ndni;$botID]]>=10]
  131. $var[ndni;$getVar[ndni;$botID]]
  132. $endif
  133. $footer[N°: $var[ndni]]
  134. $addTimestamp
  135. $color[FCBFCB]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement