ASP intelligent swearing filtering system V1.0 page 1/2

<%
'*************************************** *******************
'* Smart swearing filtering system V1.0 **
'* Reprinted, Please retain the copyright information. Thank you for pulling it *
'* Call method: sayy = nd_say_what (sayy). sayy indicates the content input * figure *
'* Program Author: Ding yuan, (net name: Plato's Program) Copyright *
'* QQ: 657697290 * Order *
'* Last modified: 20080609 *
'* (Struct, spring, ....net, www.jb51.net | strong AI system 2049) adjectives Based on Word Segmentation database not developed yet
, Nouns, etc., and automatically prioritized word segmentation,
'* (Struct, spring, ....net, www.jb51.net | October 2049) maximum interval between words and words in multiple XML Layers
(Precise to the interval between a single word and a single word,
'* (Struct, spring, ....net, www.jb51.net | October 2049) because of the possibility of continuous single word and single word
There are also random spaces) and semantic nesting, recursive redundancy correction, and
'* (Struct, spring, ....net, www.jb51.net | October 2049) program semantic understanding, Artificial Neuron Semantic Processing
Higher version
'*************************************** *******************
Function nd_say_what (sayyyyx)

'BenCodeInstructions for use: for example, ivv = 0, ICC = 0, zang_data (ivv,) = "Operation | Day | by | Ri | Cao | grass
| Kao ", ICC = ICC + 1, zang_data (ivv, ICC, 0) =" ", zang_data (ivv, ICC, 1) = 2, indicates that if "Operation | Day | by | Ri | Cao | grass
| The word "fuck" or "day" or other words in Kao are separated from the specified "him" word in zang_data (ivv, ICC, 0) = "him ".
(Ivv, ICC, 1) = 2 indicates the distance between two characters or less than two characters. This statement is considered as dirty and automatically filtered out.

'* Usage: zang_data (, 0) = "dead mom", zang_data (, 0) = "*" indicates that the word "fuck dead" exists.
Filter out, regardless of the character distance, which is different from zang_data (, 0) = "de-dead mom", zang_data (, 0) =...
The effect is equivalent.

'The length of an English is 1, and the length of a Chinese character is also counted as 1

'The word "kill" is considered to be 0 characters different from the word "kill, the word "kill" also thinks "kill" and "dead"
The word is 0 characters different, because the space between the word and the word is automatically ignored.

Zang_len= 999
Zang_yufa_xiangguan_list_max = 22
Dim zang_data (999,22, 2)

'Initialize everything
For zang_lena = 0 to zang_len-1
For zang_yufa_xiangguan_lena = 0 to zang_yufa_xiangguan_list_max-1
Zang_data (zang_lena, zang_yufa_xiangguan_lena, 0) = ""
Zang_data (zang_lena, zang_yufa_xiangguan_lena, 1) = 2' specifies that if zang_data
(Zang_lena, zang_yufa_xiangguan_lena, 0) the length of the string is separated by several lengths or
It is considered as a dirty word only when it is a string that is less than the specified length value.
Next
Next

Konggexx ="
"&" $ _ Kongge _ $ "&" <br> "&" $ _ kongge _ $ "&" <p> "&" $ _ kongge _ $
"&" </P> "&" $ _ kongge _ $ "&", "&" $ _ kongge _ $ "&" '"&" $ _ kongge _ $ "&" "&" $ _ kongge _ $ "&" = "&" $ _ kongge _ $ "&"
= "&" $ _ Kongge _ $ "&"-"&" $ _ kongge _ $ "&" _ "&" $ _ kongge _ $ "&" + "&" $ _ kongge _ $ "&" % "&" $ _ kongge _ $ "&" $ "&" $ _ k
Ongge _ $ "&" # "&" $ _ kongge _ $ "&"? "&" $ _ Kongge _ $ "&"! "&" $ _ Kongge _ $ "&"~ "&" $ _ Kongge _ $ "&" ("&" $ _ kongge _ $
"&") "&" $ _ Kongge _ $ "&" <"&" $ _ kongge _ $ "&"> "&" $ _ kongge _ $ "&" ["&" $ _ kongge _ $ "&"] "&" $ _ kongge _ $ "&"{"&"
$ _ Kongge _ $ "&"} "&" $ _ kongge _ $ "&": "&" $ _ kongge _ $ "&"; "&" $ _ kongge _ $ "&". "&" $ _ kongge _ $ "&"/"&" $ _ kongg
E _ $ "&" \ "&" $ _ kongge _ $ "&" ^ "&" $ _ kongge _ $ "&" * "&" $ _ kongge _ $" & "@" & "$ _ kongge _ $" & "$ _ kongge _ $" & "|
"'Specifies all space characters separated by $ _ kongge _ $. Here, spaces specify English spaces and Chinese spaces.
Heihack = "***" 'to replace the dirty words

