thegoodfellas/blogset-br huggingface dataset:
A lei estadual no. 12.916/08, que proibe a eutanasia de animais sadios nos CCZs de Sao Paulo, parece que ainda nao pegou, assim como muitas leis brasileiras que nao sao cumpridas, ou porque nao ha fiscalizacao ou por serem mal-formuladas. Com isso, muitos caes e gatos sao sacrificados ou melhor, assassinados sem ter a chance de encontrar um lar responsavel.Camara de gas, enforcamento e tiros de pistola sao alguns dos metodos utilizados para sacrificar pets saudaveisCredito: Flickr/Creative Commons Adote um Amigo BHDe que adianta impedir a morte de seres inocentes, se nao ha politicas publicas efetivas para combater o aumento populacional de bichos de companhia? E preciso conscientizar a sociedade da guarda responsavel, promover uma ampla campanha de esterilizacao desses animais, mais feiras de doacao e punir com rigor os maus-tratos.E nao se pode mais ficar alienado as precarias condicoes que se encontram os abrigos municipais de todo o Brasil: falta de higiene e espaco, alimentos e remedios vencidos, caes e gatos sem tratamento adequado. Um mero deposito de animais com data marcada para morrer. Quando eles chegam aos CCZs, ha um periodo minimo de tres dias para a eutanasia, termo que nao pode ser aplicado a todos os abrigos, pois muitos animais morrem em camaras de gas ou descompressao, pauladas, tiros de pistola, eletrocussao ou por enforcamento.A OMS (Organizacao Mundial de Saude) ja concluiu, na decada de 1980, que nao ha evidencias de que o exterminio sistematico de caes seja a solucao para o fim da disseminacao da raiva. De acordo com a entidade, somente a vacinacao dos animais, e campanhas educacionais para a esterilizacao e a guarda responsavel sao eficazes, alem de menos onerosas aos cofres publicos.Entao fica a pergunta: quem ganha com a vigencia desse modelo caro, antigo, ineficaz e cruel de controle de zoonoses? Certamente, nao e a populacao, muito menos os animais que estao nas maos de donos irresponsaveis, que os abandonam como quem joga fora um utensilio incomodo e sem utilidade.Em abril de 2009, protetores fizeram uma manifestacao em frente ao CCZ da cidade de Sao Paulo. Na epoca, ja com a lei em vigencia, havia suspeitas de que caes e gatos estavam sendo sacrificados.Infelizmente, o slogan da manifestacao ainda vale: CCZ: Ou muda ou fecha. Milhares de caes foram vitimados pelas enchentes que vem castigando o estado de Minas Gerais.Para amparar parcela desses animais, foram doadas centenas de doses de anti-inflamatorio, da vacina Recombitek e do antipulgas Frontline, da Merial, ao Centro de Controle de Zoonoses (CCZ) da cidade de Conselheiro Lafaiete (MG). Outra doacao foi feita a WSPA - Sociedade Mundial de Protecao Animal, ONG parceria da empresa na campanha anual de vacinacao contra a cinomose em caes.Os produtos doados compoem, em conjunto, um completo programa sanitario para a prevencao e o combate das principais doencas que acometem os caes.Temos o compromisso com o bem-estar animal, seja no dia a dia, seja em ocasioes de desastres naturais como os que ocorreram em anos anteriores no Rio de Janeiro e em Santa Catarina, disse o medico veterinario Leonardo Brandao, gerente de vacinas da Merial.Somente neste
inicio de ano, foram 137 cidades em estado de emergencia por causa da chuva em Minas Gerais, segundo a Coordenadoria Estadual de Defesa Civil. Milhares de pessoas foram obrigadas a abandonar suas casas temporariamente e outras nao poderao voltar aos imoveis danificados pelas enchentes. Segundo a Defesa Civil, o numero de desalojados bateu os 46.970, enquanto o de desabrigados e de 3.145, um total de 50.115 pessoas fora de casa no estado.A WSPA organizou um estudo das areas que sofreram o maior impacto das chuvas nos animais de estimacao. Durante uma semana, dois especialistas em desastres da Costa Rica estiveram 24 municipios mineiros, a fim de diagnosticar a real situacao dos animais de pequeno e de grande porte da regiao.Com o objetivo de atender 6 mil animais nos 10 municipios que tiveram maior numero de animais domesticos afetados pelas inundacoes, a ONG entao colocou em pratica um plano de operacao nas cidades de Guidoval, Alem Paraiba, Dona Eusebia, Guiricema, Divinopolis, Congonhas, Mario Campos, Juatuba, Itabirito e Barbacena.Em 2011, a WSPA teve papel importante no resgate e tratamento de milhares de animais vitimas das chuvas no Rio de Janeiro. No total, foram distribuidas 13 toneladas de racao em 5 municipios. Cerca de 3 mil animais foram beneficiados com alimento e atendimento basico, 230 caes e gatos vacinados contra doencas, e foram esterilizados mais de 120 animais que vivem em areas de risco.
Rossi, um cachorrinho de um ano e tres meses, entrou numa fria. Como todo filhote com os olhos maiores que a boca, roubou um osso de nada menos que 15 cm e engoliu de uma so vez.O pequeno staffordshire bull terrier por sorte nao se sufocou com o objeto, que comecou a ferir seu estomago.Rossi: simpatico e travessoCredito: Hot Spot MediaSteven Hawthorn, de 44 anos, e dono de Rossi e conta que ele arrancou o osso inteiro do prato que estava sobre a mesa, assim que ele e sua familia sentaram-se para fazer a refeicao.Sua esposa Donna, de 35 anos, e seus filhos Lewis e Samuel, de 13 e 11 anos respectivamente, assistiram ao show de Rossi, que tem este nome em homenagem ao motociclista Valentino Rossi. Segundo eles, o pequeno faminto pulou sobre a mesa e devorou o pedaco em questao de instantes.Preocupado com a hipotese de o osso ficar preso na garganta do cao, Steven o levou para o hospital veterinario no dia seguinte. O raio-x revelou um enorme pedaco de osso machucando o revestimento de seu estomago, que ja comecava a sangrar. A cirurgia teria de acontecer logo.Osso estava alojado no estomago e dirigia-se aos intestinosCredito: Hot Spot MediaFoi inacreditavel a maneira como ele engoliu um osso daquele tamanho. Nao se sufocar e nao ter danos no esofago e um milagre, diz o dono. O osso poderia ter rompido seus intestinos. Ele tem sorte de estar vivo, tudo estava ao seu favor e nos estamos contentes que Rossi ainda esteja com a gente.O segundo raio-x mostrou que o osso ja havia se movido em direcao aos intestinos. Mais algumas horas e ele nao teria resistido. Assim que ele tocou no osso, ja soube que ele estava encrencado, comenta Steven.Os petiscos de Rossi normalmente sao biscoitos sabor frango, mas Steven desconfia que a guloseima tenha um perfume parecido com o da costela roubada, por isso o pet nao resistiu.Osso foi retirado em cirurgia, antes que causasse mais danosCredito: DailyMailRossi e nosso primeiro animal de estimacao. Ficamos atonitos com sua rapidez ao pular sobre a mesa, mesmo sendo tao pequeno. Ele tem o costume de nao mastigar os alimento, simplesmente engolindo-os inteiros. Ele nao mostrou nenhum desconforto na hora, mas quando o levamos ao veterinario, ele estava indisposto, relembra Steven.Rossi esta correndo e brincando agora, esta completamente recuperado e comportando-se como o habitual, diz Steven, aliviado.Carrie Wilde, assistente do hospital veterinario Companion Care contou que este e um caso muito raro, pois nunca havia visto um cao engolir algo tao grande. Se ele nao tivesse sido operado quase que imediatamente, poderia ter sido uma travessura fatal.Fica a licao: nunca ofereca ossos ao seu cao, pois nem todos terao a mesma sorte de Rossi. Nao e so cachorro grande que gosta de procurar chineses no jardim da casa.Teoricamente todos os caes, de todas as racas, gostam de cavoucar. O que a gente observa e que as racas originalmente desenvolvidas para um trabalho especifico e que demanda muita energia, tende a cavoucar muito mais do que as outras racas. Alguns exemplos sao:Pastores Alemaes,
Rotties, Huskies, Beagles, Cockers, Dachshund, Labradores, Goldens, e e claro, os especialistas na arte de desencavar ate o esgoto, todos os terriers.Pra solucionar o problema dos nossos obreiros de metro, e preciso primeiro entender porque os cachorros cavam: * Eles cavam para fazer suas "camas". Caes que ficam o tempo todo no jardim costumam escolher um local "predileto" para deitar e, ao mesmo tempo, tomar conta da casa toda. Nada melhor do que fazer uma "caminha" neste lugar. Puxa daqui, tira matinho dali, remove umas pedrinhas de la, quem foi o louco que colocou esta bromelia bem no meio do meu quarto?, e pronto, temos um adoravel local de repouso, com vista pro mar e totalmente decorado.* Eles cavam porque estao entediados. Nao tem ninguem com quem brincar. Provavelmente a coisa comeca com aquela plantinha sem-vergonha, que balanca pra la e pra ca, convidando pra brincar. Primeiro a gente destroi a plantinha, puxando cada folhinha com a delicadeza de um hipopotamo. Depois, quando ja nao tem nem um cabinho pra contar a historia, a gente comeca a cavar para ver da onde ela (a plantinha) veio e se tem outra escondida la dentro. Ai a gente ouve uma voz, bem baixinho, estranha, mas com certeza chamando pra brincar num lugar novinho em folha. E o tal do chinezinho. Cavando, cavando, cavando, um dia a gente chega la. E por falar nisso, quantas coisas a gente acha no caminho, nao e mesmo?* Eles cavam para se exercitar. E justamente por isso que as racas de trabalho tendem a cavoucar mais. A maioria dos donos nao exercita o ser cachorro de forma constante e suficientemente. O que fazer com toda esta energia? Bem, depois de puxar todas as roupas do varal, roer o para-choques do carro, perturbar a vida do gato, pular que nem um desvairado em cima das pessoas, so resta cavar o jardim atras de um tesouro do pirata.* Eles cavam para ficar fresquinho. Especialmente as racas do rio e as calorentas. Cavando eles conseguem achar uma terra mais fresquinha e umida, melhor so na praia. Se estiver muito frio eles tambem podem cavar para ficar mais quentinhos, ja que enroladinhos num buraquinho e mais facil de controlar a temperatura. Exatamente como os Huskies, Samoiedas e Malamutes fazem na neve.* Eles cavam para esconder a comida rara de aparecer (aquele osso mensal, talvez), ou quando tem muita "gente" para disputar um biscrock e a barriga ainda esta cheia. Nem todos os cachorros enterram seus pertences preciosos, embora este ritual faca parte dos instintos ancestrais. Cachorros que gostam de enterrar coisas, enterram biscoitos, brinquedos, sapatos, carteiras, celulares, ou quase tudo que eles puderem ter acesso. E lindo quando eles sao pequenininhos, mas um desespero quando eles ficam grandinhos.* Eles cavam pra trabalhar. A teoria de todo Terrier e: se nao posso ser desentocador de raposas, vou ser arqueologo e achar um dinossauro ENORRRRRRRRRRRRME, so para mim. :-P E que nem ser aviador: ta no sangue e nao ha nada que va faze-los mudar de ideia.* Eles cavam para escapar. Claro, um dia voce
leva o seu peludao para passear no "Baixo Toto". Deixa ele tomar umas biritas, mexer com umas cadelinhas, surfar nas ondas, e depois nunca mais. O cao pede a chave do carro emprestada, e voce nada! Pede pra sair com uns amigos sabado a noite,e voce manda ele voltar antes das 10 da noite. Ele pede pra dormir na casa da namorada, e voce diz que nao porque ela nao e de boa familia. Ate eu fugia! Falando serio, machos tendem a cavar perto das cercas para fugir, mais do que as femeas. Provavelmente tudo comeca com um espirito mais independente, e um cheirinho de cadela no cio tambem nao ajuda nada.* Eles cavam porque tem um bichinho no jardim. Em alguns casos o seu jardim tem camundongos (so nao vou dizer rato que e pra nao assustar os mais sensiveis B-D). Voce ainda nao sabe, mas o seu cachorro ja sentiu o cheirinho deles. As vezes o ratinho ainda esta no terreno baldio do lado, mas o peludao quer acabar com este intruso o mais rapido possivel.Solucoes? Bem, depois que o cachorro comeca a cavar e adquire o habito, fica MUITO dificil de corrigir o problema. Em alguns casos e so "dar" aquilo que ele precisa. Ou seja, mais exercicio; uma casinha ou abrigo, com um paninho pra ele empurrar pra la e pra ca e fazer a cama do jeito dele; reservar um horario, todos os dias, para brincar com o toto; acabar com os roedores;Se isso nao bastar existem outras tecnicas "mais drasticas" para tentar recuperar o cachorrao. * Crie um caminho para ele passear pelo jardim e cerque as plantas com seixos rolados (pedras redondas e de varios tamanhos). Caes detestam pisar em superficie irregular.* Deixe o buraco fedorento. Ponha um pouco do proprio coco do cachorro dentro do buraco e tampe. Poucos cachorros irao continuar cavando naquele lugar depois de achar os "presentinhos" uma meia duzia de vezes.Que tal um banho? Enterre parte da mangueira (com a ponta virada pra cima) dentro do buraco e fique perto do registro de agua. Quando o cachorrao estiver chegando perto e so abrir a torneira e assistir ao susto.* Voce tambem pode dar o banho. Leve o jornal para o jardim e sente-se com a mangueira do lado. Se o peludo tiver a audacia de comecar a cavar na sua frente ligue o jato d'agua enquanto diz NAO, e mostre a ele o que e um Lava-a-Jato.* Reserve um cantinho onde ele possa cavar e ensine o comando "CAVA-CAVA". Alguns cachorros se dao por satisfeitos com tamanha gentileza.* Banque o politico brasileiro. Acabe com a obra do metro, porque foi um outro prefeito quem comecou e voce nao vai ter tempo de inaugurar a obra na sua gestao. Ponha um pedregulho dentro de cada buraco e jogue um pouquinho de terra por cima. E dificil encontrar um cachorro com as ferramentas necessarias para quebrar brita. A grande maioria desiste do emprego.
mulher que sabe ser fofa,tem um jeito de crianca,sabe provocar,que adore ser mimada,que seja amiga, fiel e companheira,ciumenta,bobona,que faca birra e outras coisas que a deixe mais feminina. Inventarei varios apelidos bobos,presentearei com presentes,flores,bombons e tudo que minha mente permitir fazer. Acho super fofo quando uma mulher abaixa a cabeca quase chorando,o cheiro que fica na roupa,o jeito como dobra os labios,quando chora assistindo um filme,ou quando me pede pra ficar calado,quando me bate,quando me morde,o jeito delicado ao comer,quando faz charme,drama,o jeitinho manhoso,a teimosia,quando me abraca.....coisas bobas da qual eu admiro. Quero ser aquele pro qual voce vai ligar as 3 da manha pedindo um abraco,e sem exitar irei correndo pros teus bracos. Vou te defender apesar de ter errado,quero te dar motivos pra viver,ser o incentivo que te ajuda a vencer,o ombro amigo no qual tu vai chorar,a igreja santa onde vai confessar,quero ser memoria no teu album de alegrias,a resposta a pergunta mais estranha,o caminho que deve percorrer,o escudo que nao te deixa sofrer. Quero deixar voce ocupar meu tempo e meus pensamentos, porque eu permito, porque eu gosto, porque eu preciso. E depois de tantos dias de altos e baixo, ainda vai conseguir me deixar bobo, com um sorriso besta e sincero. Como vou saber quem e voce? ja me enganei tantas vezes...
futuro das pessoas....entao percebi que nunca mais iria acordar daquele pesadelo.... Durante meses pensei sobre isso...e cheguei a conclusao de que nao sei se tenho o DOM ou uma MALDICAO.........so sei que e isso que foi me dado......so tenho que aprender a usar,e dificil,pois muitas vezes tenho medo de estar certo......e quando a resposta vem a tona.....isso me assusta,ninguem gosta de prever as coisas.....
Sabe aqueles dias em que nada faz sentido? e como se toda esperanca tivesse ido embora,nao sei o que faco,o que penso ou o que sou....se ainda sou. As pessoas que estavam ao seu redor e que diziam estar ali com voce,e como se nao estivessem,e um corpo vazio,voce toca e nao ha nada e se ha ainda sera que e quem costumava estar? soltam palavras vazias,nunca realmente se preocupam com voce,mostram preocupacao quando algo grave acontece.....mas nao e preocupacao e pena e de caridade eu nao preciso. O amor que voce nunca deu,eu dou a voce.....realmente nao o merece,mas agora nao ha nada que voce possa fazer,entao durma em sua unica lembranca minha. Talvez eu nao te amei o bastante das tantas vezes que eu pude e talvez eu nao te tratei tao bem como eu gostaria. Se eu fiz voce se sentir melhor em segundo lugar, me desculpe. Eu conheco o seu rosto? Minha mente deseja esquece-la? Voce mente, silenciosamente diante de mim.... A noite esconde aquilo que quero esquecer,mas como sempre o sol vem iluminar o que continuou parado na escuridao e que eu me recusava a ver. E como um pesadelo,apesar de nao ver,voce sabe que esta ali. Talvez eu estivesse cego pelos meus sentimentos a ponto de nao ver a agonia crescer,ou talvez voce esteja cega,se concentra na dor e nao enxerga o que acontece ao seu redor,afastando quem tenta entrar na sua vida,sem razoes,apenas por so pensar em si mesma,na dor que voce insiste em dar atencao....talvez por causa de uma unica pessoa,de erros do passado que eu vi voce perdoar. "eu nao fiz nada. Mas sabia que tu nao ia fazer,e nem ter coragem." Realmente voce e uma boa atriz,acontece que eu aprendi com voce,vai dizer que acreditou mesmo que eu ainda estava sobre o seu "feitico"???? brincou com a sorte,eu poderia ter acabado com o seu namoro sim,e nao foi falta de coragem pois isso eu tenho,mas tenho uma Coisa que voce nao tem,carater e principios. A chance que voce teve passou,nao adianta vir com joguinhos de seducao,voce tem namorado eu poderia continuar com isso,fingindo,mas e voce quem deve respeito a ele nao eu. voce perde tanto tempo tentando convencer as pessoas de que voce presta,mas voce e soh uma farsa....nos dois sabemos que vc e somente uma garota triste e solitaria implorando pra ser feliz....eu sinto pena de voce. Quando eu olho la pra fora eu fico feliz de nao ter me tornado voce....e a cada dia que passa eu agradeco por nao ter dado certo entre nos dois. Voce foi egoista,so quis satisfazer os seus desejos,nunca pensou em nada ou ninguem,apenas no seu ego,no buraco que cresce na sua alma e que vai te consumindo dia apos dia.........essa e voce,uma pessoa desesperada e vazia.....nao sei nem mais se posso te chamar de amiga....isso se voce souber o que significa.EU ENOJO VOCE!!!! "Nao fazemos aquilo que queremos e, no entanto, somos responsaveis por aquilo que somos" - Jean-Paul Sartre Eu costumo dizer que tudo sem o seu lado positivo e o seu lado
negativo,depende somente de quem observa.Sabemos que nao podemos modificar o passado,ou seja,nao se pode mudar o que ja aconteceu,mas a grande maioria das pessoas acabam se esquecendo de apreciar as experiencias do passado e esquecem informacoes valiosas que podem fazer voce ser uma pessoa mais madura,focam-se na dor que te impede de ver o que esta ao seu redor,pare,olhe pra si mesmo e me diz se voce gosta do que ve no espelho? Se nao,entao pare de lamentar e questione tudo o que te aconteceu,nao se foque no prejuizo e sim no tempo perdido,no tempo que voce viveu para algo que nunca foi seu. Chega uma hora em que devemos deixar o passado para tras e viver nossos dias tentando tirar proveito maximo,mas nao esquecer o passado,o segredo esta na forma com que lidamos com o passado,qualquer experiencia que vivenciamos algum dia tem valor,o que nos fez chorar ontem,nos faz crescer hoje.Vivemos como alunos da nossa propria vida,nao aprendemos todo o conhecimento num dia so,existem pessoas,amores,trabalhos,amigos que vao e voltam,outros nao voltam nunca,nao e porque um deu errado,que voce nao vai achar algo melhor,as vezes esta do seu lado e voce nao percebe,mas caiu no comodismo,no famoso sedentarismo emocional,onde voce por covardia nao se levanta pra correr atras do que te faz bem,pois aquilo estava facil em suas maos,nao nos permitimos provar outras experiencias,estamos acostumados a ter tudo facil. Sem pedir licenca a vida passa,entao,se deixe viver,enquanto estamos focados no fracasso,deixamos de dar valor a quem realmente se importa conosco,quem esteve do nosso lado,quem queria fazer o nosso bem,ver a nossa felicidade e um dia pode ser tarde demais,essas pessoas podem se sentir sem valor algum,gracas a voce que prefere dar valor ao que te faz mal e quando isso acontecer nao va chorar,pois voce e quem fez essa decisao,assim como todas as outras em todos esses longos anos de vida.
Saudade do tempo em que a vida nao tinha lhe feito cicatrizes,saudade do dia em que o tempo nao te deixava triste. Saudade do tempo em que seus olhos brilhavam,saudade de quando te via sorrindo sem o medo estar estampado em seu rosto. Saudade de quando te fazia sorrir,saudade de quando te encontrei pela primeira vez...saudade do seu perfume. Saudade do tempo que nunca chegou,o tempo que gastei olhando pra voce,dos momentos de silencio do seu lado Saudade da felicidade que se escondia dentro de seus olhos,do seu jeito de menina,da mulher que eu tive orgulho de conhecer. O tempo para e as questoes aparecem, e dificil encarar os passos do relogio, os dias sao sempre iguais..o que estou pensando? que um dia ele ira parar?..as estrelas acima brilham tao distantes assim como seus olhos. Mesmo estando rodeado de pessoas me sinto sozinho.... nao porque sinto falta de alguem...e falta de um lugar seguro pra estar,de pessoas em que eu possa confiar. Eu acho engracado como as pessoas se arrependem depois de tudo ter acontecido,fingindo que nada aconteceu......sim aconteceu.......e ficam relembrando o passado como unico caminho de volta,pra ver se a saudade volta......mas tudo o que voces fazem e abrir as cicatrizes.......e ninguem gosta de sofrer.... As vezes sinto que ninguem se importa comigo,que ninguem perceberia se eu sumisse,as vezes me sinto sozinho,como se ninguem estivesse ao meu lado... A luz do dia as vezes tem um gosto frio de sangue,sinto o desespero tentando me dominar.....engano a mim, menos a todos.........sao tantos segredos e nenhum ouvido.......uma ajuda de dentro,mas queria de fora. O momento que dura para sempre, pelo menos para mim........e aquele que esta preso entre o que aconteceu e o que nunca poderia ser!!! Quando se anda sobre um campo minado,cada passo dado e um erro,o fogo cruzado te ensina a tomar atitudes falhas,sem ninguem para me oferecer cobertura,vou me esquivando das balas como posso na esperanca de poder voltar para casa.O silencio mortal das noites,pensamentos bombardeiam o que restou do que um dia eu fui. Tenho cicatrizes de batalhas em que nunca combati,o perfume adocicado tras a sua imagem a mente,quando vejo seu sorriso,ele me conforta,quando vejo seu sorriso,memorias me cortam como facas. Ja nao sei o que faco,todo dia a mesma coisa,dia diferente.A guitarra do tempo toca o som do desespero,nao quero morrer aqui e sozinho,espero o dia em que venham me resgatar desse inferno chamado vida. Meus sonho sao feitos com lagrimas e medo, somente Deus me observa enquanto eu sangro.Irei lutar ou irei cair, ate que os anjos me salvem? Um soldado nunca abandona o seu posto,mas estou tao cansado e ja nao sei se posso trilhar sem alguem pra me estender a mao e me manter a salvo. Mas sigo em frente assim,do jeito que aprendi,com um futuro incerto pela frente,espero o amanhecer para acordar em paz,nos braco do meu alvo adormecido. ; Cotar linha (comprimento da linha 3D) com texto(defun c:cotarlin()(command "dist" pause pause)(setq d (getvar "distance"))(setq Comprimento (strcat "Comprimento: " (rtos d 2 2) "m"))(command "text" "mid" pause "" pause Comprimento)) ; Salva
o conteudo dos textos (text ou mtext) selecionados em um arquivo.(defun c:text2arq()(z1)(setq arqz (open "c:\\dados.txt" "w"))(setq n 1)(setq color 4)(while (= n 1)(setq ent (entsel))(if ent (progn(command "change" ent "" "p" "c" color "")(setq nome (nth 0 ent))(setq ent (entget nome))(setq ent (assoc 1 ent))(setq z (cdr ent))(print z arqz)(z2))(setq n 0)))(alert "Fim")(close arqz)(z3))(defun z1()(setvar "useri1" 1))(defun z2()(setvar "useri1" 2))(defun z3()(setq k1 (getvar "useri1"))(if (= k1 2)(progn(while (/= k1 1)(command "u")(setq k1 (getvar "useri1"))))))