If you are going to code that "simple" stuff ... have fun.leopardpm wrote:hashcode... the standard way... a stupid, simple way would be to add ...
What I mean to say is: I am, most certainly, NOT going to do it!
Done ...BasicCoder2 wrote:Well the program that encodes the binary file as a text file perhaps could have a header in the text file between two characters not used to represent data stating that this is the type of text file that can be decoded by the program and what type to decode it to (.bmp .png whatever) and maybe have its own extension code instead of .txt?
- Version: 0.3 Beta
- output files are now "automatically" named - ATTENTION: this might overwrite your "original" !!! (from Forum)
- new extension created: .B128 (you'll have to associate it, to Notepad (or Editor), on WIN)
- encoded file contains: "original" filename.ext (at the start, in "clear text")
- Chr(34) is used as delimiter char (doesn't occur in shifted by 35)
from Forum - the "original" filename used (input is: filename only, no extension - .B128 is assumed)
same bmp example as last time, but new format header:
Code: Select all
test_1.bmp"epYc#######Y####K###c####c###$##C#######c##5.###5.##############¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢I#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢##4#¢###¢#E##¢###¢g###¢¢¢¢›¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#R¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢###¢¢#T#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢###¢#E##¢###¢g###¢###+¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢##8#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢#E##¢###¢g###¢###+¢###¢¢¢”¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢‚#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢###¢¢…##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢¢¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢,¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢###¢g###¢###+¢###¢##4#¢¢¢¢¢¢¡¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢¢¢#¢p¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g###¢###+¢###¢##4#¢###¢¢…¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#b¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢###¢h¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#6¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢###+¢###¢##4#¢###¢#E##¢¢¢¢¢Ÿ¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x###¢¢##;¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢¢¢#=¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢###¢##4#¢###¢#E##¢###¢g¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢###-¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢I#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢##4#¢###¢#E##¢###¢g###¢¢¢¢›¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#R¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢###¢¢#T#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢###¢#E##¢###¢g###¢###+¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢##8#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢#E##¢###¢g###¢###+¢###¢¢¢”¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢‚#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢###¢¢…##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢¢¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢,¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢###¢g###¢###+¢###¢##4#¢¢¢¢¢¢¡¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢¢¢#¢p¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g###¢###+¢###¢##4#¢###¢¢…¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#b¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢###¢h¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#6¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢###+¢###¢##4#¢###¢#E##¢¢¢¢¢Ÿ¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x###¢¢##;¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢¢¢#=¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢###¢##4#¢###¢#E##¢###¢g¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢###-¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢I#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢##4#¢###¢#E##¢###¢g###¢¢¢¢›¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#R¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢###¢¢#T#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢###¢#E##¢###¢g###¢###+¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢##8#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢#E##¢###¢g###¢###+¢###¢¢¢”¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢‚#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢###¢¢…##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢¢¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢,¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢###¢g###¢###+¢###¢##4#¢¢¢¢¢¢¡¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢¢¢#¢p¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g###¢###+¢###¢##4#¢###¢¢…¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#b¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢###¢h¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#6¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢###+¢###¢##4#¢###¢#E##¢¢¢¢¢Ÿ¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢¢¢#=¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢###¢##4#¢###¢#E##¢###¢g¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢##B¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢I#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢##4#¢###¢#E##¢###¢g###¢¢¢¢›¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢###¢#E##¢###¢g###¢###+¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢#b#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢#E##¢###¢g###¢###+¢###¢¢¢”¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢##¢¢Š##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢¢¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢,¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢¢¢#¢p¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢##¢k¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#6¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢¢¢#=¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢I#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢###¢#E##¢###¢g###¢###+¢###¢##4#¢##¢¢#U#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢#E#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢##¢¢‡##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢¢¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢,¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢¢¢#¢p¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢##¢k¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#6¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢¢#¢¢¢#4¢¢¢#¢¢¢E#¢¢¢#¢¢g¢#¢¢¢#¢+¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢¢¢#=¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢##6¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢##¢¢#U#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢#I#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢##¢¢‡##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢¢¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢¢¢#¢p¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢##¢l¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢¢¢#=¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢##6¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢#¢#N¢#¢#¢#¢x#¢#¢#¢#M¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢##¢¢#U#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢¢¢X#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢¢‰¢#¢¢¢#¢o¢¢#¢¢¢#<¢¢¢#¢¢¢V#¢¢¢#¢#I#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢#¢z#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢##¢¢ˆ##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢#Q¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢##¢m¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢#¢x#¢#¢#¢#M¢#¢#¢##8¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢™#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢##¢¢Š##¢¢##¢o¢##¢¢##<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š##¢¢##¢o¢##¢¢##<¢¢##¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢|¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢#¢¢‘¢#¢¢¢#¢€¢¢#¢¢¢#^¢¢¢#¢¢¢š#¢¢¢##¢q¢##¢¢##<¢¢##¢¢#V#¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢#¢¢¢‰#¢¢¢#¢¢o¢#¢¢¢#¢<¢¢#¢¢¢#V¢¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢##¢¢#V#¢¢##¢¢‰##¢¢##¢o¢##¢¢##<¢¢&
Code: Select all
' ForumBlobPost_V03.bas -- 2017-06-11, by MrSwiss (ver. 0.3 Beta)
#Include "file.bi"
Const As String toForum = ".B128"
Function loadfile( _
ByVal filen As String _
) As String
Dim As String text = ""
If FileExists(filen) Then ' crash, if not existing!
Var f = FreeFile
If Open (filen For Binary Access Read As #f)=0 Then
If Lof(f) > 0 Then
text = String(Lof(f), 0)
Get #f,, text
End If
Close(f)
Else
Print "Unable to load: " + filen
End If
Else
Print "File not existing: " + filen
End If
Return text
End Function
Sub savefile( _
ByVal filen As String, _
ByRef p As String _ ' string might be too large for ByVal
)
var f = FreeFile
If Open (filen For Binary Access Write As #f)=0 Then
If Len(p) > 0 Then Put #f,, p
Close(f)
Else
Print "Unable to load: " + filen
End If
End Sub
Function EncBase128( _ ' direction --> to forum
ByRef iStr As Const String, _ ' source string-part ASCII
ByVal n_sLen As UByte = 7 _ ' length of string-part (default = 7)
) As String ' base128 string-part
Dim As UByte rmdr = 0, cry = 0, s_chr = 0
Dim As String s_stmp = iStr, t_sret = String(n_sLen, 0)
For i As UInteger = 0 To n_sLen - 1
s_chr = s_stmp[i] ' get a byte, then check value
If s_chr > 127 Then ' if leading bit is set, then
rmdr = BitSet(rmdr, i) ' remember in "flags" byte
s_chr -= 128 ' clear leading bit (MSbit)
EndIf
t_sret[i] = s_chr ' assign to return string
Next
t_sret += Chr(rmdr) ' add "flags" to string
Return t_sret
End Function
Function DecBase128( _ ' direction <-- from forum
ByRef iStr As Const String, _ ' as EncBase128
ByVal n_sLen As UByte = 8 _ ' string length with "flags" (+1)
) As String
Dim As UByte rmdr = 0, cry = 0, s_chr = 0
Dim As String s_stmp = iStr, t_sret = String(n_sLen - 1, 0)
rmdr = iStr[n_sLen - 1] ' save decoder byte "flags"
For i As UInteger = 0 To n_sLen - 2 ' without decoder byte
s_chr = s_stmp[i] ' get a byte
If Bit(rmdr, i) Then s_chr += 128 ' check "flags" and set leading bit
t_sret[i] = s_chr ' assign to return string
Next
Return t_sret
End Function
Function ShiftB128( _
ByRef iStr As Const String _ ' source = ASCII string
) As String
Dim As ULong n_run = Len(iStr) \ 7, n_rem = Len(iStr) Mod 7
Dim As UByte s_tchr = 0
Dim As String s_ret = "", s_tstr = "", s_estr = ""
' get encoded string (8 byte, from 7 byte "original")
For i As UInteger = 0 To n_run - 1
Var sPos = i * 7 + 1
s_tstr = Mid(iStr, sPos, 7)
s_ret += EncBase128(s_tstr) ' encode to 8 byte string
Next
' string-end processing
If n_rem > 0 Then
Var sPos = n_run * 7 + 1
s_estr = Mid(iStr, sPos, n_rem) ' string remainder
s_ret += EncBase128(s_estr, n_rem) ' encode rem.
EndIf
' shift every byte to "printable", add 35
For j As UInteger = 0 To Len(s_ret) - 1
s_tchr = s_ret[j] + 35 ' apply shift
s_ret[j] = s_tchr ' write back to string
Next
Return s_ret
End Function
Function ShiftASCII( _
ByRef iStr As Const String _ ' source = B128 string
) As String
Dim As ULong n_run = Len(iStr) \ 8, n_rem = Len(iStr) Mod 8
Dim As UByte s_tchr = 0
Dim As String s_ret = "", s_tstr = "", s_estr = "", s_tmp = iStr
' reverse shift to "B128 encoded"
For j As UInteger = 0 To Len(s_tmp) - 1
s_tchr = s_tmp[j] - 35 ' get shifted byte & un-shift
s_tmp[j] = s_tchr ' write un-shifted back
Next
' get decoded string (8 byte chunks)
For i As UInteger = 0 To n_run - 1
Var sPos = i * 8 + 1
s_tstr = Mid(s_tmp, sPos, 8)
s_ret += DecBase128(s_tstr) ' decode string
Next
' string-end processing (shorter than 8)
If n_rem > 0 Then
Var sPos = n_run * 8 + 1
s_estr = Mid(s_tmp, sPos, n_rem) ' string end
s_ret += DecBase128(s_estr, n_rem) ' decode string end
EndIf
Return s_ret
End Function
' ---
Sub GetUserInput( _
ByRef sFle As String, _ ' file name (with or without ext)
ByVal mode As UByte=0 _ ' 0 = default +ext, 1 = no ext
)
Dim As String q = "Please, enter INPUT file name: ", a ' question/answer strings (local)
again:
Line Input q, a ' ask for filename
If a = "" Then GoTo again ' file name is mandatory!
If mode = 1 AndAlso InStr(a, ".") Then ' ext check in mode = 1 only
Color 12
Print "File contains extension, enter filename without it! ";
Sleep 1500, 1 : Color 7 : GoTo again
EndIf
If mode = 1 Then a += toForum ' add extension ".B128"
sFle = a
End Sub
' ===== MAIN =====
Width 120, 25 ' we might want a larger console window
Dim As String sFile, sMeth, sQuest, sAns, c, d, sDir = CurDir
Dim As String sTitle = "ForumBlobPost - Utility, version 0.3 Beta", _
uline = String(Len(sTitle), "-")
start:
Cls : Print sTitle : Print uline : Print
sQuest = "enter the direction: to/from Forum [t|f] 'q = quit' : "
Line Input sQuest, sAns ' line input accepts a string-var (input doesn't)
' evaluate user input
Select Case As Const Asc(LCase(sAns), 1) ' check of first char only
Case 102
Color 10 : Print "Enter filename *without* extension, please!" : Color 7
GetUserInput(sFile, 1) ' f/F entered, extension ".B128" assumed
c = loadfile(sFile)
Var npos = InStr(c, Chr(34)) ' extract "original" filename, shorten
d = Left(c, npos - 1) : c = Right(c, Len(c) - npos) ' source string
Var r = ShiftASCII(c) ' decode
savefile(d, r) ' ATTENTION: overwrites source file!!!
Case 113
Print "quiting ..." : Sleep 750, 1 : End ' q/Q entered
Case 116
Color 10 : Print "Enter filename *with* extension, please!" : Color 7
GetUserInput(sFile) ' t/T entered, get source file
Var dot = InStr(sFile, ".") ' extract filename only
d = Left(sFile, dot - 1) + toForum ' add extension ".B128"
c = loadfile(sFile)
Var r = ShiftB128(c) : r = sFile + Chr(34) + r ' encode
savefile(d, r)
Case Else
sAns = "" : Color 12 : Print "unrecognized command" ' in red
Color 7 : Sleep 1500, 1 : GoTo start' all else (ask again)
End Select
Print : Print "Done ..."
If CurDir <> sdir Then ChDir(sDir) ' restore path
Sleep : End 0
' ===== END-MAIN ===== ' ----- EOF -----