'================================================ ====================
'Dirty database V1.0-20080609. The following figure shows all dirty databases:

Ivv = 0
ICC = 0
Zang_data (ivv,) = "Kill | Sha | sa | dry | Gan" 'if both the kill and the dead word exist, and the number of characters between the two characters is less than or
Equivalent to the value specified by the corresponding zzang_data (AA, YY, 1), it is considered as a dirty word
Zang_data (ivv, ICC, 0) = "Dead | Si | Shi"
Zang_data (ivv, ICC, 1) = 0
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Drop"
Zang_data (ivv, ICC, 1) = 0
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "up"
Zang_data (ivv, ICC, 1) = 0

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "put | ba"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Kill | Sha | sa | dry" ': Kill ...... five or less strings separated
Zang_data (ivv, ICC, 1) = 5

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "| Qu"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "kill" 'pulls out to kill or kill... four or Less strings
Zang_data (ivv, ICC, 1) = 4

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Fuck | Day | by | Ri | Cao | grass | Kao | dry | Gan | gang | Jie | Jian | rape"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "you" 'Fuck your mom, fuck you ,.....
Zang_data (ivv, ICC, 1) = 0
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Ma | mom" 'may be Nima, Ma, Tama ,... therefore, the corresponding zang_data (AA, YY, 1)
2
Zang_data (ivv, ICC, 1) = 2
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Ni"
Zang_data (ivv, ICC, 1) = 0
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "she" 'may be fuck her, fuck her, fuck Si, so zang_data (AA, YY, 1) corresponding to her is specified as 2
Zang_data (ivv, ICC, 1) = 2
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "he" 'may be dead, fuck him, fuck Si, so zang_data (AA, YY, 1) corresponding to him is specified as 2
Zang_data (ivv, ICC, 1) = 2
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "it" 'may be used to fuck it, fuck it, fuck si it, so the corresponding zang_data (AA, YY, 1) is specified as 2
Zang_data (ivv, ICC, 1) = 2
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "ta" 'may be dead Ta, fuck Ta, fuck Sita, so the zang_data (AA, YY, 1) corresponding to it is specified as 2
Zang_data (ivv, ICC, 1) = 2
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Niang | Niang"
Zang_data (ivv, ICC, 1) = 2
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "B | forced" 'grass you B
Zang_data (ivv, ICC, 1) = 2
'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "I | wo"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Fuck | Day | by | Ri | Cao | grass | Kao | dry | Gan | gang | Jie | Jian | rape | kill | destroy"
Zang_data (ivv, ICC, 1) = 0

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv,) = "Fuck | Day | by | Ri | Cao | grass | Kao | rape"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "*"
Zang_data (ivv, ICC, 1) = 0

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "go to your mom | go to you | go to your ma"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "*"
Zang_data (ivv, ICC, 1) = 0

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "kill"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "*"
Zang_data (ivv, ICC, 1) = 0

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Your mom | you? | you ma | your mom"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "B | forced"
Zang_data (ivv, ICC, 1) = 1' your mom B, your mom B

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "sex"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "love" 'sexual love
Zang_data (ivv, ICC, 1) = 0

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Do | Zuo | do"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Love | ai"
Zang_data (ivv, ICC, 1) = 1

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Do | Zuo | do"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Love | ai"
Zang_data (ivv, ICC, 1) = 1

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "A | Mao | Grade 3 | Japan"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "slice | Pian"
Zang_data (ivv, ICC, 1) = 2
'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "AV | sex"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "worker"
Zang_data (ivv, ICC, 1) = 20

'-----------------------------
Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Japan"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "*"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "| see"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Level 3"
Zang_data (ivv, ICC, 1) = 3
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "find"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "miss"
Zang_data (ivv, ICC, 1) = 2
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Evening"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "miss"
Zang_data (ivv, ICC, 1) = 12
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "silly | Sha | sa | what | S"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "B | ratio | forced"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "S"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "B"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "abnormal"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "kill"
Zang_data (ivv, ICC, 1) = 15
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "person"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "Slag"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "bytes"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "bytes"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Huan | Huang | yellow"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "color | se"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "Ma | Mom"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "B | ratio | forced"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------

Ivv = ivv + 1
ICC = 0
Zang_data (ivv, 0, 0) = "engage | GAO"
ICC = ICC + 1
Zang_data (ivv, ICC, 0) = "B | ratio | forced"
Zang_data (ivv, ICC, 1) = 0
'-----------------------------