Avatar billede janbb Juniormester
24. maj 2004 - 17:25 Der er 7 kommentarer og
1 løsning

curser automatik

Har dette 'gamle' program jeg har nørklet sammen for mange år siden (efter skabelon fra et andet program).
Imidlertid er der et par 'ønsker' der er dukket op: bl.a.
at curseren befandt sig i det første felt af sig selv efter indlæsning af siden.Og osse en slags 'refresh'-knap mht resultat.Er ikke så 'ferm' til websprog så jeg håber på nogle løsninger, der ikke er alt for komplicerede :).

<title>døgn-sved-udregning</title>
<Body BGcolor="#32cd32">
<SCRIPT language=JavaScript>
<!-- Skjul script

overrule= '';

function regn_perspiratioen(form)
{
var j,g,b,h;
        /*perspiro:=ovf*375; perspir:=perspiro+(perspiro*0.2*(feber-37));*/

        /*bem. USA notation for ln er log*/
   
        b= eval(form.hoejden.value);

/*    (exp(0.725*ln(hoej)))*0.007184;*/
              j=Math.exp(0.725*Math.log(b));
              j=0.007184*j;

            g= eval(form.vaegten.value);
            h=Math.exp(0.425*Math.log(g));
            j=h*j*375;
            j=j+(j*0.2);
    form.perspiratioen.value= j;
    }

function set_tilfoert(form)
    {
    var a;
    a= eval(form.tilfoert.value);
    form.vaegten.value= overrule;
    form.hoejden.value= overrule;
    form.tilfoert.value= a;
    regn_perspiratioen(form);
    }

function regn_tilfoert(form)
    {
    var b,j,h;
    b= eval(form.hoejden.value);

/*    (exp(0.725*ln(hoej)))*0.007184;*/
              j=Math.exp(0.725*Math.log(b));
              j=0.007184*j;

g= eval(form.vaegten.value);
            h=Math.exp(0.425*Math.log(g));
            j=h*j;

    form.tilfoert.value= j;
    regn_perspiratioen(form);
    }



// stop skjul script-->
</SCRIPT>

                           
<center>
<font color="#ffffff"><FONT size=+1><B>perspiratio:(ovf:=(exp(0.425*ln(vaegt)))*(exp(0.725*ln(hoej)))*0.007184;<br>
      perspiro:=ovf*375; <br>
            perspir:=perspiro+(perspiro*0.2*(feber-37));)<br>

<H3 align=center>Vejl.:Museklik i rubrik og indtast.</H3>
<H3 align=center>Udregning kræver museklik i
                      udregningsbox</H3>
<DIV align=center>

<FORM name=F1>
<TABLE cellPadding=5 border=0>
<TBODY>
<TR><!-- leg.overlade set tilfoert name tilfoert-->

</TR><TR>

<!-- vægt regn tilfoert name vaegten-->

<TD width=30>&nbsp; </TD>
<TD align=right>  <font color="#ffffff">VÆGT:</TD>
<TD align=left><INPUT onchange=regn_tilfoert(this.form) size=10 name=vaegten> </TD>
    <TD></TD></TR>

  <TR><!-- hoejde regn tilfort name hoejden-->

<TD width=30>&nbsp; </TD>
<TD align=right>  <font color="#ffffff">Højde:</TD>
<TD align=left>
<INPUT onchange=regn_tilfoert(this.form) size=10 name=hoejden> </TD>
<TD></TD></TR><TR><TD align=left colSpan=3>

<font color="#ffffff"><FONT size=+1><B>ovf(LEGEMSOVERFLADE)<br> (i kv.meter): </B></TD>
<TD><INPUT onchange=set_tilfoert(this.form) size=10 value=0 name=tilfoert><B>
</B></TD>

<!-- NAME perspiratioen -->

<TD align=left colSpan=3> 
<font color="#ffffff"><B>Perspiratio(afebril):<br>(i ml pr. døgn)<br>(regn 20% extra pr. grad feber) </B></TD>
<TD>
<INPUT onchange="alert('kender resultatet?')" size=10 value=0 name=perspiratioen>

<B></B></TD></TR></TBODY></TABLE></FORM></DIV><BR clear=all>
  <P>
<DIV align=right><FONT size=-2>

</SCRIPT>
Avatar billede olebole Juniormester
24. maj 2004 - 17:34 #1
<ole>

<body ..... onload="document.F1.vaegten.focus()">

... og en reset-knap:
<input type="reset" value="Reset Form">

/mvh
</bole>
Avatar billede janbb Juniormester
24. maj 2004 - 17:53 #2
Ja, det blev det noget 'kønnere' af (du må gerne smide et svar).Men knappen jeg efterlyste var en slgs 'calculate'-knap - man kunne bruge i stedet for at klikke musen i resultatfeltet.
Desuden ku jeg godt tænke mig at lave en slags 'default'-værdier : vægt = 70 og højde = 175 og at resultatet blev regnet ud ved opstart som et slags eksempel.
Hvis det ikke er for 'kringlet' :)
Men er glad for focus-tricket.
Avatar billede janbb Juniormester
24. maj 2004 - 23:46 #3
kunne gi et eks:

