Gestione del filtro anti abusi

Primissimo tentativo di individuare le citazioni senza fonte inserite. Esclusi: gli utenti esperti; le modifiche che aggiungono poco testo o contengono formule tipiche per la citazione delle fonti; le modifiche a sezioni che non siano "citazioni su/di". Necessario che si verifichi una delle ulteriori condizioni:

*Voci tematiche: le citazioni senza fonte aggiunte qui in genere si limitano ad avere un collegamento alla pagina dell'autore; se la pagina non esiste la citazione è certamente senza fonte (idea per la verifica dell'esistenza dal filtro 163 di en.wiki).

*Voci su persone: spesso vengono aggiunte citazioni senza fonti nel paragrafo "Senza fonte".  

**Disabilitata la variabile old_html, trovare un'altra soluzione.  

**( ("([[" in added_lines) & ('class="new"' in new_html) & ( count('class="new"', new_html) > count('class="new"', old_html) ) )

--Nemo

Attivo senza effetti per una primissima idea del funzionamento. --Nemo

Disattivo per poi esaminare i risultati... --Nemo

Escludo i film. --Nemo

Corretta una negazione. --Nemo

Aggiunta una condizione per verificare che le righe aggiunte siano una citazione (almeno, un punto in un elenco puntato). --Nemo

Escludo le voci tematiche (usando l'apposito template; altrimenti si può usare il piú lungo !(new_wikitext rlike "(?m)^Citazioni su((l|lo|la|i|gli|le) |ll\')\'\'\'") ), aggiungo le nuove voci non wikificate (senza elenco puntato) e indento un po'. --Nemo

Sostituisco l'analisi dell'oggetto coll'analisi delle righe aggiunte. Falsi positivi individuati: interprogetto http://it.wikiquote.org/?diff=302847 e aggiunta o spostamento di interi paragrafi http://it.wikiquote.org/?diff=302898. Attivo comunque senza effetti per verificare il funzionamento su un campione piú ampio. --Nemo

!(user_editcount > 1000) &

!("sysop" in user_groups) &

(article_namespace == 0) &

(edit_delta > 25) &

!("\[\[categor(y|ia):film" in lcase(old_wikitext)) &

!("\{\{voce tematica\}\}" in new_wikitext) &

(

(added_lines rlike "(?m)^\*.+$")

) &

!(rmwhitespace(new_wikitext) == rmwhitespace(old_wikitext)) &

(

(!("/*" in summary) & (rmwhitespace(new_wikitext) rlike rmwhitespace(".*\'\'\'[^=]+" + added_lines))) |

(rmwhitespace(new_wikitext) rlike rmwhitespace("== *Citazioni[^=]*==[^=]+" + added_lines)) |

(rmwhitespace(new_wikitext) rlike rmwhitespace("== *Senza fonte *==[^=]+" + added_lines))

) &

!("da ''" in added_lines) &

!("citato in" in added_lines) &

!("<ref" in added_lines)