To read the article online, visit http://www.4GuysFromRolla.com/webtech/052800-1.2.shtml

Generating Random "Fake Latin" Strings, Part 2

By Dave Cantrell


  • Read Part 1

  • In Part 1 we looked at the GetLatinSentence function, which generated fake Latin sentences. In this part we'll look at the function GetLatinParas, which generates fake Latin paragraphs!

    GetLatinParas()
    This function simplifies using the GetLatinSentence() function. As with GetLatinSentence(), we declare the function and localize the inputs:

    Function GetLatinParas( cntParas_IN )
      dim cntParas
      cntParas = cntParas_IN
    

    We also have a series of variables we should go ahead and set up now:

      dim i               'external loop counter
      dim x               'internal loop counter
      dim cntSentence     'number of sentences in a particular paragraph - random
      dim cntWords        'number of words in a particular sentence - random
      dim strResult       'the result we will return to the caller
    

    Now we start the loop. In here we (1) randomly determine the number of sentences in this paragraph, (2) build each sentence using GetLatinSentence, and (3) concatenate the result onto strResult. I set the paragraph length here to a minimum of three and maximum of seven sentences.

      For i = 1 to cntParas
        Randomize
        cntSentence = Int( ( 7 - 3 + 1 ) * Rnd + 3 )
        'start building the paragraph
        strResult = strResult & "

    " For x = 1 to cntSentence 'randomly determine the number of words in this sentence 'for our purposes we'll say no less than 8, no more than 25 Randomize cntWords = Int( ( 25 - 8 + 1 ) * Rnd + 8 ) strResult = strResult & GetLatinSentence( cntWords ) Next strResult = strResult & "

    " Next

    Finally, return the string to the caller and close:

      GetLatinParas = strResult
    End Function
    

    There is a live demo available which allows the user to select a variable number of fake Latin paragraphs to be generated. If you're curious as to the output, go ahead and give the demo a run!

    Anyways, hopefully these functions will help you out next time you need demo text in a hurry. It sure would have helped me! :D

    Ciao!
    -dave


    Attachments:

  • Download the source code for latin.asp in text format
  • Try out the live demo!


  • Article Information
    Article Title: Generating Random 'Fake Latin' Strings, Part 2
    Article Author: Dave Cantrell
    Published Date: Sunday, May 28, 2000
    Article URL: http://www.4GuysFromRolla.com/webtech/052800-1.2.shtml


    Copyright 2017 QuinStreet Inc. All Rights Reserved.
    Legal Notices, Licensing, Permissions, Privacy Policy.
    Advertise | Newsletters | E-mail Offers