Results 1 to 13 of 13

Thread: How to make a=n?

  1. #1
    Join Date
    Mar 2007
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default How to make a=n?

    I am planning on making a script unscramble letters. In the beginning, would I use varibles to make a : n or how will I do it?

  2. #2
    Join Date
    Mar 2007
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I want it basicly to change scrambled words to real words when it writes it to a string so I would have a = n. When it writes the string it will have a to a n instead of a regular a.

  3. #3
    Join Date
    Apr 2007
    Posts
    581
    Mentioned
    1 Post(s)
    Quoted
    2 Post(s)

    Default

    To set a variable to another variable you would just do

    SCAR Code:
    program Vari;
    var
    a, n : Integer;
    begin
    a := 's';
    n := a;

    Writeln(n);
    end.

  4. #4
    Join Date
    Mar 2007
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    It says type mismatch. Will this write a whole string translated becuse its not only 1 letter. It's sentences that are unscrambled.

  5. #5
    Join Date
    Apr 2007
    Posts
    581
    Mentioned
    1 Post(s)
    Quoted
    2 Post(s)

    Default

    Oh sorry ^_^ its

    SCAR Code:
    program Vari;
    var
    a, n : string;
    begin
    a := 's';
    n := a;
     
    Writeln(n);
    end.

    and Im not sure what you mean exactly but

    SCAR Code:
    program Test;
    var
    a, b, c, d : string;
    begin
    a := 'Hello, ';
    b := 'Is this ';
    c := 'What you wanted?';
    d := a + b + c;
    writeln(d);
    end.

    Is that kinda what you wanted?

  6. #6
    Join Date
    Mar 2007
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    So when I put every other letter in it should translate it?

  7. #7
    Join Date
    Apr 2007
    Posts
    581
    Mentioned
    1 Post(s)
    Quoted
    2 Post(s)

    Default

    Could you give me an example of what you mean? I don't understand what your saying exactly.

  8. #8
    Join Date
    Jun 2006
    Location
    New Zealand
    Posts
    285
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    if(Str1 = 'a') then
    Str1 := 'b';
    An easier way would be using ASCII.

    Is this what you wanted?
    Huehuehuehuehue

  9. #9
    Join Date
    Mar 2007
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I want to have:
    a=n
    b=o
    c=p
    d=q
    e=r
    f=s
    g=t
    h=u
    i=v
    j=w
    k=x
    l=y
    m=z

    And when you have something like this:

    uv gurer
    the string will display it the right way:
    hi there

  10. #10
    Join Date
    Apr 2007
    Location
    Finland
    Posts
    938
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  11. #11
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    PARTS TAKEN FROM MY KEYLOGGER:

    program New;

    Procedure hmm;
    begin
    if(IsKeyDown('a'))then
    begin
    writeln('n')
    wait(100)
    end;
    if(IsKeyDown('b'))then
    begin
    writeln('o')
    wait(100)
    end;
    if(IsKeyDown('c'))then
    begin
    writeln('p')
    wait(100)
    end;
    if(IsKeyDown('d'))then
    begin
    writeln('q')
    wait(100)
    end;
    if(IsKeyDown('e'))then
    begin
    writeln('r')
    wait(100)
    end;
    if(IsKeyDown('f'))then
    begin
    writeln('s')
    wait(100)
    end;
    if(IsKeyDown('g'))then
    begin
    writeln('t')
    wait(100)
    end;
    if(IsKeyDown('h'))then
    begin
    writeln('u')
    wait(100)
    end;
    if(IsKeyDown('i'))then
    begin
    writeln('v')
    wait(100)
    end;
    if(IsKeyDown('j'))then
    begin
    writeln('w')
    wait(100)
    end;
    if(IsKeyDown('k'))then
    begin
    writeln('x')
    wait(100)
    end;
    if(IsKeyDown('l'))then
    begin
    writeln('y')
    wait(100)
    end;
    if(IsKeyDown('m'))then
    begin
    writeln('z')
    wait(100)
    end;
    end;

    begin
    repeat
    hmm
    until(false)
    end.
    Like that..? :?

  12. #12
    Join Date
    Mar 2007
    Posts
    47
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    PwNZoRNooB, your right. It will write the string with it converted.

  13. #13
    Join Date
    Mar 2007
    Location
    Under a rock
    Posts
    813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. who able to make VB6 App
    By Laimonas171 in forum C#/Visual Basic Help and Tutorials
    Replies: 1
    Last Post: 04-05-2009, 03:18 PM
  2. Challenge make a intermediate program, Tell me something to make.
    By ShowerThoughts in forum News and General
    Replies: 9
    Last Post: 09-22-2008, 08:04 PM
  3. this would own (plz make it)
    By owntun00b in forum RS3 Outdated / Broken Scripts
    Replies: 4
    Last Post: 08-01-2007, 06:42 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •