Encryption outside of a window (AREV Specific) [Revelation On-Line Wiki]

Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

At 24 APR 2002 05:26:44PM Michael Gwinnell wrote:

AREV Specific

Would like to write a routine that takes some data and encrypts it using Arev's own encryptions process. (Looks like this is verb V65?)

Does anyone have a snippet of code that takes a string and returns the Arev encrypted string?

Thanks!

At 24 APR 2002 05:35PM [url=http://www.sprezzatura.com" onMouseOver=window.status=Click here to visit our web site?';return(true)]The Sprezzatura Group[/url] wrote:

http://www.sprezzatura.com/revmedia/V4I6A2.HTM

The Sprezzatura Group

[i]Celebrate CeBIT with Sprezz Local![/i]

At 25 APR 2002 01:01PM Michael Gwinnell wrote:

Thanks for your help. Took a few tries to get the process to work, due mostly to brain fade. In case anyone else is looking for a quick (simple) code example, here it is:

In this case, X is the un-encrypted password, and XX is the encrypted password. This is called as a post-process subroutine to a prompt, with POST.PW as the passed data. Both the encrypted and un-encrypted passwords are passed back as part of @Record/@Pseudo.

SUBROUTINE PW.CW1.SUB(EP)

$INSERT INCLUDE,WINDOW_COMMON%

BEGIN CASE
CASE (EP=POST.PW")
  X=WC_IS%
  @ANS=X
  CALL SEC(6)
  XX=@ANS
  @RECORD=XX
  @RECORD=X
END CASE

RETURN

View this thread on the forum...