Instituto Brasileiro de Informação em Ciência e Tecnologia IBICT
As ações do Laboratório de Informação para Sustentabilidade (LIS) estão pautadas, em grande medida, na Agenda 2030, da Organização das Nações Unidas (ONU) para o desenvolvimento sustentável. Assim, o LIS surge como uma ferramenta importante para a realização de pesquisas e a democratização do acesso à informação sobre sustentabilidade no país.
Faz parte do ideal do LIS, a valorização das múltiplas dimensões da sustentabilidade, a promoção de práticas de abertura de dados, seguindo os princípios da transparência e colaboração na Ciência e o respeito, cada vez maior, ao meio ambiente e a todas as pessoas.
#ibict # mcti #lis # onu
As ações do Laboratório de Informação para Sustentabilidade (LIS) estão pautadas, em grande medida, na Agenda 2030, da Organização das Nações Unidas (ONU) para o desenvolvimento sustentável. Assim, o LIS surge como uma ferramenta importante para a realização de pesquisas e a democratização do acesso à informação sobre sustentabilidade no país.
Faz parte do ideal do LIS, a valorização das múltiplas dimensões da sustentabilidade, a promoção de práticas de abertura de dados, seguindo os princípios da transparência e colaboração na Ciência e o respeito, cada vez maior, ao meio ambiente e a todas as pessoas.
#ibict # mcti #lis # onu
autocad 2008 输出所有直线的端点坐标、颜色、线型、线宽:
(defun c:lf ()
(prompt "请选择直线:")
(setq ss (ssget))
(setq fp (open "d:/lineinfo.txt" "w"))
(setq count (sslength ss))
(setq i 0)
(while (< i count)
; 直线的名字
(setq ent (ssname ss i))
; 直线的属性
(setq line (entget ent))
; 直线的端点
(setq p1 (cdr (assoc 10 line)))
(setq p2 (cdr (assoc 11 line)))
; 直线的颜色
(setq color (cdr (assoc 210 line)))
; 直线所在的图层名称
(setq layer (cdr (assoc 8 line)))
; 图层信息
(setq layerinfo (entget (tblobjname "layer" layer)))
; 图层线型
(setq linetype (cdr (assoc 6 layerinfo)))
; 图层线宽
(setq lineweight (cdr (assoc 370 layerinfo)))
; x,y坐标取整输出
(princ (fix (car p1)) fp)
(princ " " fp)
(princ (fix (cadr p1)) fp)
(princ " " fp)
(princ (fix (car p2)) fp)
(princ " " fp)
(princ (fix (cadr p2)) fp)
(princ " " fp)
; 颜色转换为255进制输出
(princ (fix (* (car color) 255)) fp)
(princ " " fp)
(princ (fix (* (cadr color) 255)) fp)
(princ " " fp)
(princ (fix (* (caddr color) 255)) fp)
(princ " " fp)
; 线型
(princ linetype fp)
(princ " " fp)
; 线宽转为小数
(princ (/ lineweight 100.0) fp)
(princ "\n" fp )
(setq i (+ i 1))
)
(close fp)
(princ)
)
结果如图所示:
(defun c:lf ()
(prompt "请选择直线:")
(setq ss (ssget))
(setq fp (open "d:/lineinfo.txt" "w"))
(setq count (sslength ss))
(setq i 0)
(while (< i count)
; 直线的名字
(setq ent (ssname ss i))
; 直线的属性
(setq line (entget ent))
; 直线的端点
(setq p1 (cdr (assoc 10 line)))
(setq p2 (cdr (assoc 11 line)))
; 直线的颜色
(setq color (cdr (assoc 210 line)))
; 直线所在的图层名称
(setq layer (cdr (assoc 8 line)))
; 图层信息
(setq layerinfo (entget (tblobjname "layer" layer)))
; 图层线型
(setq linetype (cdr (assoc 6 layerinfo)))
; 图层线宽
(setq lineweight (cdr (assoc 370 layerinfo)))
; x,y坐标取整输出
(princ (fix (car p1)) fp)
(princ " " fp)
(princ (fix (cadr p1)) fp)
(princ " " fp)
(princ (fix (car p2)) fp)
(princ " " fp)
(princ (fix (cadr p2)) fp)
(princ " " fp)
; 颜色转换为255进制输出
(princ (fix (* (car color) 255)) fp)
(princ " " fp)
(princ (fix (* (cadr color) 255)) fp)
(princ " " fp)
(princ (fix (* (caddr color) 255)) fp)
(princ " " fp)
; 线型
(princ linetype fp)
(princ " " fp)
; 线宽转为小数
(princ (/ lineweight 100.0) fp)
(princ "\n" fp )
(setq i (+ i 1))
)
(close fp)
(princ)
)
结果如图所示:
Rádio Web Rosa Mística
SANTO DO DIA
SANTO AGOSTINHO
28/08
Aurélio Agostinho nasceu no dia 13 de novembro de 354, cidade de Tagaste, na África. Era o primogênito de Patrício e Mônica, uma devota cristã, que procurou criar o filho no seguimento de Cristo.
Aos dezesseis anos de idade foi estudar fora de casa. Se envolveu com a heresia maniqueísta, que pregava a existência de dois princípios que regiam o mundo, um maligno e um benigno. Também nesta época se envolveu com uma mulher e recebeu um filho, a quem chamou de Adeodato.
Agostinho era possuidor de uma inteligência rara, centrou-se nos estudos e se formou brilhantemente em retórica. Excelente escritor dedicava-se à poesia e filosofia. Procurando maior sucesso, Agostinho foi para Roma e depois para Milão, onde passou a admirar o bispo Ambrósio. Aos poucos a pregação de Ambrósio tocou seu coração e ele se converteu. Foi batizado junto com o filho Adeodato, pelo próprio Bispo Ambrósio com trinta e três anos de idade.
Com a morte do filho, resolve voltar para casa, mas ali também encontra sofrimento, com a morte da mãe. Muda-se então para Tagaste, onde funda uma comunidade monástica. O bispo Ambrósio, preocupado com Agostinho, o convence a tornar-se sacerdote. No fim torna-se bispo de Hipona.
Agostinho foi definido como o mais profundo e importante filósofo e teólogo do seu tempo. Sua obra iluminou quase todos os pensadores dos séculos seguintes. Escreveu livros importantíssimos, entre eles estão sua autobiografia, "Confissões" e "Cidade de Deus".
Depois de uma grave enfermidade ele morreu, aos setenta e seis anos de idade, em 28 de agosto de 430.
Colaboração: Padre Evaldo César de Souza, CSsR
REFLEXÃO Agostinho encontra na sincera adesão a verdade cristã e na multiforme atividade pastoral a paz que seu coração almejava, coração que antes era tão atormentado pelos afetos terrenos e pela sede de verdade. Exerceu sua autoridade pastoral como um ministério de justiça, imparcialidade, simpatia e cuidados para com o bem-estar do povo, vivendo sempre em comunhão com o clero de sua catedral e diocese.
ORAÇÃO "Tarde te amei, ó beleza tão antiga e tão nova, tarde te amei! Eis que estavas dentro e eu fora. Estava
SANTO DO DIA
SANTO AGOSTINHO
28/08
Aurélio Agostinho nasceu no dia 13 de novembro de 354, cidade de Tagaste, na África. Era o primogênito de Patrício e Mônica, uma devota cristã, que procurou criar o filho no seguimento de Cristo.
Aos dezesseis anos de idade foi estudar fora de casa. Se envolveu com a heresia maniqueísta, que pregava a existência de dois princípios que regiam o mundo, um maligno e um benigno. Também nesta época se envolveu com uma mulher e recebeu um filho, a quem chamou de Adeodato.
Agostinho era possuidor de uma inteligência rara, centrou-se nos estudos e se formou brilhantemente em retórica. Excelente escritor dedicava-se à poesia e filosofia. Procurando maior sucesso, Agostinho foi para Roma e depois para Milão, onde passou a admirar o bispo Ambrósio. Aos poucos a pregação de Ambrósio tocou seu coração e ele se converteu. Foi batizado junto com o filho Adeodato, pelo próprio Bispo Ambrósio com trinta e três anos de idade.
Com a morte do filho, resolve voltar para casa, mas ali também encontra sofrimento, com a morte da mãe. Muda-se então para Tagaste, onde funda uma comunidade monástica. O bispo Ambrósio, preocupado com Agostinho, o convence a tornar-se sacerdote. No fim torna-se bispo de Hipona.
Agostinho foi definido como o mais profundo e importante filósofo e teólogo do seu tempo. Sua obra iluminou quase todos os pensadores dos séculos seguintes. Escreveu livros importantíssimos, entre eles estão sua autobiografia, "Confissões" e "Cidade de Deus".
Depois de uma grave enfermidade ele morreu, aos setenta e seis anos de idade, em 28 de agosto de 430.
Colaboração: Padre Evaldo César de Souza, CSsR
REFLEXÃO Agostinho encontra na sincera adesão a verdade cristã e na multiforme atividade pastoral a paz que seu coração almejava, coração que antes era tão atormentado pelos afetos terrenos e pela sede de verdade. Exerceu sua autoridade pastoral como um ministério de justiça, imparcialidade, simpatia e cuidados para com o bem-estar do povo, vivendo sempre em comunhão com o clero de sua catedral e diocese.
ORAÇÃO "Tarde te amei, ó beleza tão antiga e tão nova, tarde te amei! Eis que estavas dentro e eu fora. Estava
✋热门推荐