You can subscribe to this list here.
2003 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(60) |
---|---|---|---|---|---|---|---|---|---|---|---|---|
2004 |
Jan
(280) |
Feb
(411) |
Mar
(455) |
Apr
(367) |
May
(125) |
Jun
(155) |
Jul
(266) |
Aug
(131) |
Sep
(223) |
Oct
(76) |
Nov
(103) |
Dec
(132) |
2005 |
Jan
(70) |
Feb
(113) |
Mar
(57) |
Apr
(38) |
May
(110) |
Jun
(74) |
Jul
(365) |
Aug
(198) |
Sep
(116) |
Oct
(119) |
Nov
(184) |
Dec
(55) |
2006 |
Jan
(97) |
Feb
(70) |
Mar
(51) |
Apr
(16) |
May
(46) |
Jun
(176) |
Jul
(305) |
Aug
(427) |
Sep
(223) |
Oct
(121) |
Nov
(112) |
Dec
(48) |
2007 |
Jan
(16) |
Feb
(19) |
Mar
(67) |
Apr
(69) |
May
(48) |
Jun
(35) |
Jul
(26) |
Aug
(44) |
Sep
(33) |
Oct
(86) |
Nov
(15) |
Dec
(28) |
2008 |
Jan
(120) |
Feb
(7) |
Mar
(76) |
Apr
(47) |
May
(41) |
Jun
(24) |
Jul
(25) |
Aug
(34) |
Sep
(58) |
Oct
(7) |
Nov
(16) |
Dec
(40) |
2009 |
Jan
(17) |
Feb
(53) |
Mar
(121) |
Apr
(69) |
May
(28) |
Jun
(39) |
Jul
(12) |
Aug
(22) |
Sep
(25) |
Oct
(15) |
Nov
(53) |
Dec
(9) |
2010 |
Jan
(10) |
Feb
(30) |
Mar
(10) |
Apr
(44) |
May
(36) |
Jun
(14) |
Jul
(21) |
Aug
(19) |
Sep
(1) |
Oct
(6) |
Nov
(22) |
Dec
(11) |
2011 |
Jan
(10) |
Feb
(45) |
Mar
(6) |
Apr
(7) |
May
(38) |
Jun
(40) |
Jul
(248) |
Aug
(150) |
Sep
(124) |
Oct
(40) |
Nov
(36) |
Dec
(57) |
2012 |
Jan
(64) |
Feb
(22) |
Mar
(14) |
Apr
(20) |
May
(54) |
Jun
(27) |
Jul
(36) |
Aug
(63) |
Sep
(11) |
Oct
(4) |
Nov
(13) |
Dec
(33) |
2013 |
Jan
(49) |
Feb
(36) |
Mar
(8) |
Apr
(17) |
May
(34) |
Jun
(24) |
Jul
(45) |
Aug
(4) |
Sep
(14) |
Oct
(8) |
Nov
(3) |
Dec
(16) |
2014 |
Jan
(32) |
Feb
(10) |
Mar
(41) |
Apr
(35) |
May
(23) |
Jun
(9) |
Jul
(110) |
Aug
(9) |
Sep
(12) |
Oct
(6) |
Nov
(16) |
Dec
(77) |
2015 |
Jan
(249) |
Feb
(9) |
Mar
(95) |
Apr
(28) |
May
(126) |
Jun
(151) |
Jul
(11) |
Aug
(35) |
Sep
(258) |
Oct
(198) |
Nov
(123) |
Dec
(186) |
2016 |
Jan
(166) |
Feb
(100) |
Mar
(11) |
Apr
(4) |
May
(24) |
Jun
(13) |
Jul
(34) |
Aug
(18) |
Sep
(8) |
Oct
(49) |
Nov
(69) |
Dec
(33) |
2017 |
Jan
(20) |
Feb
(29) |
Mar
(2) |
Apr
(4) |
May
(33) |
Jun
(32) |
Jul
(16) |
Aug
(8) |
Sep
|
Oct
(67) |
Nov
(39) |
Dec
(4) |
2018 |
Jan
(29) |
Feb
(42) |
Mar
(2) |
Apr
(5) |
May
(13) |
Jun
(24) |
Jul
(160) |
Aug
(76) |
Sep
(64) |
Oct
(42) |
Nov
(47) |
Dec
(32) |
2019 |
Jan
(33) |
Feb
(29) |
Mar
(36) |
Apr
(11) |
May
(11) |
Jun
(18) |
Jul
(20) |
Aug
(11) |
Sep
(7) |
Oct
(16) |
Nov
(3) |
Dec
(20) |
2020 |
Jan
(10) |
Feb
|
Mar
(10) |
Apr
(13) |
May
(53) |
Jun
(26) |
Jul
(8) |
Aug
(20) |
Sep
(8) |
Oct
(60) |
Nov
(93) |
Dec
(119) |
2021 |
Jan
(20) |
Feb
(54) |
Mar
(26) |
Apr
(17) |
May
(200) |
Jun
(231) |
Jul
(124) |
Aug
(100) |
Sep
(25) |
Oct
(18) |
Nov
(17) |
Dec
(93) |
2022 |
Jan
(129) |
Feb
(59) |
Mar
(58) |
Apr
(70) |
May
(39) |
Jun
(22) |
Jul
(83) |
Aug
(110) |
Sep
(65) |
Oct
(80) |
Nov
(42) |
Dec
(19) |
2023 |
Jan
(145) |
Feb
(118) |
Mar
(179) |
Apr
(76) |
May
(46) |
Jun
(67) |
Jul
(76) |
Aug
(69) |
Sep
(31) |
Oct
(52) |
Nov
(82) |
Dec
(46) |
2024 |
Jan
(51) |
Feb
(97) |
Mar
(50) |
Apr
(51) |
May
(150) |
Jun
(96) |
Jul
(117) |
Aug
(87) |
Sep
(30) |
Oct
|
Nov
|
Dec
|
From: Paul D. <duf...@zo...> - 2024-09-16 07:45:57
|
I finally found an 'easy' way to do menus, without using interpret, or regutil library: options ANSI menu.animal.0=3 /* I have 3 animals */ menu.animal.1='dog' menu.animal.2='cat' menu.animal.3='squirrel' menu.color.0=5 menu.color.1="green" menu.color.2='blue' menu.color.3='Yellow' menu.color.4='purple' menu.color.5='brown' call showMenu 'color' call showMenu 'animal' exit 0 showMenu: procedure expose menu. parse arg mymenu do index = 1 to value(menu.mymenu.0) say index'.'value(menu.mymenu.index) end return paul@fedora:~/myrex$ regina mymenu.rex 1.green 2.blue 3.Yellow 4.purple 5.brown 1.dog 2.cat 3.squirrel paul@fedora:~/myrex$ |
From: Paul D. <duf...@zo...> - 2024-09-16 01:57:21
|
It is beginning to work. Not all units proposed have been integrated. Attached the program... but I doubt it will pass to the mailing list... so copying it in the message: /* Copyright 2024 Paul Dufresne (duf...@zo...) Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the “Software”), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so. THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ /* This program is written in REXX... see https://rexxinfo.org/reference/index_reference.html for more information about this programming language. */ /* This program allows you to convert from one unit of measure to an other one. */ /* This program when named unitconv.rex can be executed with: regina unitconv.rex or rexx unticonv.rex */ /* I don't know if it was a good idea to remove the fromUnit of the toUnits menu, because that make units to number menu change between the 2 menus... changed! */ useAvoid=0 /* if 1, the fromUnit will not be in toUnit menu... which change menu numbers... bad */ Say 'Welcome to ConvREXXter v.0.5' Say call askConvertions Say 'Thank you for using my program!' Say Say 'If your plane crashed because your pilot used my program,' Say 'please send me the details...' Say 'so that I can eventually fix it in a future version.' Say Say 'Seriously, send your comments/bugs messages to duf...@zo...' exit 0 askConvertions: procedure expose useAvoid finished = 0 do until finished call makeTopMenu say 'What kind of measurements you want to convert?' call showMenu select when RESULT='SPEED' then do call makeSpeedMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makeSpeedMenu fromUnit else call makeSpeedMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'SPEED' end when RESULT='DISTANCE' then do call makeDistanceMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makeDistanceMenu fromUnit else call makeDistanceMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'DISTANCE' end when RESULT='AREA' then do call makeAreaMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makeAreaMenu fromUnit else call makeAreaMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'AREA' end when RESULT='VOLUME' then do call makeVolumeMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makeVolumeMenu fromUnit else call makevolumeMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'VOLUME' end when RESULT='WEIGHT' then do call makeWeightMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makeWeightMenu fromUnit else call makeWeightMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'WEIGHT' end when RESULT='TEMPERATURE' then do call makeTemperatureMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makeTemperatureMenu fromUnit else call makeTemperatureMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'TEMPERATURE' end when RESULT='POWER' then do call makePowerMenu,'' call showMenu fromUnit=RESULT if useAvoid then call makePowerMenu fromUnit else call makePowerMenu call showMenu toUnit=RESULT call doSomeConvertions fromUnit,toUnit,'POWER' end otherwise say 'Unknown choice!' end Say 'Do others conversions?' pull answer if answer=='N' | answer=='NO' then finished=1 end return makeTopMenu: procedure queue 'SPEED' queue 'DISTANCE' queue 'AREA' queue 'VOLUME' queue 'WEIGHT' queue 'TEMPERATURE' queue 'POWER' return queueIf: procedure parse arg element,avoid if element <> avoid then queue element return showMenu: procedure drop menu. number = queued() Do i=1 to number PULL element call fancy element SAY i'. 'RESULT menu.i=element END pull answer return menu.answer makeSpeedMenu: procedure parse arg avoid call queueIf 'MPH',avoid call queueIf 'KMH',avoid call queueIf 'MPS',avoid call queueIf 'KN',avoid return makeDistanceMenu: procedure parse arg avoid call queueIf 'MILIMETER',avoid call queueIf 'CENTIMETER',avoid call queueIf 'METER',avoid call queueIf 'KM',avoid call queueIf 'YARD',avoid call queueIf 'FOOT',avoid call queueIf 'INCH',avoid call queueIf 'MILE',avoid return makeAreaMenu: procedure parse arg avoid call queueIf 'M2',avoid call queueIf 'KM2',avoid call queueIf 'CM2',avoid call queueIf 'MM2',avoid call queueIf 'MI2',avoid call queueIf 'YD2',avoid call queueIf 'FT2',avoid call queueIf 'IN2',avoid call queueIf 'HA',avoid return makeVolumeMenu: procedure parse arg avoid call queueIf 'CUBEMETER',avoid call queueIf 'CENTILITER',avoid call queueIf 'LITER',avoid call queueIf 'DECILITER',avoid call queueIF 'MILIMETER',avoid call queueIF 'GAL',avoid call queueIF 'PT',avoid call queueIF 'FLOZ',avoid return makeWeightMenu: procedure parse arg avoid call queueIf 'GRAM',avoid call queueIf 'KG',avoid call queueIf 'LB',avoid call queueIf 'OZ',avoid return makeTemperatureMenu: procedure parse arg avoid call queueIf 'C',avoid call queueIf 'F',avoid call queueIf 'K',avoid return makePowerMenu: procedure parse arg avoid call queueIf 'W',avoid call queueIf 'hp',avoid return doSomeConvertions: procedure parse arg fromUnits,toUnits,typeConv finished=0 do until finished call fancy fromUnits fancyFromUnits=RESULT call fancy toUnits fancyToUnits=RESULT say 'Convert how many 'fancyFromUnits'?' pull amount call convert amount,fromUnits,toUnits,typeConv say 'it is equivalent to 'RESULT' 'fancyToUnits'.' say 'Do more of that kind of conversions?' pull yesNo if yesNo == 'N' | yesNo == 'NO' | yesNo='Q' | yesNo='QUIT' | yesNO='STOP' then finished=1 end return convert: procedure parse arg amount,fromUnits,toUnits,typeconv /*say 'amount='amount' fromUnits='fromUnits' toUnits='toUnits' typeconv='typeconv */ select when typeConv=='SPEED' then do interpret 'CALL 'fromUnits'2'KMH amount interpret 'CALL KMH2'toUnits RESULT return RESULT end when typeConv=='DISTANCE' then do interpret 'CALL 'fromUnits'2'METER amount interpret 'CALL 'METER'2'toUnits RESULT return RESULT end when typeConv=='AREA' then do interpret 'CALL 'fromUnits'2'M2 amount interpret 'CALL 'M2'2'toUnits RESULT return RESULT end when typeConv=='VOLUME' then do interpret 'CALL 'fromUnits'2'LITER amount interpret 'CALL 'LITER'2'toUnits RESULT RETURN RESULT end when typeConv=='WEIGHT' then do interpret 'CALL 'fromUnits'2'KG amount interpret 'CALL 'KG'2'toUnits RESULT return RESULT end when typeConv=='POWER' then do interpret 'CALL 'fromUnits'2'W amount interpret 'CALL 'W'2'toUnits RESULT return rESULT end when typeConv=='TEMPERATURE' then do interpret 'CALL 'fromUnits'2'C amount interpret 'CALL 'C'2'toUnits RESULT return RESULT end otherwise say typeConv' is an unknown type of conversion!' end return fancy: procedure parse arg rawUnit select when rawUnit=='MPH' then return 'miles per hour' when rawUnit=='KMH' then return 'kilometers per hour' when rawUnit=='MPS' then return 'meters per hour' when rawUnit=='KN' then return 'knots' /*---*/ when rawUnit=='MILIMETER' then return 'milimeters' when rawUnit=='CENTIMETER' then return 'centimeters' when rawUnit=='METER' then return 'meters' when rawUnit=='KM' then return 'kilometers' when rawUnit=='YARD' then return 'yards' when rawUnit=='FOOT' then return 'feets' when rawUnit=='INCH' then return 'inches' when rawUnit=='MILE' then return 'miles' /*---*/ when rawUnit=='M2' then return 'square meters' when rawUnit=='KM2'then return 'square kilometers' when rawUnit=='CM2' then return 'square centimeters' when rawUnit=='MM2' then return 'square milimeters' when rawUnit=='MI2' then return 'square miles' when rawUnit=='YD2' then return 'square yards' when rawUnit=='FT2' then return 'square feets' when rawUnit=='IN2' then return 'square inches' when rawUnit=='HA' then return 'hectares' /*---*/ when rawUnit=='CUBEMETER' then return 'cube meters' when rawUnit=='CENTILITER' then return 'centiliters' when rawUnit=='DECILITER' then return 'deciliters' when rawUnit=='LITER' then return 'liters' when rawUnit=='MILILITERS' then retrun 'mililiters' when rawUnit=='GAL' then return 'gallons (imperial)' when rawUnit=='PT' then return 'pints' when rawUnit=='FLOZ' then return 'fluid ounces' /*---*/ when rawUnit=='GRAM' then return 'grams' when rawUnit=='KG' then return 'kilograms' when rawUnit=='OZ' then return 'ounces' when rawUnit=='LB' then return 'pounds' /*---*/ when rawUnit=='C' then return 'celsius' when rawUnit=='K' then return 'kelvins' when rawUnit=='F' then return 'farenheits' /*---*/ when rawUnit=='WATT' then return 'watts' when rawUnit=='hp' then return 'horse powers' /*---*/ otherwise return rawUnit end return rawUnit /* I/we need conversions functions from any units to the standard unit, and from the standard unit to any units. */ /* For speed, standard unit is KMH */ MPH2KMH: procedure parse arg MPH return 1.60934*MPH KMH2KMH: procedure parse arg KMH return KMH MPS2KMH: procedure parse arg MPS return MPS*3600/1000 KN2KMH: procedure parse arg knots return knots*1.852 KMH2MPH: procedure parse arg KMH return KMH/1.60934 KMH2MPS: procedure parse arg KMH return KMH*1000/3600 KMH2KN: procedure parse arg KMH return KMH/1.852 /* knots */ /* for distances, standard unit is the meter */ MILIMETER2METER: procedure parse arg milimeters return milimeters/1000 CENTIMETER2METER: procecure parse arg centimeter return centimeter/100 METER2METER: procedure parse arg meter return meter KM2METER: procedure parse arg km return km*1000 YARD2METER: procedure parse arg yard return yard*0.9144 FOOT2METER: procedure parse arg foot return foot/3.28 INCH2METER: procedure parse arg inch return inch*0.0254 MILE2METER: procedure parse arg mile return mile*1609.344 METER2MILIMETER: procedure parse arg meter return meter*1000 METER2CENTIMETER: procedure parse arg meter return meter*100 METER2KM: procedure parse arg meter return meter/1000 METER2YARD: procedure parse arg meter return meter/0.9144 METER2FOOT: procedure parse arg meter return meter*3.28 METER2INCH: procedure parse arg meter return meter/0.025 /* For areas, standard unit is M2 (square meter) */ M22M2: procedure parse arg m2 return m2 KM22M2: procedure parse arg km2 return km2*1000*1000 CM22M2: procedure parse arg cm2 return cm2*0.0001 MM22M2:procedure parse arg mm2 return mm2/1000000 MI22M2:procedure parse arg mi2 return mi2*2589988.110336 YD22M2:procedure parse arg yd2 return yd2*0.8361 FT22M2:procedure parse arg ft2 return ft2*0.09290304 IN22M2:procedure parse arg in2 return in2*0.00064516 HA2M2:procedure parse arg hectare return hectare * 10000 /*---*/ M22KM2: procedure parse arg m2 return m2/(1000*1000) M22CM2: procedure parse arg m2 return m2/0.0001 M22MM2:procedure parse arg m2 return m2*1000000 M22MI2:procedure parse arg m2 return m2/2589988.110336 M22YD2:procedure parse arg m2 return m2/0.8361 M22FT2:procedure parse arg m2 return m2/0.09290304 M22IN2:procedure parse arg m2 return m2/0.00064516 M22HA:procedure parse arg m2 return m2/10000 /* For volume, I choosed liter for standard unit */ M32LITER: procedure parse arg m3 return m3*1000 CENTILITER2LITER: procedure parse arg centiliter return centiliter/100 LITER2LITER: procedure parse arg liter return liter DECILITER2LITER: procedure parse arg deciliter return deciliter/10 MILILITER2LITER: procedure parse arg mL return mL/1000 GAL2LITER: procedure parse arg gal /* american gallon */ return gal*3.785 PT2LITER: procedure parse arg pint return pint * 0.473176 FLOZ2LITER: procedure parse arg floz /* fluid ounce */ return floz * 0.029574 /****/ LITER2M3: procedure parse arg liter return liter/1000 LITER2CENTILITER: procedure parse arg liter return liter*100 LITER2DECILITER: procedure parse arg liter return liter*10 LITER2MILILITER: procedure parse arg liter return liter*1000 LITER2GAL: procedure parse arg liter return liter/3.785 LITER2PT: procedure parse arg liter return liter/0.473176 /* pints */ LITER2FLOZ: procedure parse arg liter return liter / 0.029574 /* For weight measures, KG was chosen as the standard unit by me */ GRAM2KG: procedure parse arg gram return gram / 1000 KG2KG: procedure parse arg kg return kg LB2KG: procedure parse arg lb return lb * 0.45359237 OZ2KG: procedure parse arg oz return oz * 0.028349523 /*---*/ KG2GRAM: procedure parse arg kg return kg * 1000 KG2LB: procedure parse arg kg return kg / 0.45359237 KG2OZ: procedure parse arg kg return kg / 0.028349523 /* For temperature measurements, C(elsius) was chosen as standard unit */ C2C: procedure parse arg celsius return celsius F2C: procedure parse arg farenheit return (farenheit - 32)*5/9 K2C: procedure parse arg kelvin return kelvin - 273.15 /*-----------*/ C2F: procedure parse arg celsius return (9/5)* celsius + 32 C2K: procedure parse arg celsius return celsius + 273.15 /* For power measurements, I have chosen the Watt for standard unit */ W2W: procedure parse arg watt return watt HP2W: procedure parse arg hp /* horse power! */ return hp * 746 /*------*/ W2HP: procedure parse arg watt return watt / 746 |
From: Paul D. <duf...@zo...> - 2024-09-14 19:32:38
|
I am trying a different approach for this program... that should make it more compatible. Just one measure unit conversion function implemented... so many job to be done... /* Copyright 2024 Paul Dufresne (duf...@zo...) Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the “Software”), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so. THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ /* This program is written in REXX... see https://rexxinfo.org/reference/index_reference.html for more information about this programming language. */ call makeTopMenu call showMenu select when RESULT='SPEED' then do call makeSpeedMenu,'' call showMenu fromUnit=RESULT call MakeSpeedMenu fromUnit call showMenu toUnit=RESULT call convert fromUnit,toUnit end when RESULT='DISTANCE' then do call makeDistanceMenu,'' call showMenu fromUnit=RESULT call MakeDistanceMenu fromUnit call showMenu toUnit=RESULT call convert fromUnit,toUnit end when RESULT='VOLUME' then do call makeVolumeMenu,'' call showMenu fromUnit=RESULT call MakeVolumeMenu fromUnit call showMenu toUnit=RESULT call convert fromUnit,toUnit end when RESULT='AREA' then do call makeAreaMenu,'' call showMenu fromUnit=RESULT call MakeAreaMenu fromUnit call showMenu toUnit=RESULT call convert fromUnit,toUnit end when RESULT='WEIGHT' then do call makeWeightMenu,'' call showMenu fromUnit=RESULT call MakeWeightMenu fromUnit call showMenu toUnit=RESULT call convert fromUnit,toUnit end otherwise say 'Unknown choice!' end exit 0 makeTopMenu: queue 'SPEED' queue 'DISTANCE' queue 'AREA' queue 'VOLUME' queue 'POWER' return queueIf: parse arg element,avoid if element <> avoid then queue element return showMenu: drop menu. number = queued() Do i=1 to number PULL element SAY i'. 'element menu.i=element END pull answer return menu.answer makeSpeedMenu: parse arg avoid call queueIf 'MPH',avoid call queueIf 'KMH',avoid call queueIf 'MPS',avoid call queueIf 'KN',avoid return makeDistanceMenu: parse arg avoid call queueIf 'MILIMETER',avoid call queueIf 'CENTIMETER',avoid call queueIf 'METER',avoid call queueIf 'KM',avoid call queueIf 'YARD',avoid call queueIf 'FOOT',avoid call queueIf 'INCH',avoid call queueIf 'MILES',avoid return makeVolumeMenu: parse arg avoid call queueIf 'CUBEMETER',avoid call queueIf 'CENTILITER',avoid call queueIf 'LITER',avoid call queueIf 'DECILITER',avoid call queueIF 'MILIMETER',avoid call queueIF 'GAL',avoid call queueIF 'PT',avoid call queueIF 'FLOZ',avoid return makeAreaMenu: parse arg avoid call queueIf 'M2',avoid call queueIf 'KM2',avoid call queueIf 'CM2',avoid call queueIf 'MM2',avoid call queueIf 'MI2',avoid call queueIf 'YD2',avoid call queueIf 'FT2',avoid call queueIf 'IN2',avoid return makeWeightMenu: parse arg avoid call queueIf 'GRAM',avoid call queueIf 'KG',avoid call queueIf 'LB',avoid call queueIf 'OZ',avoid return convert: parse arg fromUnits,toUnits say 'Enter amount of 'fromUnits pull amount function=fromUnits"2"toUnits callLine="call "function" "amount interpret callLine say 'give 'RESULT' 'toUnits say 'again?' pull yesNo if yesNo == 'Y' | yesNo == 'YES' then call convert fromUnits,toUnits return MPH2KMH: parse arg MPH return 1.60934*MPH KMH2MPH: parse arg KMH if KMH <> 0 then return KMH/1.60934 else return 0 |
From: Fritz M. <fri...@ma...> - 2024-09-14 12:48:23
|
<html><head></head><body><div style="font-family: Verdana;font-size: 12.0px;"><div> <div>This is only a list of what Bosch Calculator for Android does:</div> <div> </div> <div>Distance convertions:<br/> Please do not forget Millimeter, centimeter, Meter, Kilometer<br/> Yard, foot, zoll (inch?)</div> <div>Miles to Kilometer</div> <div> </div> <div>Speed:<br/> km/h, mph, m/s, kn</div> <div> </div> <div>Wind Strength:<br/> km/h, Bft,</div> <div> </div> <div>Pressure:<br/> bar, Pa, kPa, mWs, inWC, atm</div> <div> </div> <div>Power:<br/> W, PS (lmp), kW, MW</div> <div> </div> <div>Square:<br/> m2, km2, cm2, mm2, mi2, yd2 ft2, in2</div> <div> </div> <div>weight:<br/> gramm, Kilogramm, lb, oz etc.</div> <div><br/> Volume convertions:<br/> Please do not forget Centiliter, Liter, maybe Hektoliter (=100 Liter)</div> <div>m3, ft3, in3, Liter, deciliter, centiliter, milliliter, gal (lmp), pt (lmp), fl oz (lmp)</div> <div> </div> <div>Some more:<br/> MPG (Miles per gallon) to l/100km (Liter per 100 km)</div> <div> </div> </div> <div> <div> <div name="quote" style="margin:10px 5px 5px 10px; padding: 10px 0 10px 10px; border-left:2px solid #C3D9E5; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"> <div style="margin:0 0 10px 0;"><b>Sent:</b> Saturday, September 14, 2024 at 4:59 AM<br/> <b>From:</b> "Paul Dufresne via Freedos-devel" <fre...@li...><br/> <b>To:</b> "freedos-devel" <fre...@li...><br/> <b>Cc:</b> "Paul Dufresne" <duf...@zo...><br/> <b>Subject:</b> [Freedos-devel] a unit converter program in REXX... probably not working under DOS yet</div> <div name="quoted-content">It began when I did read:<br/> <a href="https://bttr-software.de/forum/board_entry.php?id=22023" target="_blank">https://bttr-software.de/forum/board_entry.php?id=22023</a><br/> <br/> I then did read:<br/> <a href="https://sourceforge.net/projects/regina-rexx/files/regina-documentation/3.9.6/" target="_blank">https://sourceforge.net/projects/regina-rexx/files/regina-documentation/3.9.6/</a><br/> <br/> Learn also about:<br/> <a href="https://www.oorexx.org/" target="_blank">https://www.oorexx.org/</a><br/> <br/> Also <a href="https://en.wikipedia.org/wiki/Rexx" target="_blank">https://en.wikipedia.org/wiki/Rexx</a> obviously.<br/> <br/> Rexx is an easy to read and learn programming language... but as it is not popular... have almost no GUI libraries...<br/> oorexx have a GTK v.2 binding ... a complete ncurses binding... regina rexx have very limited gotoxy and read char at xy.<br/> <br/> Anyway, I wrote a small program to convert units ... it is using a bit sophisticated stuff... making it sadly probably not usable for DOS as is.<br/> <br/> It just beginning to work... but I like to share soon as I am unsure if I will continue to work on it...<br/> The style I believe make it very easy to extend... I hope.<br/> <br/> I wrote it in unitsv1.rex file... and call it with regina unitsv1.rex<br/> <br/> I have installed on Fedora 40:<br/> regina-rexx.x86_64 : Regina Rexx Interpreter<br/> regina-rexx-doc.noarch : Documentation for regina-rexx<br/> regina-rexx-libs.x86_64 : Shared libraries for regina-rexx<br/> <br/> So here it is:<br/> <br/> /*<br/> Copyright 2024 Paul Dufresne (duf...@zo...)<br/> <br/> Permission is hereby granted, free of charge, to any person obtaining a copy of this software and<br/> associated documentation files (the “Software”), to deal in the Software without restriction,<br/> including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense,<br/> and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so.<br/> <br/> THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT<br/> LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN<br/> NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,<br/> WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE<br/> SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.<br/> */<br/> <br/> <br/> -- The following 2 calls are for loading regutil library<br/> -- it is needed only for regStemDoOver<br/> -- to work, program must be called with regina rather than rexx<br/> -- Because of this, it is believe the program cannot run under DOS<br/> call RxFuncAdd 'sysloadfuncs', 'regutil', 'sysloadfuncs'<br/> call sysloadfuncs<br/> <br/> menu. = 'not there!' -- default value<br/> <br/> menu.top.name='Conversions'<br/> menu.top.1='distance'<br/> menu.top.1.proc='showMenuDistance'<br/> menu.top.2='weight'<br/> menu.top.2.proc='showMenuWeight'<br/> menu.top.3='temperature'<br/> menu.top.3.proc='showMenuTemperature'<br/> menu.top.4='volume'<br/> menu.top.4.proc='showMenuVolume'<br/> menu.top.5='END'<br/> menu.top.back='bye'<br/> <br/> menu.distance.name='Distance convertions'<br/> menu.distance.1='centimeters to inch'<br/> menu.distance.1.proc="doSomeConversions 'centimeters','inches',centis2inches"<br/> menu.distance.2='inches to centimeters'<br/> menu.distance.2.proc="doSomeConversions 'inches','centimeters',inches2centis"<br/> menu.distance.3='END'<br/> menu.distance.back='doMenu top'<br/> <br/> menu.weight.name='Weight convertions'<br/> menu.weight.1='pounds to kilograms'<br/> menu.weight.1.proc="doSomeConversions 'pounds','kilos',pounds2kilos"<br/> menu.weight.2='kilograms to pounds'<br/> menu.weight.2.proc="doSomeConversions 'kilos','pounds',kilos2pounds"<br/> menu.weight.3='END'<br/> menu.weight.back='doMenu top'<br/> <br/> menu.temp.name='Temperature convertions'<br/> menu.temp.1='farenheits to celsius'<br/> menu.temp.1.proc="doSomeConversions 'farenheits','celsius',farens2celsius"<br/> menu.temp.2='celsius to farenheits'<br/> menu.temp.2.proc="doSomeConversions 'celsius','farenheits',celsius2farens"<br/> menu.temp.3='END'<br/> menu.temp.back='doMenu top'<br/> <br/> menu.vol.name='Volume convertions'<br/> menu.vol.1='gallons to cube meters'<br/> menu.vol.1.proc="doSomeConversions 'gallons','cube meters',gallons2cubemeters"<br/> menu.vol.2='cube meters to gallons'<br/> menu.vol.2.proc="doSomeConversions 'cube meters','gallons',cubemeters2gallons"<br/> menu.vol.3='END'<br/> menu.vol.back='doMenu top'<br/> <br/> call doMenu 'TOP'<br/> exit 0<br/> <br/> doMenu:<br/> drop mymenu.<br/> do while regstemdoover('menu.','i')<br/> if index(i,arg(1)) then do<br/> j=substr(i, index(i,'.')+1)<br/> mymenu.j=menu.i<br/> end<br/> end<br/> --call sysdumpvariables<br/> say mymenu.name<br/> i=1<br/> do until mymenu.i == 'END'<br/> say i'. 'mymenu.i<br/> i=i+1<br/> if i==14 then exit -- was added as a debug thing at the beginning... should probably be removed<br/> end<br/> pull choice<br/> --say 'choice.proc='mymenu.choice.proc<br/> --interpret "call "mymenu.choice.proc" "<br/> if choice=='' | choice=='Q' | choice=='QUIT'<br/> then interpret "call "mymenu.back<br/> else interpret "call "mymenu.choice.proc<br/> exit 888 -- not expected to happen because mymenu.back call Bye<br/> <br/> showMenuDistance:<br/> call doMenu 'DISTANCE'<br/> exit<br/> <br/> showMenuWeight:<br/> call doMenu 'WEIGHT'<br/> exit<br/> <br/> showMenuTemperature:<br/> call doMenu 'TEMP'<br/> exit<br/> <br/> showMenuVolume:<br/> call doMenu 'VOL'<br/> exit<br/> <br/> centis2inches:<br/> return arg(1)/2.54<br/> <br/> inches2centis:<br/> return arg(1)*2.54<br/> <br/> pounds2kilos:<br/> return arg(1)/2.18<br/> <br/> kilos2pounds:<br/> return arg(1)*2.18<br/> <br/> farens2celsius:<br/> return (arg(1)-32)*5/9<br/> <br/> celsius2farens:<br/> return (arg(1)*9/5)+32<br/> <br/> gallons2cubemeters:<br/> return arg(1)*0.00378541<br/> <br/> cubemeters2gallons:<br/> return arg(1)/0.00378541<br/> <br/> doSomeConversions:<br/> fini = 0<br/> do until fini<br/> Say 'Number of 'arg(1)':'<br/> pull originUnits<br/> if originUnits <> '' & originUnits <> 'END' & originUnits <> 'Q' & originUnits<>'QUIT' then do<br/> --say 'call 'arg(3)' 'orginUnits<br/> interpret 'call 'arg(3)' 'originUnits<br/> Say 'give 'RESULT' 'arg(2)<br/> Say<br/> end<br/> else fini=1<br/> end<br/> --say mymenu.back<br/> interpret "call "mymenu.back<br/> exit 999<br/> <br/> bye:<br/> say 'Goodbye!'<br/> exit 0<br/> <br/> <br/> <br/> <br/> <br/> _______________________________________________<br/> Freedos-devel mailing list<br/> Fre...@li...<br/> <a href="https://lists.sourceforge.net/lists/listinfo/freedos-devel" target="_blank">https://lists.sourceforge.net/lists/listinfo/freedos-devel</a></div> </div> </div> </div></div></body></html> |
From: Rugxulo <ru...@gm...> - 2024-09-14 12:00:31
|
Hi, On Sat, Sep 14, 2024 at 1:36 AM Paul Dufresne via Freedos-devel <fre...@li...> wrote: > > It had come to my mind that it could be great, to implement interrupts calls in a REXX implementation... > > apparently someone did it already: > https://github.com/vlachoudis/brexx/ > > You can see some in: > https://github.com/vlachoudis/brexx/blob/master/lib/conio.r > or in: > https://github.com/vlachoudis/brexx/blob/master/lib/dos.r He doesn't even mirror the old DOS builds anymore, AFAIK. (You used to be able to get some from gwdg.de via FTP, but modern browsers shun that old protocol nowadays.) I never tried the INTR and PORT stuff. Most of my interest was in portability of some simple scripts. The Brexx 1.3 DOS release from 1997 was on Simtel (and mirrors). RX.EXE was "16-bit" but still compiled with BC++ 3.1 for 386+ cpus and had Paradox database support (whatever that means). It's not as compliant as later versions, so it's not quite as good, but I tried using it a bit anyways. I still have a .ZIP around here. I rebuilt it with TC++ 1.01 and NASM, which gave about 500 kb free RAM ("say storage()"), but the stack depth is too limited to do piping, e.g. "dir )stack" and "stack> sort" might work, but hundreds of lines won't. There was also a rarer Brexx 1.3.3 DOS build (without Paradox) but not hugely improved. Brexx 2.1.0 (from 2003) was much better, called "rexx16.exe" but still 386+ and built via (non-standard) BC++ 3.1. Again, I got this to rebuild with TC++ 1.01 and NASM. I honestly don't know if the overhead for this one is worse or better than 1.3. So I really wouldn't recommend the older one, but for comparison it does exist. (Anyways, I ported 1.3 to 8086 first before porting 2.1.0.) I also have a DJGPP build of Brexx 2.1.9 from 2011. (He also had an Android port I barely used back in 2012. The 1.3 release has several other binaries, too.) I don't know whether he has relicensed his old code to be fully GPL or not. (It used to be "non-commercial only".) Eventually I want to mirror all of these (DOS-related) REXX things to my Google Drive. But I haven't finished updating the 8086 patches. (They seem to work fine, just not quite perfect. For instance, Sed is not strictly needed to build at all. It was just for TASM to NASM conversion.) |
From: Rugxulo <ru...@gm...> - 2024-09-14 11:45:46
|
Hi, On Fri, Sep 13, 2024 at 10:01 PM Paul Dufresne via Freedos-devel <fre...@li...> wrote: > > It began when I did read: > https://bttr-software.de/forum/board_entry.php?id=22023 > > Anyway, I wrote a small program to convert units ... it is using a bit sophisticated stuff... making it sadly probably not usable for DOS as is. > > -- The following 2 calls are for loading regutil library > -- it is needed only for regStemDoOver > -- to work, program must be called with regina rather than rexx > -- Because of this, it is believe the program cannot run under DOS > call RxFuncAdd 'sysloadfuncs', 'regutil', 'sysloadfuncs' > call sysloadfuncs I did not run (test) your code, but keep in mind .... The main thing to remember is that REXX has different dialects. You can even check at runtime and branch accordingly based upon host OS or language version. * Mike Cowlishaw's _The Rexx Language_ (2nd edition, 1990) is commonly called TRL2, aka version 4. * ANSI standard REXX from 1996, e.g. Regina, calls itself version 5. * OORexx calls itself version 6 (actually, 6.03, last I checked). So there are some differences, esp. with regards to how external stacks are handled or whether to use ADDRESS SYSTEM WITH or other features. Just because code works in one interpreter doesn't mean it will work (at all) on others unless you are very careful and test accordingly and limit non-standard extensions. That may not matter for local code, but for anything public or "portable", you have to be more careful. For instance, Ada-like single-line comments -- are not standard and are only supported by Regina (IIRC). N.B. Howard Fosdick's 2005 REXX book is now a free download and quite exhaustive (highly recommended): * the https://rexxinfo.org/tutorials/index_tutorials.html You may also wish to read up on other REXX pitfalls: * http://web.archive.org/web/20210314104341/http://www.edm2.com/index.php/Common_REXX_Pitfalls "do over" is only in OORexx, is that right? I haven't really messed with that one much, but normal practice seems to be to manually put the size of the stem (array) in stem.0 and loop over that, e.g. "do i=1 to stem.0; say stem.i; end". I'm far from super experienced with REXX, but I've dabbled with it a bit, off and on. |
From: Paul D. <duf...@zo...> - 2024-09-14 06:35:32
|
It had come to my mind that it could be great, to implement interrupts calls in a REXX implementation... apparently someone did it already: https://github.com/vlachoudis/brexx/ You can see some in: https://github.com/vlachoudis/brexx/blob/master/lib/conio.r or in: https://github.com/vlachoudis/brexx/blob/master/lib/dos.r |
From: Paul D. <duf...@zo...> - 2024-09-14 03:00:11
|
It began when I did read: https://bttr-software.de/forum/board_entry.php?id=22023 I then did read: https://sourceforge.net/projects/regina-rexx/files/regina-documentation/3.9.6/ Learn also about: https://www.oorexx.org/ Also https://en.wikipedia.org/wiki/Rexx obviously. Rexx is an easy to read and learn programming language... but as it is not popular... have almost no GUI libraries... oorexx have a GTK v.2 binding ... a complete ncurses binding... regina rexx have very limited gotoxy and read char at xy. Anyway, I wrote a small program to convert units ... it is using a bit sophisticated stuff... making it sadly probably not usable for DOS as is. It just beginning to work... but I like to share soon as I am unsure if I will continue to work on it... The style I believe make it very easy to extend... I hope. I wrote it in unitsv1.rex file... and call it with regina unitsv1.rex I have installed on Fedora 40: regina-rexx.x86_64 : Regina Rexx Interpreter regina-rexx-doc.noarch : Documentation for regina-rexx regina-rexx-libs.x86_64 : Shared libraries for regina-rexx So here it is: /* Copyright 2024 Paul Dufresne (duf...@zo...) Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the “Software”), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so. THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ -- The following 2 calls are for loading regutil library -- it is needed only for regStemDoOver -- to work, program must be called with regina rather than rexx -- Because of this, it is believe the program cannot run under DOS call RxFuncAdd 'sysloadfuncs', 'regutil', 'sysloadfuncs' call sysloadfuncs menu. = 'not there!' -- default value menu.top.name='Conversions' menu.top.1='distance' menu.top.1.proc='showMenuDistance' menu.top.2='weight' menu.top.2.proc='showMenuWeight' menu.top.3='temperature' menu.top.3.proc='showMenuTemperature' menu.top.4='volume' menu.top.4.proc='showMenuVolume' menu.top.5='END' menu.top.back='bye' menu.distance.name='Distance convertions' menu.distance.1='centimeters to inch' menu.distance.1.proc="doSomeConversions 'centimeters','inches',centis2inches" menu.distance.2='inches to centimeters' menu.distance.2.proc="doSomeConversions 'inches','centimeters',inches2centis" menu.distance.3='END' menu.distance.back='doMenu top' menu.weight.name='Weight convertions' menu.weight.1='pounds to kilograms' menu.weight.1.proc="doSomeConversions 'pounds','kilos',pounds2kilos" menu.weight.2='kilograms to pounds' menu.weight.2.proc="doSomeConversions 'kilos','pounds',kilos2pounds" menu.weight.3='END' menu.weight.back='doMenu top' menu.temp.name='Temperature convertions' menu.temp.1='farenheits to celsius' menu.temp.1.proc="doSomeConversions 'farenheits','celsius',farens2celsius" menu.temp.2='celsius to farenheits' menu.temp.2.proc="doSomeConversions 'celsius','farenheits',celsius2farens" menu.temp.3='END' menu.temp.back='doMenu top' menu.vol.name='Volume convertions' menu.vol.1='gallons to cube meters' menu.vol.1.proc="doSomeConversions 'gallons','cube meters',gallons2cubemeters" menu.vol.2='cube meters to gallons' menu.vol.2.proc="doSomeConversions 'cube meters','gallons',cubemeters2gallons" menu.vol.3='END' menu.vol.back='doMenu top' call doMenu 'TOP' exit 0 doMenu: drop mymenu. do while regstemdoover('menu.','i') if index(i,arg(1)) then do j=substr(i, index(i,'.')+1) mymenu.j=menu.i end end --call sysdumpvariables say mymenu.name i=1 do until mymenu.i == 'END' say i'. 'mymenu.i i=i+1 if i==14 then exit -- was added as a debug thing at the beginning... should probably be removed end pull choice --say 'choice.proc='mymenu.choice.proc --interpret "call "mymenu.choice.proc" " if choice=='' | choice=='Q' | choice=='QUIT' then interpret "call "mymenu.back else interpret "call "mymenu.choice.proc exit 888 -- not expected to happen because mymenu.back call Bye showMenuDistance: call doMenu 'DISTANCE' exit showMenuWeight: call doMenu 'WEIGHT' exit showMenuTemperature: call doMenu 'TEMP' exit showMenuVolume: call doMenu 'VOL' exit centis2inches: return arg(1)/2.54 inches2centis: return arg(1)*2.54 pounds2kilos: return arg(1)/2.18 kilos2pounds: return arg(1)*2.18 farens2celsius: return (arg(1)-32)*5/9 celsius2farens: return (arg(1)*9/5)+32 gallons2cubemeters: return arg(1)*0.00378541 cubemeters2gallons: return arg(1)/0.00378541 doSomeConversions: fini = 0 do until fini Say 'Number of 'arg(1)':' pull originUnits if originUnits <> '' & originUnits <> 'END' & originUnits <> 'Q' & originUnits<>'QUIT' then do --say 'call 'arg(3)' 'orginUnits interpret 'call 'arg(3)' 'originUnits Say 'give 'RESULT' 'arg(2) Say end else fini=1 end --say mymenu.back interpret "call "mymenu.back exit 999 bye: say 'Goodbye!' exit 0 |
From: Richard S. <rs...@gm...> - 2024-09-13 21:40:08
|
Regarding the official place. some ideas: 1. use something like obs or a webcam,phonecam other - record source code info and put on youtube. 2. maybe have a seperate email address to email source code... 3. google drive/ idrive 4. website with CRC checksum. 5. publish in a book or PDF file... 6. monthly newsletter... just some ideas to try to help others... Richard. On Mon, Sep 9, 2024 at 12:21 AM Paul Dufresne via Freedos-devel < fre...@li...> wrote: > ---- Le dim., 08 sept. 2024 16:08:53 -0400 Wilhelm Spiegl a écrit ---- > > Hi Paul, just a stupid question, > did you need the access only to upload rcal or do you plan do update / fix > other programs too? > I know several program bugs that should be fixed some day. > > PS, I created a list with hyperlinks to most freedos related files / > websites this spring. But I am sure some are still missing. > If you are interested in it, simply inform me. > > Willi > -- > > Well... this was an access to rcal only... but I do care to make FreeDOS > evolve over time... but even if I do have a good amount of free time... > I am making an already bad job at maintaining the programs I listed myself > as the maintainer: > chess game, > pretty all DJGPP related software... > and now rcal. > > Part of it is DJGPP seems to not have received yet an official place (not > on FULL or BONUS)... > > Some of the one that I maintain and are already on FULLL or BONUS it seems > are not updated because my .lsm file is in lowercase > (and get a warning that unstable branch have no LSM file... not finding > which one now). > > Lately... one of the nagging thing for me is the removing of networking > packet drivers... and of the Wiki... But I see a documentation branch > on Gitlab have appears (somewhat maybe to replace the wiki I imagine)... > Somehow I sometime imagine I could port a packet driver from > FreeBSD or from an other free open-source OS... but I am unsure I am able > to do it... or really get at it. > > It would probably be a bit more motivating if I was seeing all my changes > go on one of the testing image each month... but it is also or mostly > a problem of competitive interests. > > > > > > _______________________________________________ > Freedos-devel mailing list > Fre...@li... > https://lists.sourceforge.net/lists/listinfo/freedos-devel > |
From: <je...@sh...> - 2024-09-12 07:16:06
|
Hi Paul, The “unstable” versions of DJGPP are now available in the Unstable/Latest download repository on ibiblio and with FDNPKG. https://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/repositories/unstable/pkg-html/group-devel.html <https://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/repositories/unstable/pkg-html/group-devel.html> A couple notes… DJ_GCSRC and DJ_WATCP were initially rejected by the repository management utilities. The APPINFO/*.LSM metadata file names did not match the package name. I simply renamed those files so they would be accepted. However, this will need fixed in the unstable branch on GitLab. DJ_BASH contains no files and was excluded. Several packages contain LFN files outside of the SOURCES directory. At present, none of the package management software under DOS deals very well with LFN files when LFN support is not present. So for the time being (and foreseeable future), those files get wrapped up into an LFNFILES.ZIP under their parent directory. At some point, I plan on adding networking (and many other things) to FDIMPLES. When that happens, I also plan to have it deal with packages that contain LFN files more gracefully. For example, check if LFNs are currently supported. When they are not, warn the user. When LFN is supported, simply extract those files as well. But out of my big to-do projects, the new version of FDIMPLES is like item 3 or 4. So, that will be quite a while from now. :-) Jerome |
From: Darik H. <da...@gm...> - 2024-09-12 04:45:44
|
An alpha-quality backport of 7-Zip 24.08 for DOS is available at: * https://gitlab.com/dajhorn/7zip/-/blob/watcom_win32s/BIN/7Z.EXE Approximately 80% of the features in the release for Windows are functional in this DOS build, so it is somewhere between the 'A' and 'R' upstream build variants. Note that this build will not run in a Windows 95 MS-DOS box. |
From: E. C. M. <pu...@ul...> - 2024-09-10 16:32:22
|
On at 2024-09-09 03:55 -0400, Jerome Shidel via Freedos-devel wrote: > Hi, ... > We could go from a BonusCD to a BonusDVD and increase the size of the FULL USB. That would basically leave things more or less as they are now but would include all of the packages. > > There a lot of possibilities. It is a very big problem which has been discussed a couple of times. But, there are a lot of different views on what should be done and nothing has been resolved. Note that if you do create a DVD image you will have to provide an ISO9660 Bridge format, as none of the DOS CDFS redirectors support UDF natively yet. If such a bridge is present then existing DOS redirectors may be able to access a DVD. I read up about this on a 2013 thread on our forum: https://bttr-software.de/forum/board_entry.php?id=12605 Regards, ecm |
From: Paul D. <duf...@zo...> - 2024-09-09 16:43:06
|
Jerome said: >We could limit the release media to a much smaller set of packages. Leaving everything else only online to be downloaded by end users as needed. FDNPKG seems to pull from https://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/repositories/latest/ ... and not been related to RBE at all for now. For me it would be a good improvement if RBE would produce packages, where FDNPKG can pull from it... then I could test my packages! ;-) I sure could produce .zip files from my GITLAB packages... and then have someone add them to ibiblio... but I would appreciate a lot if RBE would do it for me. > Personally, I really dislike that idea for several reasons. First, it can be very difficult for users to get packages onto their machine for installation if they do not have networking support. > Also, it is also very inconvenient for them to find out what is available in those repositories. I agree. > We could split the packages provided up into different media. For example, the LiveCD could be a little slimmer and only contain the most common packages. > Then maybe a GamesCD, DevelCD, GuiCD… as needed. Possibly since DJGPP is so large, maybe on its own CD. > Then, users could just download the additional CDs that interest them. These CDs could even include the OS installer that is configured to install > FreeDOS BASE plus all the packages on that specific CD. I consider myself DJGPP like an almost different platform... a 32 bits one rather than 16 bits one. And find that indeed... the general needs of development can be quite different for 16 bits and DJGPP. i16gcc is a kind of mix bag... the compiler run in DJGPP platform and produce 16 bits code... hope I am not misleading here. So... I guess I would tend to make i16gcc part of the DJGPP CD... but really have a weak opinion for now. So... my answer is a DJGPP CD would be my prefered solution. I would ideally expect FDNPKG to be able to pull the RBE build DJGPP packages too. |
From: Jim H. <jh...@fr...> - 2024-09-09 13:00:34
|
Done! I've added the news item about Format 0.92a. I deleted the FreeDOS Format 0.92 announcement and created a news item for this Format 0.92a announcement. I should have kept the 0.92 news item, to track the history-- I should not make website changes before coffee. :-) Instead, I copied/pasted the 0.92 announcement into this one. On Mon, Sep 9, 2024 at 7:12 AM perditionc--- via Freedos-devel <fre...@li...> wrote: > > That would be nice. After a bit more testing and hopefully some more translations I will post a 0.93 release. > > Jeremy > > > On Sun, Sep 8, 2024, 6:29 PM Jim Hall via Freedos-devel <fre...@li...> wrote: >> >> Thanks! Did you want me to also mention this on the website? I can >> update the old news item, or I can delete that one and add a new item. >> |
From: <per...@gm...> - 2024-09-09 12:12:16
|
That would be nice. After a bit more testing and hopefully some more translations I will post a 0.93 release. Jeremy On Sun, Sep 8, 2024, 6:29 PM Jim Hall via Freedos-devel < fre...@li...> wrote: > Thanks! Did you want me to also mention this on the website? I can > update the old news item, or I can delete that one and add a new item. > > > Jim > > > On Sun, Sep 8, 2024 at 2:18 PM perditionc--- via Freedos-devel > <fre...@li...> wrote: > > > > For further review and feedback - format 0.92a (this is a test release). > > > > https://github.com/FDOS/format/releases/tag/v0.92a > > > > - fix failure formatting on first diskette access (GitHub issue #5) > > - initial translated message support; currently supports most of > > messages in FR and TR (some have been added since last updated) thanks > > to cardpuncher (Berki Yenigün). > > > > Translations are done using kitten, but in a format compatible with > > Tom's kittenc implementation. Strings are currently attached to > > format.exe, set LANG=EN or FR or TR to see translated messages. > > Format.exe supports external string (in binary form) files in NLSPATH > > or the same directory as FORMAT.EXE. To test additional translations, > > kittenc can be used by attaching to an empty format exe and naming the > > result FORMAT.NN where NN is 2 character language code. Or create a > > PR on GitHub (or send to me) with message set -- please ensure > > codepage of file is provided in comment if other than ASCII text. See > > NLS\FORMAT.EN for all currently supported messages for translation, > > about 462 strings. > > > > Please let me know if you have any suggestions on list or via > > discussion on GitHub - > > https://github.com/FDOS/format/discussions/10 (Format translations > specific). > > > > Thank you, > > Jeremy > > > > > > _______________________________________________ > > Freedos-devel mailing list > > Fre...@li... > > https://lists.sourceforge.net/lists/listinfo/freedos-devel > > > _______________________________________________ > Freedos-devel mailing list > Fre...@li... > https://lists.sourceforge.net/lists/listinfo/freedos-devel > |
From: Jerome S. <je...@sh...> - 2024-09-09 07:56:19
|
Hi, > On Sep 9, 2024, at 1:20 AM, Paul Dufresne via Freedos-devel <fre...@li...> wrote: > > ---- Le dim., 08 sept. 2024 16:08:53 -0400 Wilhelm Spiegl a écrit ---- > > Hi Paul, just a stupid question, > did you need the access only to upload rcal or do you plan do update / fix other programs too? > I know several program bugs that should be fixed some day. > > PS, I created a list with hyperlinks to most freedos related files / websites this spring. But I am sure some are still missing. > If you are interested in it, simply inform me. > > Willi > -- > > Well... this was an access to rcal only... but I do care to make FreeDOS evolve over time... but even if I do have a good amount of free time... > I am making an already bad job at maintaining the programs I listed myself as the maintainer: > chess game, > pretty all DJGPP related software... > and now rcal. > > Part of it is DJGPP seems to not have received yet an official place (not on FULL or BONUS)... > > Some of the one that I maintain and are already on FULLL or BONUS it seems are not updated because my .lsm file is in lowercase > (and get a warning that unstable branch have no LSM file... not finding which one now). When the RBE creates an interim build, it pulls from the “unstable” branch of it exists. If that branch does not exist, it will pull from the default (master or main) branch. File case is not relevant for what branch gets used. The RBE then creates a FreeDOS compatible package of the project from the branch it cloned. > Lately... one of the nagging thing for me is the removing of networking packet drivers... and of the Wiki... But I see a documentation branch > on Gitlab have appears (somewhat maybe to replace the wiki I imagine)... Somehow I sometime imagine I could port a packet driver from > FreeBSD or from an other free open-source OS... but I am unsure I am able to do it... or really get at it. > > It would probably be a bit more motivating if I was seeing all my changes go on one of the testing image each month... but it is also or mostly > a problem of competitive interests. Unfortunately, the updated DJGPP packages have not been included on the Interim Test Builds. The reason is simply because of space. In the hundreds of megabytes, the DJGPP packages require a lot of room. At present, there is simply not enough room to provide all of the packages on the primary install media and the bonus CD. I don’t think there is enough room even the few packages that are provided on both media were not duplicated. Add to that the possibility of including additional games and other programs (like PC-GEOS) could add hundreds of more megabytes to the OS. There several things that could be done. We could limit the release media to a much smaller set of packages. Leaving everything else only online to be downloaded by end users as needed. Personally, I really dislike that idea for several reasons. First, it can be very difficult for users to get packages onto their machine for installation if they do not have networking support. Also, it is also very inconvenient for them to find out what is available in those repositories. We could split the packages provided up into different media. For example, the LiveCD could be a little slimmer and only contain the most common packages. Then maybe a GamesCD, DevelCD, GuiCD… as needed. Possibly since DJGPP is so large, maybe on its own CD. Then, users could just download the additional CDs that interest them. These CDs could even include the OS installer that is configured to install FreeDOS BASE plus all the packages on that specific CD. We could go from a BonusCD to a BonusDVD and increase the size of the FULL USB. That would basically leave things more or less as they are now but would include all of the packages. There a lot of possibilities. It is a very big problem which has been discussed a couple of times. But, there are a lot of different views on what should be done and nothing has been resolved. > > _______________________________________________ > Freedos-devel mailing list > Fre...@li... > https://lists.sourceforge.net/lists/listinfo/freedos-devel |
From: Paul D. <duf...@zo...> - 2024-09-09 05:20:33
|
---- Le dim., 08 sept. 2024 16:08:53 -0400 Wilhelm Spiegl a écrit ---- Hi Paul, just a stupid question, did you need the access only to upload rcal or do you plan do update / fix other programs too? I know several program bugs that should be fixed some day. PS, I created a list with hyperlinks to most freedos related files / websites this spring. But I am sure some are still missing. If you are interested in it, simply inform me. Willi -- Well... this was an access to rcal only... but I do care to make FreeDOS evolve over time... but even if I do have a good amount of free time... I am making an already bad job at maintaining the programs I listed myself as the maintainer: chess game, pretty all DJGPP related software... and now rcal. Part of it is DJGPP seems to not have received yet an official place (not on FULL or BONUS)... Some of the one that I maintain and are already on FULLL or BONUS it seems are not updated because my .lsm file is in lowercase (and get a warning that unstable branch have no LSM file... not finding which one now). Lately... one of the nagging thing for me is the removing of networking packet drivers... and of the Wiki... But I see a documentation branch on Gitlab have appears (somewhat maybe to replace the wiki I imagine)... Somehow I sometime imagine I could port a packet driver from FreeBSD or from an other free open-source OS... but I am unsure I am able to do it... or really get at it. It would probably be a bit more motivating if I was seeing all my changes go on one of the testing image each month... but it is also or mostly a problem of competitive interests. |
From: Jim H. <jh...@fr...> - 2024-09-08 22:28:23
|
Thanks! Did you want me to also mention this on the website? I can update the old news item, or I can delete that one and add a new item. Jim On Sun, Sep 8, 2024 at 2:18 PM perditionc--- via Freedos-devel <fre...@li...> wrote: > > For further review and feedback - format 0.92a (this is a test release). > > https://github.com/FDOS/format/releases/tag/v0.92a > > - fix failure formatting on first diskette access (GitHub issue #5) > - initial translated message support; currently supports most of > messages in FR and TR (some have been added since last updated) thanks > to cardpuncher (Berki Yenigün). > > Translations are done using kitten, but in a format compatible with > Tom's kittenc implementation. Strings are currently attached to > format.exe, set LANG=EN or FR or TR to see translated messages. > Format.exe supports external string (in binary form) files in NLSPATH > or the same directory as FORMAT.EXE. To test additional translations, > kittenc can be used by attaching to an empty format exe and naming the > result FORMAT.NN where NN is 2 character language code. Or create a > PR on GitHub (or send to me) with message set -- please ensure > codepage of file is provided in comment if other than ASCII text. See > NLS\FORMAT.EN for all currently supported messages for translation, > about 462 strings. > > Please let me know if you have any suggestions on list or via > discussion on GitHub - > https://github.com/FDOS/format/discussions/10 (Format translations specific). > > Thank you, > Jeremy > > > _______________________________________________ > Freedos-devel mailing list > Fre...@li... > https://lists.sourceforge.net/lists/listinfo/freedos-devel |
From: <per...@gm...> - 2024-09-08 19:18:01
|
For further review and feedback - format 0.92a (this is a test release). https://github.com/FDOS/format/releases/tag/v0.92a - fix failure formatting on first diskette access (GitHub issue #5) - initial translated message support; currently supports most of messages in FR and TR (some have been added since last updated) thanks to cardpuncher (Berki Yenigün). Translations are done using kitten, but in a format compatible with Tom's kittenc implementation. Strings are currently attached to format.exe, set LANG=EN or FR or TR to see translated messages. Format.exe supports external string (in binary form) files in NLSPATH or the same directory as FORMAT.EXE. To test additional translations, kittenc can be used by attaching to an empty format exe and naming the result FORMAT.NN where NN is 2 character language code. Or create a PR on GitHub (or send to me) with message set -- please ensure codepage of file is provided in comment if other than ASCII text. See NLS\FORMAT.EN for all currently supported messages for translation, about 462 strings. Please let me know if you have any suggestions on list or via discussion on GitHub - https://github.com/FDOS/format/discussions/10 (Format translations specific). Thank you, Jeremy |
From: Paul D. <duf...@zo...> - 2024-09-06 20:05:21
|
---- Le ven., 06 sept. 2024 10:05:16 -0400 Jerome Shidel via Freedos-devel a écrit ---- > > > On Sep 6, 2024, at 6:59 AM, Paul Dufresne via Freedos-devel fre...@li...> wrote: > > [..] > > Can I be added to: > > https://gitlab.com/FreeDOS/util/rcal/-/project_members ? > > > > Would update the package in a new unstable branch. > > Done. :-) I believe the changes to update from 1.0 to 1.0.1 in the unstable branch are complete. https://gitlab.com/FreeDOS/util/rcal/-/commits/1e430607768b877cfdf7a7fbb08d8ef57d1c021c However... I did not produce a .zip file to test that ... yet. Should I... so as to produce a new version on ibiblio? |
From: <je...@sh...> - 2024-09-06 14:05:26
|
> On Sep 6, 2024, at 6:59 AM, Paul Dufresne via Freedos-devel <fre...@li...> wrote: > [..] > Can I be added to: > https://gitlab.com/FreeDOS/util/rcal/-/project_members ? > > Would update the package in a new unstable branch. Done. :-) |
From: Paul D. <duf...@zo...> - 2024-09-06 11:00:15
|
---- Le mer., 04 sept. 2024 15:06:24 -0400 thraex via Freedos-devel a écrit ---- ... > Many thanks to Mateusz for taking the time to explain this. > > Now, who beats busy Jerome into a pulp so that he updates the rcal > package to fix these issues? O:-) Can I be added to: https://gitlab.com/FreeDOS/util/rcal/-/project_members ? Would update the package in a new unstable branch. |
From: thraex <th...@nu...> - 2024-09-04 19:21:29
|
On 4.09.2024 13:36, Paul Dufresne via Freedos-devel wrote: > Trying T2409 Live... after installation (setup)... rcal just return to dos prompt. > Did installed all with sources in french... in QEMU: kvm -cdrom T2409LIVE.iso -hda freedos.img -boot d I got the same result and got in touch with rcal's author. Several things: * I tested the the latest version of rcal from <https://rcal.sourceforge.net/> and it works just fine with T2409. * There never was a version "1.0a". The changelog is as follows: v1.0.1 (06 APR 2024): fixed handling of decimals when separator is not '.' v1.0 (02 AUG 2018): initial public release * As for the program not working as expected, this is probably because v1.0 is used and the local decimal separator is set to a comma (COUNTRY setting in CONFIG.SYS), you should either change the decimal symbol to a dot, or (preferably) upgrade rcal to v1.0.1. Many thanks to Mateusz for taking the time to explain this. Now, who beats busy Jerome into a pulp so that he updates the rcal package to fix these issues? O:-) |
From: Paul D. <duf...@zo...> - 2024-09-04 17:01:27
|
The reason the link does not work is because it try to read in \utils rather than in \util |
From: Paul D. <duf...@zo...> - 2024-09-04 16:23:00
|
It seems if I boot from DVD, then change to C:\UTIL\RCAL... RCAL always work correctly. And if I first boot from my C: installed french all packages with sources, whatever the boot choice I make, rcal will not work correctly. (under QEMU each time) |