BMI Metric source code in Liberty basics

By Hassnain Jamil -

Body Mass Index Implementation

First Screen


Result Screen



[setup.main.Window]
    '-----Begin code for #main

    WindowWidth = 365
    WindowHeight = 220
    UpperLeftX=int((DisplayWidth-WindowWidth)/2)
    UpperLeftY=int((DisplayHeight-WindowHeight)/2)


    '-----Begin GUI objects code

    statictext #main.statictext1, "Enter Your Name",  15,  52, 102,  20
    TextboxColor$ = "white"
    textbox #main.name, 135,  47, 100,  25
    button #main.button3,"Proceed Now!",[BMI], UL,  15,  92,  95,  25

    '-----End GUI objects code

    open "untitled" for window as #main
    print #main, "font ms_sans_serif 10"

wait
[BMI]

    print #main.name, "!contents? name$"
    m1$ = "Welcome "+name$+" to BMI Calculator"
    notice m1$
    close #main
  '-----Begin code for #1

    WindowWidth = 550
    WindowHeight = 410
    UpperLeftX=int((DisplayWidth-WindowWidth)/2)
    UpperLeftY=int((DisplayHeight-WindowHeight)/2)


    '-----Begin GUI objects code

    statictext #1.statictext1, "You Height",  70,  52,  66,  20 '---- setting position of label
    TextboxColor$ = "white"
    textbox #1.tb1, 150,  47, 100,  25 '---- setting position of height text field
    statictext #1.statictext3, "(in Centimeters)", 150,  82,  92,  20
    statictext #1.statictext4, "Your weight",  70, 117,  69,  20
    textbox #1.tb2, 150, 112, 100,  25
    statictext #1.statictext6, "(in Kilograms)", 150, 147,  81,  20
    button #1.button8,"Compute BMI",[bmi], UL, 150, 177,  90,  25 '---- setting position button
    textbox #1.tb3, 150, 217, 100,  25

    '-----End GUI objects code

    open "Metric BMI" for window as #1 '---- setting the handler
    print #1, "font ms_sans_serif 10"




print #1, "trapclose [quit]"
wait
[bmi]

    print #1.tb1, "!contents? heightInCm$" '------ fetching the values from height text feild and storing result in heightInCm variable
    print #1.tb2, "!contents? weight$"  '------ fetching the valus from weight text field and storing result in heightInCm variable
    heightInMeter = 0.01 * val(heightInCm$) '------ converting the string vales of height txt field into number and measuring it in meters
    square = heightInMeter * heightInMeter '------- taking square of height according to the formula

    totalWeight = val(weight$) '------ converting the string value of weight into number
    result = totalWeight/square '----- applying formula to caculate the Metric BMI
    print #1.tb3, result '------ displaying the result into the text field
    if result<18.5 then notice "You have low BMI"
    if result>18.5 and result<25 then notice "You have normal BMI"
    if result>25 then notice "You have high BMI"
    wait
[quit]
close #main
stop
download now!





CONTACT DETAILS

For any other questions or other tasks please feel free to contact me
via email: mhassnainjamil@gmail.com
via WhatsApp: +92-324-7042178
via skype: hassnainjamil1

Comments

Post a Comment

Popular posts from this blog

[SOLVED] Tape for a Turing Machine using Doubly-linked List in Java with full source code

By Anonymous -
Tape for a Turing Machine (Doubly-linked List) Short exercise in which you will code part of an existing project. In this case, you will be working with a doubly-linked list. To make this topic more interesting, the list that you work on will be part of a Turing Machine. A Turing Machine is a kind of very simple, abstract computing device that was introduced in the 1930's by Alan Turing as a way of studying computation and its limitations. The classes that you need for the lab are in a package named turing. You will define a new class named Tape in this package. You can find the Java source in the code directory. You should copy this directory into an Eclipse project. There will be errors, since the existing classes depend on the Tape class, which you have not yet written. Don't forget the Javadoc comments. A Class for Turing Machine Tapes A Turing machine works on a "tape" that is used for both input and output. The tape is made up of little squares called cell...
Read more

[SOLVED] ICT285 Databases TMA 2017 Assignment 1 | Relational Algebra, Database Design & Implementation

By Anonymous -
Relational Algebra A database records information about athletes competing at the Olympics. An athlete competes for a particular country in one or more events. Events take place at a scheduled day and time in a particular venue. The result (rank) is recorded for all athletes in the final of the event. The medal (gold, silver or bronze) is also recorded for the medal winners in the event. Note that we are not considering team sports or heats in this example – only individuals competing in the finals. The schema for this database is as follows: (Note that primary keys are shown underlined, foreign keys in bold). ATHLETE ( AthleteNo , AthleteName, CountryName) COUNTRY ( CountryName , NumberOfCompetitors) EVENT (EventName, ScheduledStart, VenueName ) VENUE (VenueName, City, Capacity) FINAL ( AthleteNo , EventName , Rank, Medal) Provide relational algebra (NOT SQL) queries to find the following informaList the name and country of all athletes. List the event name and scheduled...
Read more