curseur de radioactivité en Sievert

Auteur  
# 27/03/2011 à 15:37 Vigile
radioactivité
pour voir la signification de chaque mesure de Sievert juste dans un petit coin d'écran : transformer ce script en applette

(pour le codage gam1 : voir la suite ...)
script-gam1 compacté=

_-_-_-_-_-_ Sievert curseur _-_-_ (normal CONSTRUIT) _-_-_-_-_-_
// definition des références/lien-Internet§ §µ0$V0RL0: type=liste(RF_~ce site~http://okidor.free.fr/reflects~,99,1)§ §µ0$V0RLa: type=liste(RFa~conséquences~http://sante.planet.fr/actualites-irradiations-quelles-sont-les-consequences-sante.57248.2071.html?page=0,1~,99,1)§ §µ0T0nava:p=%W87;20§ cc=bleu§ cf=vert§ d=14§ t=RFa§ §µ1B0nava: frm=T0nava§ CLICK=gm1.naviguer(http://sante.planet.fr/actualites-irradiations-quelles-sont-les-consequences-sante.57248.2071.html?page=0,1,0,ERR[STATUT&MODOP])§ §µ0$V0RLb: type=liste(RFb~irradiations~http://fr.wikipedia.org/wiki/Sievert#Effet_des_doses_d.27irradiations~,99,0)§ §µ0T0navb:p=%W87;45§ cc=bleu§ cf=vert§ d=14§ t=RFb§ §µ1B0navb: frm=T0navb§ CLICK=gm1.naviguer(http://fr.wikipedia.org/wiki/Sievert#Effet_des_doses_d.27irradiations,0,ERR[STATUT&MODOP])§ §µ0$V0RLc: type=liste(RFc~conversion~http://www.hc-sc.gc.ca/ewh-semt/occup-travail/radiation/dosim/res-centre/conversion-fra.php~,99,1)§ §µ0T0navc:p=%W87;70§ cc=bleu§ cf=vert§ d=14§ t=RFc§ §µ1B0navc: frm=T0navc§ CLICK=gm1.naviguer(http://www.hc-sc.gc.ca/ewh-semt/occup-travail/radiation/dosim/res-centre/conversion-fra.php,0,ERR[STATUT&MODOP])§ §µ0$V0RLd: type=liste(RFd~radiologie~http://www.ms.public.lu/fr/activites/radioprotection/protect-radio-applic-medic/protect-patients/risques-lies-a-la-radiologie/index.html~,99,1)§ §µ0T0navd:p=%W87;95§ cc=bleu§ cf=vert§ d=14§ t=RFd§ §µ1B0navd: frm=T0navd§ CLICK=gm1.naviguer(http://www.ms.public.lu/fr/activites/radioprotection/protect-radio-applic-medic/protect-patients/risques-lies-a-la-radiologie/index.html,0,ERR[STATUT&MODOP])§ §µ0$V0RLe: type=liste(mesure~http://www.sievert-system.org/WebMasters/fr/mesure.html~,99,1)§ §µ0T0nave:p=%W87;115§ cc=bleu§ cf=vert§ d=14§ t=RFe§ §µ1B0navd: frm=T0nave§ CLICK=gm1.naviguer(http://www.sievert-system.org/WebMasters/fr/mesure.html,0,ERR[STATUT&MODOP])§ §µ0// ATTENTION - palliatif : selInd définit ici length§ §µ0$V0RF0: type=liste($V0RL0~ à vous de voir~...~,99,1)§ §µ0$V0RFb1mu: type=liste($V0RLb~Fumer une cigarette : 0.001 mSv~la limite annuelle d’exposition pour la population générale en France est atteinte~ à environ un paquet par semaine~ et dépassée à plus d’1 cartouche tous les deux mois~,99,4)§ §µ0$V0RFb2mu: type=liste($V0RLb~Une centrale nucléaire française : 0.002 mSv/an~ en état de fonctionnement normal - hors accident~Au delà -incident sérieux- des mesures de protection de la population~ -et des travailleurs indispensables sur le site-~ peuvent être nécessaires~,99,5)§ §µ0$V0RFb80mu: type=liste($V0RLb~Un voyage Paris-New York aller et retour : 0.08 mSv soit 9.5 µSv/heure~dose due au rayonnement cosmique supplémentaire à environ 10 000 mètres d’altitude~La limite annuelle d’exposition ... serait atteinte à 17 allers-retours par an sur ce trajet~,99,3)§ §µ0$V0RFb300mu: type=liste($V0RLb~Une radiographie des poumons : 0.3 mSv~,99,1)§ §µ0$V0RFb300: type=liste($V0RLb~Dose annuelle moyenne reçue en France : ~ environ 2.4 mSv/an/personne~,99,2)§ §µ0$V0RFb302: type=liste($V0RLb~Limite autorisée pour l'exposition de la population aux rayonnements artificiels~ en France : 1 mSv/an/personne ~(Code de la santé publique, Article R1333-8).~,99,3)§ §µ0$V0RFb20ms: type=liste($V0RLb~dosimétrie mensuelle fixée à 1.5 mSv ~ dosimétrie fixée par les entreprises à 16 mSv/an.~(Code du travail Article R231-76)~Limite autorisée pour les personnels exposés en France:~ 20 mSv sur 12 mois glissants par personne ~,99,5)§ §µ0$V0RFb01si: type=liste($V0RLb~pour des doses aux organes inférieures à 100 mSv=0.1 Sv~ l'étude des victimes de Hiroshima et Nagasaki n'a pas révélé de risque statistiquement significatif de cancers~de faibles expositions (inférieures à 0.1 Sv) stimulent les mécanismes protecteurs des cellules~et ont de ce fait un effet globalement bénéfique~,99,4)§ §µ0$V0RFd01ss: type=liste($V0RLd~Les deux premières semaines après la conception~ l'irradiation entraîne un effet tout ou rien :~soit la mort de l'embryon soit la croissance normale. ~A partir des doses de 100 milli-Sievert on peut observer la mort embryonnaire ~mais l'embryon peut aussi survivre à des doses beaucoup plus élevées~,99,5)§ §µ0$V0RFa04sH: type=liste($V0RLa~centrale de Fukushima ~La contamination se fait directement par contact et inhalation~Si un nuage radioactif impacte votre région la plupart des pathologies se déclareront ~ des années après l’exposition~,99,4)§ §µ0$V0RFb05s: type=liste($V0RLb~L'observation des nettoyeurs de Tchernobyl a révélé ~une morbidité anormalement élevée~sans signe clinique spécifiquement liés à l'irradiation - suggérant un syndrome immunodéficitaire radioinduit.~Le risque de mortalité s'élève de 14% par sievert dans les 30 ans~ suivant la radio-exposition avec 1 seuil de 0.5 Sv~,99,5)§ §µ0$V0RFb1s: type=liste($V0RLb~L'homme présente des signes cliniques dus aux irradiations à partir d'une dose unique équivalente à 1 Sv~dénommé le «mal des rayons». L'individu est alors systématiquement hospitalisé.~,99,2)§ §µ0$V0RFa1sH: type=liste($V0RLa~À partir d'une dose de 1 sievert/heure reçue par le corps humain~on constate une hausse du nombre de cancers au sein de la population concernée~,99,2)§ §µ0$V0RFb2a4s: type=liste($V0RLb~syndrome hématopoïétique - leucopénie ~lymphocytes et globules blancs diminuent considérablement. ~l'irradiation peut mener à une anémie (carence en globules rouges)~,99,3)§ §µ0$V0RFb3a45s: type=liste($V0RLb~On définit l'irradiation aiguë globale comme étant la dose tuant 50 % des sujets exposés au rayonnement ionisant~Cette valeur admet un intervalle de 3 à 4,5 Sv~syndrome hématologique s'étalant sur une trentaine de jours. Aucun traitement n'est administré~,99,3)§ §µ0$V0RFa4a45s: type=liste($V0RLa~entre 4 et 4.5 sievert par heure~la moitié des personnes exposées meurt.~Une forte exposition peut induire ainsi des œdèmes cérébraux~la destruction de la moelle osseuse - des troubles vasculaires~des hémorragies internes et une destruction du système immunitaire~,99,5)§ §µ0$V0RFb8s: type=liste($V0RLb~on observe un syndrome gastrointestinal avec diarrhées aiguës ~ hémorragie digestive menant à la mort~,99,2)§ §µ0$V0RFb10s: type=liste($V0RLb~La mort est pratiquement certaine pour des doses supérieures à 10 Sv~,99,1)§ §µ0$V0RFb40s: type=liste($V0RLb~on observe un syndrome nerveux avec convulsions- coma et mort instantanée.~,99,1)§ §µ0// bornes des intervalles de valeurs commentés§ §µ0$V0biv: type=liste($V0i00~$V0im01~$V0im02~$V0im80~$V0im300~$V0ims1~$V0ims2p4~$V0ims20~$V0ids1i~$V0ids1s~$V0i04sH~$V0i05s~$V0i1s~$V0i1sH~$V0i2a4s~$V0i3a45s~$V0i4a45s~$V0i8s~$V0i10s~$V0i40s~~~,14,19)§ §µ0$V1iiMax: type=nombre($V0biv.selInd)§ §µ0// infos référencées sur chaque borne ou intervalle§ §µ0// (bornes~commentaires) *n§ §µ0$V0i00: type=liste(0µSv~$V0RF0~,99,0)§ §µ0$V0im01: type=liste(0.001 mSv~$V0RFb1mu~,99,0)§ §µ0$V0im02: type=liste(0.002 mSv~$V0RFb2mu~,99,0)§ §µ0$V0im80: type=liste(0.08 mSv~$V0RFb80mu~,99,0)§ §µ0$V0im300: type=liste(0.3 mSv~$V0RFb300mu~,99,0)§ §µ0$V0ims1: type=liste(1 mSv~$V0RFb302~,99,0)§ §µ0$V0ims2p4: type=liste(2.4 mSv~$V0RFb300~,99,0)§ §µ0$V0ims20: type=liste(20 mSv~$V0RFb20ms~,99,0)§ §µ0$V0ids1i: type=liste( < 0.1 Sv~$V0RFb01si~,99,0)§ §µ0$V0ids1s: type=liste( > 0.1 Sv~$V0RFd01ss~,99,0)§ §µ0$V0i04sH: type=liste(0.4 Sv/Heure~$V0RFa04sH~,99,0)§ §µ0$V0i05s: type=liste(0.5 Sv~$V0RFb05s~,99,0)§ §µ0$V0i1s: type=liste(>=1 Sv~$V0RFb1s~,99,0)§ §µ0$V0i1sH: type=liste(>1 Sv/Heure~$V0RFa1sH~,99,0)§ §µ0$V0i2a4s: type=liste(2 à 4 Sv~$V0RFb2a4s~,99,0)§ §µ0$V0i3a45s: type=liste(3 à 4.5 Sv~$V0RFb3a45s~,99,0)§ §µ0$V0i4a45s: type=liste(4 à 4.5 Sv~$V0RFa4a45s~,99,0)§ §µ0$V0i8s: type=liste(>=8 Sv~$V0RFb8s~,99,0)§ §µ0$V0i10s: type=liste(>=10 Sv~$V0RFb10s~,99,0)§ §µ0$V0i40s: type=liste(>=40 Sv~$V0RFb40s~,99,0)§ §µ0// position et taille de l'ascenceur :§ §µ0D0a1: p1=%W20;50§ p2=%W50;16§ VU_N§ §µ0T0svLow:p=70;25§ cc=gris§ cf=jaune§ sty=italique§ d=12§ t=1 µSv§ §µ0T0svHigh:p=D0a1.p1.x+D0a1.p2.x;25§ cc=gris-sombre§ cf=jaune§ sty=italique§ d=12§ t=40 Sv§ §µ0G0a0: cc=gris§ pts=_100;25!§ e-9!_D0a1.p1.x+20;D0a1.p1.y!§ e3!_-6.5;-9|§ e4!_7.5;-1|§ e1!_-1;10|§ §µ0G0a1: cc=gris§ pts=_D0a1.p1.x+D0a1.p2.x;25!§ e9!_D0a1.p1.x+D0a1.p2.x-22;D0a1.p1.y!§ § e3!_-1.5;-9|§ e4!_7.5;0|§ e1!_-6;9|§ §µ0// Traitement-affichage :§ §µ0P0affi: p=25;100§ %setK=250§ VU_N§ §µ0$V1Lien: type=texte($V0RL0[2],80)§ §µ1T1lien:p=%W60;%H95§ cc=bleu§ cf=cyan§ d=12§ t=$V1Lien§ §µ1$V0ii: type=nombre(1)§ §µ0$V1nn: type=nombre(0)§ §µ0$V1Lien: type=nombre(0)§ §µ0$V1LienM: type=nombre(4)§ §µ0$V1ni: type=nombre(0)§ §µ0$V1nmax: type=nombre(0)§ §µ0CMD10z2: # $V1nmax.v=$V0RFb302.selInd§ §µ1$V1ddd: type=texte(_?d,80)§ §µ1$V1ddr: type=texte(_?r,80)§ §µ0$V1ddR: type=texte(_?R,80)§ §µ0$V1cmd: type=texte(_?C,80)§ §µ0$V1info: type=texte(_?I,80)§ §µ0$V1ddP: type=texte(_?P,80)§ §µ0$V1ddp: type=texte(_?p,80)§ §µ0T1affi2:p=P0affi.x;P0affi.y+30§ cc=noir§ cf=blanc§ d=12§ t=tgfyt§ §µ0A1sv: p=D0a1.p1§ t=D0a1.p2.x;D0a1.p2.y§ bo=0;30§ va=2§ §µ1$V1isv: type=decimal(A1sv.va)§ §µ1CMD1aa0152: # $V0ii.v=A1sv.va§ §µ1CMD1a00154: #-> ?=($V1isv>$V1iiMax)§ §µ1CMD1aa0156: # $V0ii.v=$V1iiMax§ §µ1CMD1a00158: #<- ?=(NON)§ §µ1CMD1aa020: # $V1cmd.v='$V1ddr.v=$ +V0biv +[ +$V0ii +]'§ §µ1CMD1aa021: # $V1cmd.Eval()§ §µ1CMD1aa025: # $V1cmd.v='$V1ddR.v= +$V1ddr +[0]'§ §µ1CMD1aa026: # $V1cmd.Eval()§ §µ1T1choix:p=D0a1.p1.x+(D0a1.p2.x*0.4);D0a1.p1.y-9§ cc=blanc§ cf=rose§ d=14§ sty=gras§ t=$V1ddR§ §µ1CMD1aa028: # $V1cmd.v='$V1info.v= +$V1ddr +[1]'§ §µ1CMD1aa029: # $V1cmd.Eval()§ §µ1CMD1a0021: # $V1nn.v=0§ §µ1CMD1a0022: # $V1Lien.v=0§ §µ1CMD1a0023: # $V1cmd.v='$V1nmax.v=( +$V1info +.selInd ++1)'§ §µ1CMD1aa024: # $V1cmd.Eval()§ §µ1CMD1a0026: # $V1cmd.v='$V1ddP.v= +$V1info +[0]' § §µ1CMD1aa027: # $V1cmd.Eval()§ §µ1CMD1a0028: # $V1cmd.v='$V1ddr.v= +$V1ddP +[0]'§ §µ1CMD1a0029: # $V1cmd.Eval()§ §µ1CMD1a0031: # $V1cmd.v='$V1ddR.v= +$V1ddP +[1]'§ §µ1CMD1a0032: # $V1cmd.Eval()§ §µ1CMD1a0034: # T1affi2[$V1nn]: p.y=((22*$V1nn)+T1affi2.p.y) , t=( +$V1ddr +) - +$V1ddR + - voir :§ §µ1CMD1a0035: # $V1nn.Plus(1)§ §µ1CMD1a0038: # $V1cmd.v='$V1ddR.v= +$V1ddP +[2]'§ §µ1CMD1a0039: # $V1cmd.Eval()§ §µ1CMD1a0040: # T1lien[$V1Lien]: p.x=P0affi.x+30,p.y=((22*$V1nn)+T1affi2.p.y) , t=$V1ddR§ §µ1CMD1a0041: # $V1Lien.Plus(1)§ §µ1CMD1a0044: # $V1ni.v=1§ §µ1CMD1a00440: #-> ?=($V1ni<$V1nmax)§ §µ1CMD1a00441: # $V1cmd.v='$V1ddp.v= +$V1info +[ +$V1ni +]' § §µ1CMD1a00441b: # $V1cmd.Eval()§ §µ1CMD1a00442: # $V1ddd.v=$V1ddp§ §µ1CMD1a00444: # T1affi2[$V1nn]: VU_=VU_O, p.x=20,p.y=((22*$V1nn)+T1affi2.p.y+22) , t=$V1ddd§ §µ1CMD1a00446: # $V1nn.Plus(1)§ §µ1CMD1a00447: # $V1ni.Plus(1)§ §µ1CMD1a00449: #<- ?=(OUI)§ §µ1CMD1a0050: # T1affi2[$V1nn]: p.x=150,p.y=((22*$V1nn)+T1affi2.p.y+22) , t=- - - -§ §µ1CMD1a0051: # $V1nn.Plus(1)§ §µ1$V1nMax: type=nombre(($V1nn+1))§ §µ0CMD1ff010: #-> ?=($V1nn<$V1nMax)§ §µ1CMD1ff012: # T1affi2[$V1nn]: VU_=VU_N, p.x=20, p.y=((22*$V1nn)+T1affi2.p.y) , t= § §µ1CMD1ff014: # $V1nn.Plus(1)§ §µ1CMD1ff050: #<- ?=(OUI)§ §µ1CMD1ff060: #-> ?=($V1Lien<$V1LienM)§ §µ1CMD1ff062: # T1lien[$V1Lien]: VU_=VU_N, t=§ §µ1CMD1ff063: # $V1Lien.Plus(1)§ §µ1CMD1ff064: #<- ?=(OUI)§ §µ1CMD1a000P: @ T1affi2[0_]§ §µ0CMD1a000L: @ T1lien[0_]§ §µ0T1isv:p=D0a1.p1.x-50;D0a1.p1.y+12§ cc=noir§ cf=blanc§ d=12§ t=( +$V0ii§ +)§ §µ1
_-_-_-_-_-_-_-_-_-_-_
# 27/03/2011 à 16:03 Vigile
voir plutôt : http://gam1.e-monsite.com/rubrique,sievert-et-curseur,1519839.html

(ici : problème avec des "<" ou ">" ...)
Répondre à ce message

Vous n'êtes pas autorisé à poster un message sur le forum.

utilitaire de bas de page pour gam1 version :       OK ? pour votre
script par page URL cookie
_-_-_-_-_-_ _-_-_-_-_-_

_-_-_-_-_-_-_-_-_-_-_
        ( × )

( en : cette page autre )
label =
Editer le script du label


Créer un site gratuit avec e-monsite - Signaler un contenu illicite sur ce site