home bbs files messages ]

Just a sample of the Echomail archive

<< oldest | < older | list | newer > | newest >> ]

 Message 1547 
 Bill McGarrity to Ray Quinn 
 Binkd File Request 
 28 Apr 17 12:56:00 
 
-=> Ray Quinn wrote to All on 04-27-17 21:08 <=-

 RQ> Hello all!

 RQ> I am not a programmer. I am looking for a simple bash script to allow
 RQ> me to type in an FTN address, filename(s), and a connect flavo(u)r that
 RQ> generates a proper NNNNnnnn.REQ file for binkd. I realize that it is
 RQ> not that difficult to create the files necessary manually, using a
 RQ> programmers calculator (Windows 10 has one) to find the HEX address. I
 RQ> would like to have the script convert from decimal to hexadecimal.

 RQ> For example:

 RQ> Address: 12:345/678
 RQ> File: nodelist
 RQ> Flavor: n  (normal)
 RQ> Generating /mail/out/fido.00c/015902a6.flo
 RQ> Generating /mail/out/fido.00c/015902a6.req

 RQ> Any programmers up for the task? It doesn't have to be fancy, use
 RQ> colors, etc. It could even use java. Deuce, echicken, DM...



If I'm not mistaken, FrontDoor has this option already.  I have a registered
version of FD with 'FM' editor that has an option for requesting a file (Option
R).  I never tried it but simple google search came up with a dos script that
will do it.  I'm sure by using strings on the command line it could be done. 
Here's the script...

:toHex dec hex -- convert a decimal number to hexadecimal, i.e. -20 to FFFFFFEC
or 26 to 0000001A
::             -- dec [in]      - decimal number to convert
::             -- hex [out,opt] - variable to store the converted hexadecimal
number in
::Thanks to 'dbenham' dostips forum users who inspired to improve this function
:$created 20091203 :$changed 20110330 :$categories Arithmetic,Encoding
:$source http://www.dostips.com
SETLOCAL ENABLEDELAYEDEXPANSION
set /a dec=%~1
set "hex="
set "map=0123456789ABCDEF"
for /L %%N in (1,1,8) do (
    set /a "d=dec&15,dec>>=4"
    for %%D in (!d!) do set "hex=!map:~%%D,1!!hex!"
)
rem !!!! REMOVE LEADING ZEROS by activating the next line, e.g. will return 1A
instead of 0000001A
rem for /f "tokens=* delims=0" %%A in ("%hex%") do set "hex=%%A"&if not defined
hex set "hex=0"
( ENDLOCAL & REM RETURN VALUES
    IF "%~2" NEQ "" (SET %~2=%hex%) ELSE ECHO.%hex%
)
EXIT /b

It looks like it strips all the leading 0's so you'd have to make some changes
so it give you the last four characters.


--

Bill

Telnet: tequilamockingbirdonline.net
Web: bbs.tequilamockingbirdonline.net
FTP: ftp.tequilamockingbirdonline.net:2121
IRC: irc.tequilamockingbirdonline.net Ports: 6661-6670 SSL: +6697
Radio: radio.tequilamockingbirdonline.net:8010/live


... Look Twice... Save a Life!!! Motorcycles are Everywhere!!!
--- MultiMail/Win32 v0.50
 * Origin: TequilaMockingbird Online - Toms River, NJ (1:266/404)

<< oldest | < older | list | newer > | newest >> ]

(c) 1994,  bbs@darkrealms.ca