= Сообщение: 3012 из 7126 ====================================== FTSC_PUBLIC = От : Bill McGarrity 1:266/404 28 Apr 17 12:56:00 Кому : Ray Quinn 28 Apr 17 12:56:00 Тема : Binkd File Request FGHI : area://FTSC_PUBLIC?msgid=6820.2ftscpubl@1:266/404+1d68c9a0 На : area://FTSC_PUBLIC?msgid=39735.sync_sys@1:103/705+1d68a574 = Кодировка сообщения определена как: ASCII ================================== ============================================================================== -=> 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> 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.
