Re: Hiện tại đang thiếu phiên bản ShortCutMe 5.6.2 - 5.9.2 cho các dòng BB, ai có thì share cho người khác với!

Đây là macro của mình về tính chỉ số BMI
Khác biệt 1 chút về phần tính chỉ số BMI
Mọi người xem tham khảo thêm
Tính chỉ số BMI
- App Name : macro
- Shortcut : tùy ý
- Macro :
// tính chiều cao (cm) & cân nặng (kg)
input $chieucao;
input $cannang;

mult $chieucao, $chieucao;
set $h = $$result;
mult $cannang, 10000;
set $w = $$result;

// tính trên calculator
launch calculator; delay200;
delkey; delay200;
spkey$w; delay200;
spkeyg; delay200;
spkey$h; delay200;
spkeyo; delay200;
menukey; navmoveup3;
keyc; delay200;
enterkey; delay200;
esckey;

// phân loại BMI
mult $h, 16; set $a = $$result;
mult $h, 18; set $b = $$result;
mult $h, 25; set $c = $$result;
mult $h, 30; set $d = $$result;
mult $h, 35; set $e = $$result;
mult $h, 40; set $f = $$result;

if0 $w < $a;
then0;
set $loai = Suy dinh dưỡng;
elseif0 $w < $b;
set $loai = Gầy;
elseif0 $w < $c;
set $loai = Bình thường;
elseif0 $w < $d;
set $loai = Hơi béo;
elseif0 $w < $e;
set $loai = Béo phì độ I;
elseif0 $w < $f;
set $loai = Béo phì độ II;
elseif0 $w > $f;
set $loai = Béo phì độ III;
endif0;

promptTình Trạng $Loai .
Bạn có muốn lưu log vào Memopad ?;

// lưu vào memopad
launch memopad; delay200;
keyMy BMI; enterkey;
navmovedown4; delay200;
enterkey; enterkey;

key• sd lt :
- chieeuf cao : $chieucao cm
- caan nawngj : $cannang kg
=> chir soos BMI : ;
spacekey; pastefromcb;
key
* trangj thais : $loai;
enterkey; delay200;

esckey; delay200;
keys; delay200;
esckey; delay200; esckey;

Nếu bạn nào không hiểu cách tính chỉ số BMI của macros thì mình sẽ trình bày rõ

Về phần toán học thì có nhiều soft tính toán rồi
Nhưng làm trên macro để cho nó thêm phong phú, để cho mọi người thấy sự phong phú của SCM
Với lại khi nhìn nó chạy khi thực hiện macro cũng zui zui

Ai có công thức toán học thì share cho mọi người, mình sẽ cố gắng hoàn thành macros đó

[ Posted by Mobile Device ]