home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk1.iso / altsrc / articles / 11171 < prev    next >
Text File  |  1994-08-24  |  2KB  |  40 lines
  1. Newsgroups: comp.editors,alt.sources,comp.misc,comp.unix.misc,comp.mail.misc,comp.unix.admin
  2. Path: wupost!uhog.mit.edu!europa.eng.gtefsd.com!howland.reston.ans.net!math.ohio-state.edu!jussieu.fr!univ-lyon1.fr!swidir.switch.ch!newsfeed.ACO.net!Austria.EU.net!EU.net!uunet!world!jhallen
  3. From: jhallen@world.std.com (Joseph H Allen)
  4. Subject: Re: JOE 1.0.12 - Blurb
  5. Message-ID: <Cv1yGv.2s2@world.std.com>
  6. Organization: The World Public Access UNIX, Brookline, MA
  7. References: <Cur3x5.A95@world.std.com> <Cv0B4q.EDu@world.std.com> <33f26u$fu5@kantti.Helsinki.FI>
  8. Distribution: inet
  9. Date: Wed, 24 Aug 1994 18:38:54 GMT
  10. Lines: 27
  11. Xref: wupost comp.editors:12774 alt.sources:11171 comp.misc:21560 comp.unix.misc:16404 comp.mail.misc:17565 comp.unix.admin:26765
  12.  
  13. In article <33f26u$fu5@kantti.Helsinki.FI>,
  14. Kari Likovuori <likovuor@cc.Helsinki.FI> wrote:
  15. >Joseph H Allen (jhallen@world.std.com) wrote:
  16. >>     \377        Octal
  17. >>     \xFF        Hex
  18. >
  19. >>     Can be used to match a character with specific ASCII code given in
  20. >> octal or hex.
  21. >
  22. >    It would be nice if you could insert a character by it's
  23. >    ASCII code. I think it would be even more useful than
  24. >    functions "Next char is a control char" and "Next char has 7
  25. >    bit set".
  26.  
  27. That's a good idea- I just put it into version 1.0.13, which the sysop here
  28. has still not coppied to the ftp directory (ftp.std.com, file:
  29. src/editors/joe1.0.13.tar.Z).
  30.  
  31. You can type: `255  or  `xFF  or  `o377
  32.  
  33. to enter decimanl, hex or octal ASCII values directly.
  34.  
  35. -- 
  36. /*  jhallen@world.std.com (192.74.137.5) */               /* Joseph H. Allen */
  37. int a[1817];main(z,p,q,r){for(p=80;q+p-80;p-=2*a[p])for(z=9;z--;)q=3&(r=time(0)
  38. +r*57)/7,q=q?q-1?q-2?1-p%79?-1:0:p%79-77?1:0:p<1659?79:0:p>158?-79:0,q?!a[p+q*2
  39. ]?a[p+=a[p+=q]=q]=q:0:0;for(;q++-1817;)printf(q%79?"%c":"%c\n"," #"[!a[q-1]]);}
  40.