<HTML>

<HEAD>

<TITLE>Javascript Calculator for Maximum Allowable Blood Loss</TITLE>



<SCRIPT LANGUAGE="JAVASCRIPT">

<!-- hide this script tag's contents from old browsers



function SetForm(form){



    form.hba.value="14";

    form.hbl.value="10";

    form.wt.value = "70";

    form.comp.value = "72";

    form.ptmabl.value = "";

    form.my_comment.value = "Give it a try!!";



}



function ClearForm(form){



    form.hba.value="";

    form.hbl.value="";

    form.wt.value = "";

    form.comp.value = "";

    form.ptmabl.value = "";

    form.my_comment.value = "";



}





function mabl(hba, hbl, wt, comp) {

            mablval=((hba-hbl)/hba)*(wt*comp);

            return mablval;

}





function checkform(form) {



              if (form.hba.value==null||form.hba.value.length==0 ||                 form.hbl.value==null||form.hbl.value.length==0||form.wt.value==null||        form.wt.value.length==0||form.comp.value==null||form.comp.value.length==0){

            alert("\nPlease complete the form first");

            return false;

      }



      else if (parseFloat(form.hba.value) < 2||

                parseFloat(form.hba.value) >20){

                alert("\nHb must be between 2 and 20 g/dl");

                return false;

      }



    else if (parseFloat(form.wt.value) < 3||

                parseFloat(form.wt.value) >300){

                alert("\nWeight must be between 3 and 300 kgs");

                return false;

      }





    else if (parseFloat(form.hbl.value) < 2||

                parseFloat(form.hbl.value) >20){

                alert("\nMinimum Hb limit must be between 2 and 20 ");

                return false;

      }



    else if (parseFloat(form.comp.value) < 60||

                parseFloat(form.comp.value) >100){

                alert("\nComposition value must be between 60 and 100 ");

                return false;

      }

      return true;



}



function computeform(form) {



      if (checkform(form)) {



      ptmabl=Math.round(mabl(form.hba.value, form.hbl.value,     form.wt.value,     form.comp.value));

      form.ptmabl.value=ptmabl;



  if (ptmabl >1000 ) {

          form.my_comment.value="Can lose at least a couple of units!";

      }



      else if (ptmabl >500  && ptmabl <=1000) {

          form.my_comment.value="Can lose at least another unit!";

      }



      else if (ptmabl >0 && ptmabl <=500) {

          form.my_comment.value="Get blood ready!";

      }



      else if (ptmabl <=0) {

          form.my_comment.value="Needs blood NOW";

      }



      }

      return;

}

// -- done hiding from old browsers -->

</SCRIPT>

<meta name="Microsoft Theme" content="copy-3-of-blank 011, default">
</HEAD>

<BODY bgcolor=#FFFFFF link=#999999 text=#000000 onLoad="SetForm(document.BMI)" background="" vlink="#990000" alink="#666666"><!--mstheme--><font face="Arial, Arial, Helvetica">

<NOSCRIPT> <CENTER>Sorry - you must have a JavaScript compatible browser for this to work.<BR>

I suggest you download Netscape 3.0, or, if you must, MIE 3.0</CENTER></NOSCRIPT>



<!-- Loosely based on a Body Mass program by Ashley Cheng (ackcheng@ha.org.hk, "http://www.iohk.com/UserPages/acheng") -->



<CENTER>



<H3>Maximum Allowable Blood Loss Calculator <BR>

How much blood can your patient lose?</H3>

<!--msthemeseparator--><p align="center"><img src="_themes/copy-3-of-blank/ablrule.gif" width="600" height="10"></p>

</CENTER>

Enter patient's weight in kilograms and Hb in g/dl (i.e. about 14).

If you wish, you may change the minimum  Hb  limit and the volume of blood per kg body mass.



Press the "Let's See!" button to calculate the MABL!

<EM>(Please read disclaimer below before using this form)</EM>



<CENTER><FORM NAME="BMI" method=POST>

<!--mstheme--></font><TABLE border=1 width=100% bordercolordark="#666666" bordercolorlight="#CCCCCC">

<TR>

<TH WIDTH=15%><!--mstheme--><font face="Arial, Arial, Helvetica">Patient's Weight <BR>(kg)<!--mstheme--></font></TH>

<TH WIDTH=15%><!--mstheme--><font face="Arial, Arial, Helvetica">Patient's Hb <BR>(g/dl)<!--mstheme--></font></TH>

