Daily Archives: 2008/03/21

Sobre a Professora Brutalizada na Escola Carolina Michaelis

Este vídeo (retirado e recolocado no Youtube vezes sem conta) tem lançado a polémica sobre o tema da insegurança nas Escolas, e sobretudo, do bullying. Na verdade, o episódio em si, nada tem de único ou de exemplar, repetindo-se até à exaustão em praticamente todas as escolas deste país, de norte a sul, passando pelas zonas mais abastadas e atravessando as mais carenciadas. O fenómeno não é novo… Nova é apenas a exposição mediática trazida pela paradoxal utilização de um telemóvel para filmar um episódio que decorre em torno do uso abusivo de um outro telemóvel. Mais paradoxal seria ainda se houvesse um segundo vídeo, de um segundo telemóvel que filma o primeiro telemóvel que filma o triste episódio…  Adiante.

Curiosamente, o episódio não conforma com os habituais padrões: o agressor não é um adolescente do sexo masculino, não pertence a nenhuma minoria  étnica e, sobretudo, o episódio não decorre em nenhum bairro problemático dos subúrbios de Lisboa, mas decorre com uma rapariga de 15 anos, caucasiana e, na cidade do Porto. Por este desfasamento, indica que o fenómeno do desrespeito pelo estatuto do Professor, que a cultura de impunidade e de laxismo dos pais e da própria Escola é mais alargada e generalizada do que gostaríamos de crer.

O que fazer? Aqui, como em todas as questões importantes, não haverá uma resposta única… Importa desde logo – no curto prazo – agilizar os mecanismos de reacção disciplinar e aplicá-los com exemplar rigôr. É que as Regras existem para ser aplicadas e o Exemplo da sua aplicação é sempre a melhor forma de pedagogia para as mesmas e para a própria vida futura destes e de outros adolescente… A habitual permissividade invocada por alguma Esquerda não pode ser aqui aplicada, sob pena de incentivar mais e mais fenómenos semelhantes… A dureza “policial” alegada pela Direita como a melhor solução é também ela uma forma parcelar e redutora de abordar um problema que antes do mais começa na Família e, antes dela, na própria Empresa que exige aos pais uma dedicação horária crescente e claramente antagónica da estabilidade familiar e da sua própria competência como pais…

A Escola não é o lugar onde se deve ensinar Disciplina e Respeito pelos Outros às crianças e adolescentes. Esse lugar e essa missão é a das Famílias. Mas não deve ser também o lugar onde reina a impunidade e o laxismo.

Categories: Educação, Portugal, Sociedade Portuguesa | 32 comentários

Acordium: Acordo Ortográfico: oferta de conversor

Como é sabido, o MIL: MOVIMENTO INTERNACIONAL LUSÓFONO tem como um dos seus fundamentais princípios a defesa da implementação do Acordo Ortográfico.


Neste sentido desenvolvemos uma aplicação VBA (Visual Basic for Applications) que consegue procurar e substituir as palavras em documentos Word 2000 e 2007 que no âmbito do Acordo Ortográfico foram alteradas (p.ex. Acta->Ata;Recepção->Receção), criando um ficheiro de registo contendo as palavras alteradas, o total de palavras e a percentagem das palavras alteradas dentro deste total.

O programa utiliza uma tabela de equivalências no seguinte formato:
Palavra-antes-do-Acordo;Palavra-depois-do-Acordo

