Angariar fundos para cobrir os custos logísticos do "Festival da Arte Capoeira" e apoiar o projeto Eu Sou Ninja em sua missão de promover a integração social e cultural na comunidade de Jacaraípe. Com a criação da rifa, buscamos envolver a comunidade de forma ativa no financiamento do evento, permitindo que todos contribuam para o sucesso do festival e para a continuidade das atividades do projeto. Prêmio: Copia da minha biblioteca pessoal de AdvPL/TLpp ..etc Participe da Rifa Eu já contribui. Só falta você! ```cmd Pasta de C:\GitHub\naldodj-tlpp 13/04/2024 19:17 . 19/03/2024 13:49 .. 05/01/2024 12:22 2.742 .gitattributes 14/11/2023 16:02 83 .gitignore 02/12/2023 20:08 .vscode 05/01/2024 12:05 bin 13/04/2024 19:18 4.121 ChangeLog.txt 27/12/2023 02:05 include 14/11/2023 16:02 27.030 LICENSE.txt 14/11/2023 16:02 0 makepatch.lst 14/11/2
Um pequeno exemplo: 1 #DEFINE N_9REPLICATE 0100 2 #DEFINE N_IPCSLEEP 0500 3 #DEFINE N_IPCTHREADS 5 4 #DEFINE N_GLBLOCK 0 5 6 Static __c9Replicate : = Replicate( " 9 " ,N_9REPLICATE) 7 Static __c0Replicate : = Replicate( " 0 " ,N_9REPLICATE) 8 9 /* 10 Progama: uIPCMain.prg 11 Funcao: U_IPCMain 12 Autor: Marinaldo de Jesus [ http://www.blacktdn.com.br ] 13 Data: 21/11/2013 14 Descricao: Exemplo de uso das funcoes IPCGo e IPCWaitEx 15 */ 16 Function U_IPCMain() 17 Local aParameters : = Array(N_9REPLICATE) 18 Local nThreads : = N_IPCTHREADS 19 Local cGlbValue 20 aFill(aParameters, 9 ) 21 PutGlbValue( " U_IPCExec " ,__c9Replicate) 22 StartTIPC(nThreads) 23 While ( .NOT.( KillApp() ) .and. .NOT.( AllZeros() ) ) 24 IF ( N_GLBLOCK == 1 ) 25 While .NOT.( GlbLock() ) 26