<TH WIDTH=35%><!--mstheme--><font face="Arial, Arial, Helvetica">Minimum Hb <BR>(g/dl)<!--mstheme--></font></TH>

<TH WIDTH=35%><!--mstheme--><font face="Arial, Arial, Helvetica">Body Composition <BR> (ml blood per kg)<!--mstheme--></font></TH></TR>



<TR>

<TH><!--mstheme--><font face="Arial, Arial, Helvetica"><INPUT TYPE=TEXT NAME=wt  SIZE=10 onFocus="this.form.wt.value=''"><!--mstheme--></font></TH>

<TH><!--mstheme--><font face="Arial, Arial, Helvetica"><INPUT TYPE=TEXT NAME=hba  SIZE=10 onFocus="this.form.hba.value=''"><!--mstheme--></font></TH>

<TH><!--mstheme--><font face="Arial, Arial, Helvetica"><INPUT TYPE=TEXT NAME=hbl  SIZE=10 onFocus="this.form.hbl.value=''"><!--mstheme--></font></TH>

<TH><!--mstheme--><font face="Arial, Arial, Helvetica"><INPUT TYPE=TEXT NAME=comp  SIZE=10 onFocus="this.form.comp.value=''"><!--mstheme--></font></TH></TR>

<TR>

<TH COLSPAN=2><!--mstheme--><font face="Arial, Arial, Helvetica">Patient's MABL<!--mstheme--></font></TH>

<TH COLSPAN=2><!--mstheme--><font face="Arial, Arial, Helvetica">My Comment<!--mstheme--></font></TH>

</TR>



<TR>

<TH COLSPAN=2><!--mstheme--><font face="Arial, Arial, Helvetica">**<INPUT TYPE=TEXT NAME="ptmabl"  SIZE=10>**<!--mstheme--></font></TH>

<TH COLSPAN=2><!--mstheme--><font face="Arial, Arial, Helvetica">**<INPUT TYPE=TEXT NAME="my_comment" SIZE=40>**<!--mstheme--></font></TH>

</TR></TABLE><!--mstheme--><font face="Arial, Arial, Helvetica">



<P>

<INPUT TYPE="button" VALUE="Let's See!" onClick="computeform(this.form)">

<INPUT TYPE="button" VALUE="Set to Defaults" onClick="SetForm(this.form)">

<INPUT TYPE="reset"  VALUE="Clear All" onClick="ClearForm(this.form)">

</FORM></CENTER>

<!--msthemeseparator--><p align="center"><img src="_themes/copy-3-of-blank/ablrule.gif" width="600" height="10"></p>

<B>Disclaimer</B>:

The formula used is:<BR>MABL=[(Hb-MinimumHb)/Hb]x(Weight in kgs) x (mls of blood per kg body weight).<BR>

This form is only meant to be a demonstration of how Javascript(tm) could be used

on a Web Page. Information it contains may not be accurate and is not designed

or intended to serve as medical advice. I shall not be liable for any damages suffered as a result of using this form or script.<P>

<!--msthemeseparator--><p align="center"><img src="_themes/copy-3-of-blank/ablrule.gif" width="600" height="10"></p>

<CENTER>



<H5>&copy;1997 John Oyston (oyston@oyston.com)<BR>

Loosely based on a Body Mass program by Ashley Cheng<BR> (ackcheng@ha.org.hk, "http://www.iohk.com/UserPages/acheng")<BR>

You may make one copy of this page for your own personal use.

</H5></CENTER>

<!--mstheme--></font></BODY>

</HTML>
Avatar billede janbb Juniormester
24. maj 2004 - 23:54 #4
altsaa denne knap:

<INPUT TYPE="button" VALUE="Let's See!" onClick="computeform(this.form)">

  hvordan han har fået den kan jeg ikke gennemskue så jeg kan bruge den i mit eget eks.
Avatar billede janbb Juniormester
25. maj 2004 - 00:36 #5
Har fundet ud af det med kappen :)

<INPUT TYPE="button" VALUE="Let's See!" onClick="regn_perspiratioen(form)">

det var ikke så svært.Jeg prøver at nørkle lidt med defaults.

olebole: husk og læg svar hvis du vil have points.
Avatar billede janbb Juniormester
25. maj 2004 - 00:48 #6
man kan desværre ikke:

function set_tilfoert(form)
    {
    var a;
    a= eval(form.tilfoert.value);
    form.vaegten.value= "70";
    form.hoejden.value= "170";
    form.tilfoert.value= a;
    regn_perspiratioen(form);
    }
det er noget rod.Men det er osse ok nu.
Avatar billede janbb Juniormester
28. maj 2004 - 15:26 #7
jamen så må  jeg jo selv ta points :)
Siger mange tak.
Avatar billede janbb Juniormester
28. maj 2004 - 15:27 #8
lukker
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi tilbyder markedets bedste kurser inden for webudvikling

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester