home *** CD-ROM | disk | FTP | other *** search
- /* CALCULA.DCL
- Realizado por Javier Erce
- versión 1.12 para autocad 12
- 11 Mayo 1.994
- */
-
- ddcal : dialog {
- label = "Calculadora de bolsillo";
- : boxed_column {
- : boxed_row {
- : text {
- label = "por Javier Erce ";
- key = "cal_tipo";
- }
- : text {
- label = " 0";
- key = "cal_pan";
- }
- }
- }
- : boxed_row {
- : boxed_column {
- : button {
- key = "cal_dec";
- label = "DEC.";
- edit_width = 5;
- }
- : button {
- key = "cal_ult";
- label = "==>";
- edit_width = 5;
- }
- : button {
- key = "cal_bop";
- label = "BPar";
- edit_width = 5;
- }
- : button {
- key = "cal_bot";
- label = "BTot";
- edit_width = 5;
- }
- }
- : boxed_column {
- : row {
- : button {
- key = "cal_7";
- label = "7";
- edit_width = 8;
- }
- : button {
- key = "cal_8";
- label = "8";
- edit_width = 8;
- }
- : button {
- key = "cal_9";
- label = "9";
- edit_width = 8;
- }
- }
- : row {
- : button {
- key = "cal_4";
- label = "4";
- edit_width = 8;
- }
- : button {
- key = "cal_5";
- label = "5";
- edit_width = 8;
- }
- : button {
- key = "cal_6";
- label = "6";
- edit_width = 8;
- }
- }
- : row {
- : button {
- key = "cal_1";
- label = "1";
- edit_width = 8;
- }
- : button {
- key = "cal_2";
- label = "2";
- edit_width = 8;
- }
- : button {
- key = "cal_3";
- label = "3";
- edit_width = 8;
- }
- }
- : row {
- : button {
- key = "cal_0";
- label = "0";
- edit_width = 8;
- }
- : button {
- key = "cal_00";
- label = " 00 ";
- edit_width = 8;
- }
- : button {
- key = "cal_pun";
- label = ".";
- edit_width = 8;
- }
- }
- }
- : boxed_column {
- : row {
- : button {
- key = "cal_rac";
- label = "Raiz";
- edit_width = 5;
- }
- : button {
- key = "cal_tan";
- label = "%";
- edit_width = 5;
- }
- }
- : row {
- : button {
- key = "cal_por";
- label = "x";
- edit_width = 5;
- }
- : button {
- key = "cal_div";
- label = "÷";
- edit_width = 5;
- }
- }
- : row {
- : button {
- key = "cal_mas";
- label = "+";
- edit_width = 5;
- }
- : button {
- key = "cal_men";
- label = "-";
- edit_width = 5;
- }
- }
- : row {
- : button {
- key = "cal_igu";
- label = "=";
- edit_width = 10;
- }
- }
- }
- : boxed_column {
- : button {
- key = "cal_mc";
- label = "MBor";
- edit_width = 5;
- }
- : button {
- key = "cal_mr";
- label = "MVer";
- edit_width = 5;
- }
- : button {
- key = "cal_mme";
- label = "M-";
- edit_width = 5;
- }
- : button {
- key = "cal_mma";
- label = "M+";
- edit_width = 5;
- }
- }
- }
- spacer_1;
- ok_only;
- }
-