Que é de edição livre (mantendo o nome de ficheiro: “tabelaacordo1990.txt”, podendo as palavras aqui constantes serem alteradas, apagadas, adicionadas, etc.

Em anexo segue o ficheiro Acordium.zip (Acordium, de “Acordo” e “ium” porque gostamos de latinismos…) que contêm: Tabelacordo1990.txt (a tabela de palavras)
Acordium2000.doc (o doc Word2000 com o VBA de conversão)

Acordium2007.docm (o doc Word2007 com o VBA de conversão)
Para executar basta abrir o .doc ou .docm (consoante a versão de Word) e seguir as instruções.

O programa que segue em anexo é oferecido sem garantia nem responsabilidade sobre eventuais danos que possa criar. O VBA pode ser editado e alterado livremente, pedimos contudo que mantenham a referência ao MIL. Para questões técnicas relacionadas com o mesmo queiram contactar rmartins@movimentolusofono.org

MIL: MOVIMENTO INTERNACIONAL LUSÓFONO
Comissão Coordenadora


Nota de apresentação: O MIL: MOVIMENTO INTERNACIONAL LUSÓFONO é um movimento cultural e cívico recentemente criado, em associação com a NOVA ÁGUIA: REVISTA DE CULTURA PARA O SÉCULO XXI, projecto que conta já com cerca de meio milhar de adesões, de todos os países lusófonos.
A Comissão Coordenadora é presidida pelo Professor Doutor Paulo Borges (Universidade de Lisboa), Presidente da Associação Agostinho da Silva (sede do MIL).
A lista de adesões é pública – como se pode confirmar no nosso blogue (
novaaguia.blogspot.com), são pessoas das mais diversas orientações culturais, políticas e religiosas, pessoas dos mais diferentes locais do país e de fora dele.

Se quiser aderir ao MIL, basta enviar um mail: adesao@movimentolusofono.org
Indicar: nome, e-mail e área de residência.
Petição EM PROL DE UMA MAIS RÁPIDA IMPLEMENTAÇÃO DO ACORDO ORTOGRÁFICO:
http://www.gopetition.com/online/17740.html
Petição POR UMA FORÇA LUSÓFONA DE MANUTENÇÃO DE PAZ:
http://www.PetitionOnline.com/mil1001/petition.html


MIL: MOVIMENTO INTERNACIONAL LUSÓFONO
ÓRGÃO: NOVA ÁGUIA (novaaguia.blogspot.com)
SEDE: ASSOCIAÇÃO AGOSTINHO DA SILVA (Rua do Jasmim, 11, 2º – 1200-228 Lisboa; E-Mail: AgostinhodaSilva@mail.pt; Tel.: 21 3422783 / 96 7044286; http: www.agostinhodasilva.pt; NIF: 503488488; NIB: 0033 0000 2238 0019 8497 2)

Para receber o ficheiro Acordium.zip envie por favor uma mensagem de correio electrónico para:

geral@movimentolusofono.org

Categories: CodeFarmPt, Informática, Movimento Internacional Lusófono, Portugal | Etiquetas: , , | 2 comentários

Acordium: Um programa em VBA para Word2000 que torna um documento em Word de acordo com o Acordo Ortográfico de 1990

Public mudadas As Integer
Private Declare Function GetOpenFileName Lib “comdlg32.dll” Alias “GetOpenFileNameA” _
(pOpenfilename As OpenFileName) As Long

Private Type OpenFileName
lStructSize As Long
hwndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilter As String
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type
Public Sub AutoOpen()

Application.ScreenUpdating = False
‘ turns off screen updating
Application.DisplayStatusBar = True
‘ makes sure that the statusbar is visible
Application.StatusBar = “Acordium – Um programa do http://www.movimentolusofono.org”

MsgBox “Vai ser executado o Acordium Versão 1001 (para Word200) – Um programa oferecido pelo MIL” & Chr(13) & Chr(13) & “(Movimento Internacional Lusófono – http://www.movimentolusofono.org)” & Chr(13) & Chr(13) & “Para facilitar a conversão de documentos em Word para a nova norma do Acordo Ortográfico de 1990.” & Chr(13) & Chr(13) & “Este programa usa uma tabela válida apenas para a norma lusoafricana, não para a norma culta brasileira.”

Call AcordiumVer1001
End Sub

Sub AcordiumVer1001()

Call MainAcordium

Application.StatusBar = False

End Sub

Function BrowseForFile(sInitDir As String, _
Optional ByVal sFileFilters As String, _
Optional sTitle As String = “Open File”, _
Optional lParentHwnd As Long) As String

Dim tFileBrowse As OpenFileName
Const clMaxLen As Long = 254

tFileBrowse.lStructSize = Len(tFileBrowse)

‘Replace friendly deliminators with nulls
sFileFilters = Replace(sFileFilters, “|”, vbNullChar)
sFileFilters = Replace(sFileFilters, “;”, vbNullChar)
If Right$(sFileFilters, 1) <> vbNullChar Then
‘Add final delimiter
sFileFilters = sFileFilters & vbNullChar
End If

‘Select a filter
tFileBrowse.lpstrFilter = sFileFilters & _
“All Files (*.*)” & vbNullChar & “*.*” _
& vbNullChar
‘create a buffer for the file
tFileBrowse.lpstrFile = String(clMaxLen, ” “)
‘set the maximum length of a returned file
tFileBrowse.nMaxFile = clMaxLen + 1
‘Create a buffer for the file title
tFileBrowse.lpstrFileTitle = Space$(clMaxLen)
‘Set the maximum length of a returned file title
tFileBrowse.nMaxFileTitle = clMaxLen + 1
‘Set the initial directory
tFileBrowse.lpstrInitialDir = sInitDir
‘Set the parent handle
tFileBrowse.hwndOwner = lParentHwnd
‘Set the title
tFileBrowse.lpstrTitle = sTitle

‘No flags
tFileBrowse.flags = 0

‘Show the dialog
If GetOpenFileName(tFileBrowse) Then
BrowseForFile = Trim$(tFileBrowse.lpstrFile)
If Right$(BrowseForFile, 1) = vbNullChar Then
‘Remove trailing null
BrowseForFile = Left$(BrowseForFile, _
Len(BrowseForFile) – 1)
End If
End If
End Function

Sub MainAcordium()

Const ForReading = 1, ForWriting = 2
mudadas = 0

Set fso = CreateObject(“Scripting.FileSystemObject”)

Set TabelaAcordo1990 = fso.OpenTextFile(“c:\tabelaacordo1990.txt”, ForReading)
Set LogAcordo1990 = fso.CreateTextFile(“c:\Logacordo1990.txt”)
LogAcordo1990.Close

Dim WordCount As Long
Dim myRange As Range

Documents.Open FileName:=BrowseForFile(“c:\”, “Ficheiro Word 2000/2007 (*.*);*.*”, “Abrir Documento”), ConfirmConversions:=False, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:=””, _
PasswordTemplate:=””, Revert:=False, WritePasswordDocument:=””, _
WritePasswordTemplate:=””, Format:=wdOpenFormatAuto

Set myRange = ActiveDocument.Range

Selection.HomeKey Unit:=wdStory
totalpalavras = myRange.ComputeStatistics(wdStatisticWords)

Do Until TabelaAcordo1990.AtEndOfStream

ReadLineTextFile = TabelaAcordo1990.ReadLine
arrServiceList = Split(ReadLineTextFile, “;”)

de = arrServiceList(0)
para = arrServiceList(1)

Call FindReplace(de, para)

Loop

Set r2LogAcordo1990 = fso.OpenTextFile(“c:\LogAcordo1990.txt”, 8)

perc = mudadas * 100 / totalpalavras

perc = Round(perc, 2)

r2LogAcordo1990.WriteLine (“Total de Palavras neste documento: ” & CStr(totalpalavras))
r2LogAcordo1990.WriteLine (“Palavras adaptadas consoante Acordo de 1990: ” & CStr(mudadas))
r2LogAcordo1990.WriteLine (“Percentagem de palavras adaptadas consoante Acordo de 1990: ” & CStr(perc) & “%”)

r2LogAcordo1990.Close

Documents.Open FileName:=”c:\Logacordo1990.txt”, ConfirmConversions:=False, _
ReadOnly:=True, AddToRecentFiles:=False, PasswordDocument:=””, _
PasswordTemplate:=””, Revert:=False, WritePasswordDocument:=””, _
WritePasswordTemplate:=””, Format:=wdOpenFormatAuto

MsgBox “Fim de Execução do Acordium! Foram convertidas ” & CStr(mudadas) & ” palavra(s)” & Chr(13) & Chr(13) & “Tem agora aberto o ficheiro de registo de execução <LogAcordo1990.txt> com as alterações e percentagem das mesmas.” & Chr(13) & Chr(13) & “Tem também aberto o documento Word onde estas foram aplicadas. Se as aceitar, grave o documento com Save ou SaveAs.” & Chr(13) & Chr(13) & ” Acordium1001 – Um programa gratuito produzido pelo MIL (Movimento Internacional Lusófono) ” & Chr(13) & Chr(13) & ” http://www.movimentolusofono.org&#8221;

Set objShell = CreateObject(“Wscript.Shell”)

intMessage = MsgBox(“Que visitar a página do MIL – Movimento Lusófono que criou este programa?”, _
vbYesNo, “Access Denied”)

If intMessage = vbYes Then
objShell.Run (“http://www.movimentolusofono.org&#8221;)
End If

End Sub

Sub FindReplace(de, para)

Set fso = CreateObject(“Scripting.FileSystemObject”)
Const ForReading = 1, ForWriting = 2

primeira = “sim”

Set rLogAcordo1990 = fso.OpenTextFile(“c:\LogAcordo1990.txt”, 8)

Selection.HomeKey Unit:=wdLine

While Selection.Find.Found = True Or primeira = “sim”

Selection.Find.Forward = True
Selection.Find.Wrap = wdFindStop

Selection.HomeKey Unit:=wdLine

With Selection.Find
.Text = de
.Replacement.Text = para

.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = True
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With

Selection.Find.Execute Replace:=WdReplace.wdReplaceOne

If Selection.Find.Found = True Then
mudadas = mudadas + 1
rLogAcordo1990.WriteLine (“De: <” & de & “> Para: <” & para & “>”)
End If

primeira = “não”
Wend

rLogAcordo1990.Close

End Sub

Recordo entretanto que esta Petição continua a recolher assinaturas!

Categories: Brasil, Informática, Movimento Internacional Lusófono, Portugal | Etiquetas: , | Deixe um comentário

Acordium: Um programa em VBA para Word2007 que torna um documento em Word de acordo com o Acordo Ortográfico de 1990

Public mudadas As Long
Private Declare Function GetOpenFileName Lib “comdlg32.dll” Alias “GetOpenFileNameA” _
(pOpenfilename As OpenFileName) As Long

Private Type OpenFileName
lStructSize As Long
hwndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilter As String
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type
Public Sub AutoOpen()

Application.ScreenUpdating = False
‘ turns off screen updating
Application.DisplayStatusBar = True
‘ makes sure that the statusbar is visible
Application.StatusBar = “Acordium – Um programa do http://www.movimentolusofono.org&#8221;

MsgBox “Vai ser executado o Acordium Versão 1001 – Um programa oferecido pelo MIL” & Chr(13) & Chr(13) & “(Movimento Internacional Lusófono – http://www.movimentolusofono.org)” & Chr(13) & Chr(13) & “Para facilitar a conversão de documentos em Word para a nova norma do Acordo Ortográfico de 1990.” & Chr(13) & Chr(13) & “Este programa usa uma tabela válida apenas para a norma lusoafricana, não para a norma culta brasileira.”

Call AcordiumVer1001
End Sub

Sub AcordiumVer1001()

Call MainAcordium

Application.StatusBar = False

End Sub

Function BrowseForFile(sInitDir As String, _
Optional ByVal sFileFilters As String, _
Optional sTitle As String = “Open File”, _
Optional lParentHwnd As Long) As String

Dim tFileBrowse As OpenFileName
Const clMaxLen As Long = 254

tFileBrowse.lStructSize = Len(tFileBrowse)

‘Replace friendly deliminators with nulls
sFileFilters = Replace(sFileFilters, “|”, vbNullChar)
sFileFilters = Replace(sFileFilters, “;”, vbNullChar)
If Right$(sFileFilters, 1) <> vbNullChar Then
‘Add final delimiter
sFileFilters = sFileFilters & vbNullChar
End If

‘Select a filter
tFileBrowse.lpstrFilter = sFileFilters & _
“All Files (*.*)” & vbNullChar & “*.*” _
& vbNullChar
‘create a buffer for the file
tFileBrowse.lpstrFile = String(clMaxLen, ” “)
‘set the maximum length of a returned file
tFileBrowse.nMaxFile = clMaxLen + 1
‘Create a buffer for the file title
tFileBrowse.lpstrFileTitle = Space$(clMaxLen)
‘Set the maximum length of a returned file title
tFileBrowse.nMaxFileTitle = clMaxLen + 1
‘Set the initial directory
tFileBrowse.lpstrInitialDir = sInitDir
‘Set the parent handle
tFileBrowse.hwndOwner = lParentHwnd
‘Set the title
tFileBrowse.lpstrTitle = sTitle

‘No flags
tFileBrowse.flags = 0

‘Show the dialog
If GetOpenFileName(tFileBrowse) Then
BrowseForFile = Trim$(tFileBrowse.lpstrFile)
If Right$(BrowseForFile, 1) = vbNullChar Then
‘Remove trailing null
BrowseForFile = Left$(BrowseForFile, _
Len(BrowseForFile) – 1)
End If
End If
End Function

Sub MainAcordium()

Const ForReading = 1, ForWriting = 2
mudadas = 0

Set fso = CreateObject(“Scripting.FileSystemObject”)

Set TabelaAcordo1990 = fso.OpenTextFile(“c:\tabelaacordo1990.txt”, ForReading)
Set LogAcordo1990 = fso.CreateTextFile(“c:\Logacordo1990.txt”)
LogAcordo1990.Close

Dim WordCount As Long
Dim myRange As Range

Documents.Open FileName:=BrowseForFile(“c:\”, “Ficheiro Word 2000/2007 (*.*);*.*”, “Abrir Documento”), ConfirmConversions:=False, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:=””, _
PasswordTemplate:=””, Revert:=False, WritePasswordDocument:=””, _
WritePasswordTemplate:=””, Format:=wdOpenFormatAuto, XMLTransform:=””

Set myRange = ActiveDocument.Range

Selection.HomeKey Unit:=wdStory
totalpalavras = myRange.ComputeStatistics(wdStatisticWords)

Do Until TabelaAcordo1990.AtEndOfStream

ReadLineTextFile = TabelaAcordo1990.ReadLine
arrServiceList = Split(ReadLineTextFile, “;”)

de = arrServiceList(0)
para = arrServiceList(1)

Call FindReplace(de, para)

Loop

Set r2LogAcordo1990 = fso.OpenTextFile(“c:\LogAcordo1990.txt”, 8)

perc = mudadas * 100 / totalpalavras

perc = Round(perc, 2)

r2LogAcordo1990.WriteLine (“Total de Palavras neste documento: ” & CStr(totalpalavras))
r2LogAcordo1990.WriteLine (“Palavras adaptadas consoante Acordo de 1990: ” & CStr(mudadas))
r2LogAcordo1990.WriteLine (“Percentagem de palavras adaptadas consoante Acordo de 1990: ” & CStr(perc) & “%”)

r2LogAcordo1990.Close

Documents.Open FileName:=”c:\Logacordo1990.txt”, ConfirmConversions:=False, _
ReadOnly:=True, AddToRecentFiles:=False, PasswordDocument:=””, _
PasswordTemplate:=””, Revert:=False, WritePasswordDocument:=””, _
WritePasswordTemplate:=””, Format:=wdOpenFormatAuto, XMLTransform:=””

MsgBox “Fim de Execução do Acordium! Foram convertidas ” & CStr(mudadas) & ” palavra(s)” & Chr(13) & Chr(13) & “Tem agora aberto o ficheiro de registo de execução <LogAcordo1990.txt> com as alterações e percentagem das mesmas.” & Chr(13) & Chr(13) & “Tem também aberto o documento Word onde estas foram aplicadas. Se as aceitar, grave o documento com Save ou SaveAs.” & Chr(13) & Chr(13) & ” Acordium1001 – Um programa gratuito produzido pelo MIL (Movimento Internacional Lusófono) ” & Chr(13) & Chr(13) & ” http://www.movimentolusofono.org&#8221;

Set objShell = CreateObject(“Wscript.Shell”)

intMessage = MsgBox(“Que visitar a página do MIL – Movimento Lusófono que criou este programa?”, _
vbYesNo, “Access Denied”)

If intMessage = vbYes Then
objShell.Run (“http://www.movimentolusofono.org&#8221;)
End If

End Sub

Sub FindReplace(de, para)

Set fso = CreateObject(“Scripting.FileSystemObject”)
Const ForReading = 1, ForWriting = 2

primeira = “sim”

Set rLogAcordo1990 = fso.OpenTextFile(“c:\LogAcordo1990.txt”, 8)

Selection.HomeKey Unit:=wdLine
Application.StatusBar = “Procurando por: <” & para & “>”
While Selection.Find.Found = True Or primeira = “sim”

With Selection.Find
.Text = de
.Replacement.Text = para

.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = True
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With

Selection.Find.Execute Replace:=wdReplaceOne

primeira = “não”

Selection.Find.Forward = True
Selection.Find.Wrap = wdFindStop

Selection.HomeKey Unit:=wdLine

If Selection.Find.Found = True Then

mudadas = mudadas + 1
rLogAcordo1990.WriteLine (“De: <” & de & “> Para: <” & para & “>”)
End If
Wend

rLogAcordo1990.Close

End Sub

Recordo entretanto que esta Petição continua a recolher assinaturas!

Categories: Brasil, Informática, Movimento Internacional Lusófono, Portugal | Etiquetas: , | Deixe um comentário

Lista total (?) de palavras da norma culta lusoafricana que são modificadas pelo Acordo Ortográfico de 1990

Palavra Pré-Acordo;Palavra Pós-Acordo

hei-de;hei de
Hei-de;Hei de
hás-de;hás de
Hás-de;Hás de
há-de;há de
Há-de;Há de
heis-de;heis de
Heis-de;Heis de
hão-de;hão de
Hão-de;Hão de
Norte;norte
Sul;sul
Oeste;oeste
Nordeste;sordeste
Noroeste;noroeste
Sudeste;sudeste
Sueste;sueste
Sudoeste;sudoeste
És-nordeste;és-nordeste
És-sudeste;és-sudeste
És-sueste;és-sueste
Nor-noroeste;nor-noroeste
Oés-noroeste;oés-noroeste
Oés-sudoeste;oés-sudoeste
Su-sudeste;su-sudeste
Su-sueste;su-sueste
Su-sudoeste;su-sudoeste
Fulano;fulano
Fulana;fulana
Fulanos;fulanos
Fulanas;fulanas
Beltrano;beltrano
Beltranos;beltranos
Sicrano;sicrano
Sicranos;sicranos
abstraccionismo;abstracionismo
abstraccionismos;abstracionismos
Abstraccionismo;Abstracionismo
Accionamento;Acionamento
Accionamentos;Acionamentos
Abstraccionismo;Abstracionismo
abstraccionismo;abstracionismo
abstraccionismos;abstracionismos
Abstraccionismos;Abstracionismos
accionamento;acionamento
Accionamento;Acionamento
Accionamentos;Acionamentos
accionamentos;acionamentos
coleccionador;colecionador
coleccionadores;colecionadores
Coleccionador;Colecionador
Coleccionadores;Colecionadores
confeccionar;cofecionar
Confeccionar;Cofecionar
Direccional;Direcional
Direccionais;Direcionais
direccional;direcional
direccionais;direcionais
Fraccionar;Fracionar
Fraccionais;Fracionais
fraccionar;fracionar
fraccionais;fracionais
Leccionar;Lecionar
Leccionais;Lecionais
leccionar;lecionar
leccionais;lecionais
Protectional;Protecional
Protectionais;Protecionais
protectional;protecional
Seleccionamento;Selecionamento
Seleccionamentos;Selecionamentos
seleccionamento;selecionamento
seleccionamentos;selecionamentos
Transaccionado;Transacionado
Transaccionados;Transacionados
transaccionado;transacionado
transaccionados;transacionados
Acção;Ação
Acções;Ações
acção;acção
acções;acções
Colecção;Coleção
Colecções;Coleções
colecção;coleção
colecções;coleções
Contracção;Contração
Contracções;Contrações
contracção;contração
contracções;contrações
Correcção;Correcção
Correcções;Correcções
correcção;correcção
correcções;correcções
Detecção;Deteção
Detecções;Deteções
detecção;deteção
detecções;deteções
Direcção;Direção
Direcções;Direções
direcção;direção
direcções;direções
Distracção;Distração
Distracções;Distrações
distracção;distração
distracções;distrações
Ejecção;Ejeção
Ejecções;Ejeções
ejecção;ejeção
ejecções;ejeções
Erecção;Ereção
Erecções;Ereções
erecções;ereções
Extracção;Extração
Extracções;Extrações
extracção;extração
extracções;extrações
Fracção;Fração
Fracções;Frações
Infracção;Infração
Infracções;Infrações
Injecção;Injeção
Injecções;Injeções
Objecção;Objeção
Objecções;Objeções
Projecção;Projeção
Projecções;Projeções
Protecção;Proteção
Protecções;Proteções
Reacção;Reação
Reacções;Reações
Selecção;Seleção
Selecções;Seleções
Acta;Ata
Actas;Atas
Activar;Ativar
activar;ativar
activares;ativares
Activares;Ativares
Actor;Ator
Actores;Atores
actor;ator
actores;atores
Actual;Atual
actual;atual
Actuais;Atuais
actuais;atuais
Adjectivo;Adjetivo
adjectivo;adjetivo
adjectivos;adjetivos
Adjectivos;Adjetivos
Afecto;Afeto
Afectos;Afetos
afecto;afeto
afectos;afetos
Arquitectura;Arquitetura
Arquitecturas;Arquiteturas
arquitectura;arquitetura
arquitecturas;arquiteturas
Colectivo;Coletivo
colectivo;coletivo
Colectivos;Coletivos
colectivos;coletivos
Correcto;Correto
Correctos;Corretos
correcto;correto
correctos;corretos
Defectivo;Defetivo
defectivo;defetivo
Defectivos;Defetivos
defectivos;defetivos
Detectar;Detetar
Detectas;Detetas
Detectai;Detetai
Detectais;Detetais
Dialecto;Dialeto
Dialectos;Dialetos
Directo;Direto
directo;direto
directos;diretos
Directos;Diretos
Director;Diretor
Directores;Diretores
director;diretor
directores;diretores
Eléctrico;Elétrico
Eléctricos;Elétricos
eléctrico;elétrico
eléctricos;elétricos
Espectáculo;Espetáculo
Espectáculos;Espetáculos
espectáculo;espetáculo
espectáculos;espetáculos
Exactamente;Exatamente
exactamente;exatamente
Lectivo;Letivo
lectivo;letivo
Lectiva;Letiva
lectiva;letiva
Objectivo;Objetivo
objectivo;objetivo
Objectivos;Objetivos
objectivos;objetivos
Objectiva;Objetiva
Objectivas;Objetivas
objectiva;objetiva
objectivas;objetivas
Objecto;Objeto
Objectos;Objetos
objecto;objeto
objectos;objetos
Projecto;Projeto
Projectos;Projetos
projecto;projeto
projectos;projetos
Reflectir;Refletir
reflectir;refletir
Reflectires;Refletires
reflectires;refletires
Tecto;Teto
tecto;teto
Tectos;Tetos
tectos;tetos
Anticoncepcional;Anticoncecional
anticoncepcional;anticoncecional
Anticoncepcionais;Anticoncecionais
anticoncepcionais;anticoncecionais
Decepcionante;Dececionante
decepcionante;dececionante
Decepcionantes;Dececionantes
decepcionantes;dececionantes
Excepcional;Excecional
Excepcionais;Excecionais
excepcional;excecional
excepcionais;excecionais
Perccecionismo;Percecionismo
perccecionismo;percecionismo
Perccecionismos;Percecionismos
perccecionismos;percecionismos
Recepcionista;Rececionista
recepcionista;rececionista
Recepcionistas;Rececionistas
recepcionistas;rececionistas
Acepção;Aceção
acepção;aceção
Acepções;Aceções
acepções;aceções
Adopção;Adoção
adopção;adoção
Adopções;Adoções
adopções;adoções
Concepção;Conceção
concepção;conceção
Concepções;Conceções
concepções;conceções
Decepção;Deceção
Decepções;Deceções
Intercecção;Interceção
intercecção;interceção
Intercecções;Interceções
intercecções;interceções
Recepção;Receção
recepção;receção
recepções;receções
Egipto;Egito
Adopção;Adoção
adopção;adoção
Adopções;Adoções
adopções;adoções
Baptismo;Batismo
baptismo;batismo
Baptismos;Batismos
baptismos;batismos
Óptimo;Ótimo
Óptimos;Ótimos
Óptimo;Ótimo
óptimos;ótimos
optimismo;otimismo
Crêem;Creem
crêem;creem
Dêem;Deem
dêem;deem
Lêem;Leem
lêem;leem
Vêem;Veem
vêem;veem
Descrêem;Descreem
descrêem;descreem
Desdêem;Desdeem
desdêem;desdeem
Relêem;Releem
relêem;releem
Revêem;Reveem
revêem;reveem
pára;para
Pára;Para
péla;pela
Péla;Pela
Pélo;Pelo
pélo;pelo
pólo;polo
Pólo;Polo
côa;coa
Côa;Coa
côas;coas
Côas;Coas
pêra;pera
Pêra;Pera
pêras;peras
Pêras;Peras
pêro;pero
Pêro;Pero
pêros;peros
Pêros;Peros
Heróico;Heroico
heróico;heroico
Heróicos;Heroicos
heróicos;heroicos
asteróide;asteroide
Asteróide;Asteroide
Asteróides;Asteroides
asteróides;asteroides
carcinóide;carcinoide
Carcinóide;Carcinoide
carcinóides;carcinoides
Carcinóides;Carcinoides
esfenóide;esfenoide
Esfenóide;Esfenoide
esfenóides;esfenoides
Esfenóides;Esfenoides
espermatozóide;espermatozoide
Espermatozóide;Espermatozoide
espermatozóides;espermatozoides
Espermatozóides;Espermatozoides
etmóide;etmoide
Etmóide;Etmoide
etmóides;etmoides
Etmóides;Etmoides
Ictióide;Ictioide
ictióide;ictioide
Ictióides;Ictioides
ictióides;ictioides
jibóia;jiboia
Jibóia;Jiboia
jibóias;jiboias
Jibóias;Jiboias
jóia;joia
Jóia;Joia
jóias;joias
Jóias;Joias
paleozóico;paleozoico
Paleozóico;Paleozoico
paleozóicos;paleozoicos
Paleozóicos;Paleozoicos
anti-religioso;antirreligioso
Anti-religioso;Antirreligioso
anti-religiosos;antirreligiosos
Anti-religiosos;Antirreligiosos
auto-rádio;autorrádio
Auto-rádio;Autorrádio
auto-rádios;autorrádios
Auto-rádios;Autorrádios
auto-serviço;autosserviço
Auto-serviço;Autosserviço
auto-serviços;autosserviços
Auto-serviços;Autosserviços
contra-reacção;contrarreação
Contra-reacção;Contrarreação
contra-reacções;contrarreações
Contra-reacções;Contrarreações
contra-relógio;contrarrelógio
Contra-relógio;Contrarrelógio
contra-relógios;contrarrelógios
Contra-relógios;Contrarrelógios
co-seno;cosseno
Co-seno;Cosseno
co-senos;cossenos
Co-senos;Cossenos

Correcto;Correto

correcto;correto
micro-sistema;microssistema
Micro-sistema;Microssistema
micro-sistemas;microssistemas
Micro-sistemas;Microssistemas
Mini-saia;Minissaia
mini-saia;minissaia
Mini-saias;Minissaias
mini-saias;minissaias
semi-selvagem;semisselvagem
Semi-selvagem;Semisselvagem
semi-selvagens;semisselvagens
Semi-selvagens;Semisselvagens
semi-recta;semirrecta
Semi-recta;Semirrecta
semi-rectas;semirrectas
Semi-rectas;Semirrectas
ultra-sónico;ultrassónico
Ultra-sónico;Ultrassónico
ultra-sónicos;ultrassónicos
Ultra-sónicos;Ultrassónicos
agro-industrial;agroindustrial
Agro-industrial;Agroindustrial
agro-industriais;agroindustriais
Agro-industriais;Agroindustriais
anti-aéreo;antiaéreo
Anti-aéreo;Antiaéreo
anti-aéreos;antiaéreos
Anti-aéreos;Antiaéreos
auto-estrada;autoestrada
Auto-estrada;Autoestrada
auto-estradas;autoestradas
Auto-estradas;Autoestradas
co-autor;coautor
Co-autor;Coautor
co-autores;coautores
Co-autores;Coautores
co-direcção;codireção
Co-direcção;Codireção
co-direcções;codireções
Co-direcções;Codireções
extra-escolar;extraescolar
Extra-escolar;Extraescolar
extra-escolares;extraescolares
Extra-escolares;Extraescolares
hidro-eléctrico;hidroeléctrico
Hidro-eléctrico;Hidroeléctrico
hidro-eléctricos;hidroeléctricos
Hidro-eléctricos;Hidroeléctricos
pluri-anual;plurianual
Pluri-anual;Plurianual
pluri-anuais;plurianuais
Pluri-anuais;Plurianuais
abençôo;abençoo
abençôa;abençoa
abençôas;abençoas
Abençôo;Abençoo
Abençôa;Abençoa
Abençôas;Abençoas
enjôo;enjoo
Enjôo;Enjoo
enjôa;enjoa
Enjôa;Enjoa
enjôas;enjoas
Enjôas;Enjoas
môo;moo
Môo;Moo
môa;moa
Môas;Moas
povôo;povoo
Povôo;Povoo
povôa;povoa
Povôas;Povoas
vôo;voo
Vôo;Voo
vôo;voo
Vôas;Voas
vôo;voo
vôas;vôas

Pedido:

Falta alguma palavra? Existe algum erro nesta lista? Por favor insira a sua correcção na caixa de comentários. Obrigado.

Esta informação serve de base a um programa em VBA Word que brevemente aparecerá por aqui…

Recordo entretanto que esta Petição continua a recolher assinaturas!

Categories: Educação, Movimento Internacional Lusófono, Portugal | Etiquetas: , , | 19 comentários

Site no WordPress.com.

Eleitores de Portugal (Associação Cívica)

Associação dedicada à divulgação e promoção da participação eleitoral e política dos cidadãos

Vizinhos em Lisboa

A Vizinhos em Lisboa tem em vista a representação e defesa dos interesses dos moradores residentes nas áreas, freguesias, bairros do concelho de Lisboa nas áreas de planeamento, urbanismo, valorização do património edificado, mobilidade, equipamentos, bem-estar, educação, defesa do património, ambiente e qualidade de vida.

Vizinhos do Areeiro

Núcleo do Areeiro da associação Vizinhos em Lisboa: Movimento de Vizinhos de causas locais e cidadania activa

Vizinhos do Bairro de São Miguel

Movimento informal, inorgânico e não-partidário (nem autárquico independente) de Vizinhos

TRAVÃO ao Alojamento Local

O Alojamento Local, o Uniplaces e a Gentrificação de Lisboa e Porto estão a destruir as cidades

Não aos Serviços de Valor Acrescentado nas Facturas de Comunicações !

Movimento informal de cidadãos contra os abusos dos SVA em facturas de operadores de comunicações

Vizinhos de Alvalade

Movimento informal, inorgânico e não-partidário (nem autárquico independente) de Vizinhos de Alvalade

anExplica

aprender e aprendendo

Subscrição Pública

Plataforma independente de participação cívica

Rede Vida

Just another WordPress.com weblog

Vizinhos do Areeiro

Movimento informal, inorgânico e não-partidário (nem autárquico independente) de Vizinhos do Areeiro

MDP: Movimento pela Democratização dos Partidos Políticos

Movimento apartidário e transpartidário de reforma da democracia interna nos partidos políticos portugueses

Operadores Marítimo-Turísticos de Cascais

Actividade dos Operadores Marítimo Turísticos de Cascais

MaisLisboa

Núcleo MaisDemocracia.org na Área Metropolitana de Lisboa

THE UNIVERSAL LANGUAGE UNITES AND CREATES EQUALITY

A new world with universal laws to own and to govern all with a universal language, a common civilsation and e-democratic culture.

looking beyond borders

foreign policy and global economy

O Futuro é a Liberdade

Discussões sobre Software Livre e Sociedade