Results 1 to 15 of 15

Thread: Please Give Feedback For Script.

  1. #1
    Join Date
    Feb 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Script for Science Fair

    First of all, let me get something clear. This is not a script related to RuneScape! This script is for my science project. I want as many people as possible to run this script and give me feedback before 3:00 P.M. Pacific Time of Wednesday, February 28. Please have your feedback look like this:

    Name (optional)
    Age (required)
    Gender (required)
    Which set of numbers you failed on; 1st set (6 digits), 2nd set (9 digits), or 3rd set (12 digits). (required)
    If you failed on one of the sets, please try to tell on which digit of which set you failed. (recommended)

    Please, please, please be truthful! It will do me no good to have incorrect data for my science fair project! You may run the script twice and send the second result if you feel the first try was terrible. If you are concerned about privacy, you may private message me the information instead. So please, help me out and spend about one minute to gather some data for me. Thanks in advance. Script as follows (hopefully it works):
    Code:
    program Memorization;
    
    var
      Numbers: array[1..6] of Integer;
      s, nmb: string;
    
    const
      Msg = 'Please Remember These Numbers: ';
    
    procedure GenerateNumbers;
    var
      i: Integer;
    begin
      for i := 1 to 6 do
        Numbers[i] := Random(10);
    end;
    
    procedure GenerateNumbers2;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Numbers[i] := Random(10);
    end;
    
    procedure GenerateNumbers3;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Numbers[i] := Random(10);
    end;
    
    procedure ShowNumbers;
    var
      i: Integer;
    begin
      Cleardebug;
      for i := 1 to 6 do
        nmb := nmb + IntToStr(Numbers[i]);
      WriteLn(Msg + nmb);
      Wait(2000);
    end;
    
    procedure ShowNumbers2;
    var
       i: Integer;
    begin
       Cleardebug;
       for i := 1 to 3 do
         nmb := nmb + IntToStr(Numbers[i]);
       Writeln(Msg + nmb);
       Wait(4500)
    end;
    
    procedure ShowNumbers3;
    var
       i: Integer;
    begin
       Cleardebug;
       for i := 1 to 3 do
         nmb := nmb + IntToStr(Numbers[i]);
       Writeln(Msg + nmb);
       Wait(6000)
    end;
    
    procedure AskAnswer;
    var
      i: Integer;
    begin
      for i := 1 to 6 do
        Cleardebug;
      Wait(2000);
      s := ReadLn('Enter Previous Number Here:');
      if nmb = s then
        Writeln('You Have Entered The Correct Answer!')
      else
        Writeln('You Have Entered An Incorrect Answer!');
      Wait(2000);
    end;
    
    procedure AskAnswer2;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Cleardebug;
      Wait(2000);
      s := ReadLn('Enter Previous Number Here:');
      if nmb = s then
        Writeln('You Have Entered The Correct Answer!')
      else
        Writeln('You Have Entered the Incorrect Answer!');
      Wait(2000);
    end;
    
    procedure AskAnswer3;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Cleardebug;
      Wait(2000);
      s := ReadLn('Enter Previous Number Here:');
      if nmb = s then
        Writeln('You Have Entered The Correct Answer!')
      else
        Writeln('You Have Entered The Incorrect Answer!');
      Wait(2000);
    end;
    
    begin
      GenerateNumbers;
      ShowNumbers;
      AskAnswer;
      GenerateNumbers2;
      ShowNumbers2;
      AskAnswer2;
      GenerateNumbers3;
      ShowNumbers3;
      AskAnswer3;
    end.
    This is what the script should do:
    1. Give out a set of 6 digits in the debugging box.
    2. Digits will disappear after 2 seconds.
    3. A pop-up will appear asking for the user to input the previous numbers.
    4. If answered correctly, will say you have entered correct numbers and continue on.
    5. If answered incorrectly, will say you have entered incorrect numbers and continue on. (If you answered incorrectly, please restart script.)
    6. Will repeat steps 1-5, but digits will increase to 9, then 12.

    Lots of thanks to Freddy1990, JAD, and other people who helped me.
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your signature!

  2. #2
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    Like you said this isnt a runescape script, it also doesnt use SRL so obviously doesn't belong int he SRL SCRIPT SECTION.

    Ask a mod to move it to the "Other Scar Script" section where it will probably get more appreciation and views.

    Also, please title your threads something that will inform us about your script, not make you seem nooby

    Love,
    Yohojo

  3. #3
    Join Date
    Feb 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Oh, ok, thanks. So... If a moderator is seeing this, can you please move it to the "Other Scar Script" section? Thanks.

    EDIT: Apparently, I can not edit the post name. =/
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your signature!

  4. #4
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    yeah too late for that. Just edit the post above mine, and tell them to move it, and the new name you would like.

    =)
    KthxBai

  5. #5
    Join Date
    Nov 2006
    Location
    NSW, Australia
    Posts
    3,487
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default Sweet

    Name: Samuel
    Age: 12
    Gender: Male

    I didn't fail on anything and the script successfully executed at its own accord.
    I got up to 393550910729.

    My second try: got up to 574836330795.

  6. #6
    Join Date
    Sep 2006
    Posts
    916
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Name Kenedy(lawl)
    Age 12
    Gender Male
    Which set of numbers you failed on; 1st set (6 digits), 2nd set (9 digits), or 3rd set (12 digits). failed on second then got 3rd right.
    If you failed on one of the sets, please try to tell on which digit of which set you failed. 885442248
    Messed up on that 2, put one of them instead of 2 :P. Copy a pasted to show you.

  7. #7
    Join Date
    Feb 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thanks for the feedback guys. Hope more people will try it out. Thanks.
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your signature!

  8. #8
    Join Date
    Feb 2007
    Posts
    3,616
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    thanks for putting in a thanks to me but i just have a question, how is this supposed to help you with your science fair project? it would be easier to just answer the questions yourself then needing to write out a whole script wouldn't it ? anyway good work, and I am glad that i could have been of help

  9. #9
    Join Date
    Feb 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I thought that this would be a good way to collect data from a wide range of people. However, I have only two responses, yet I need ten or more. If I just typed out numbers on a sheet of paper, it would be extremely easy for others to just tell people who were being tested what the numbers were. (I've tried it at school, didn't work so well.)

    You did help me a lot though, JAD, and it would be improper to leave out a thank you.

    Come on people, please don't tell me the only script you are going to try is something related to RuneScape. Help a fellow [noob] scriptor out! Please take less than two minutes of your time to run my script and reply with the data I need. There's a little less than 24 hours left until the deadline for data turn-in! So what do you say? Please, just take a minute or so of your time!

    If this turns out well, I will be forever grateful to this forum.

    EDIT: Come on people! 81 views and only two people have cared to send back data! Please help a fellow out! I would greatly appreciate it!
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your signature!

  10. #10
    Join Date
    Sep 2006
    Posts
    916
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Come on people, if i did it you can do it to! Or are you all chicken? :P.

  11. #11
    Join Date
    Feb 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    The deadline has been moved to 6:00 P.M. Pacific Time. There is only 2 hours and 38 minutes left at the time of this post. Please help me with this script! I would really appreciate it!
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your signature!

  12. #12
    Join Date
    Mar 2006
    Location
    United States, -7:00 GMT
    Posts
    1,790
    Mentioned
    2 Post(s)
    Quoted
    2 Post(s)

    Default

    Age: 14
    Gender: Male

    Got up to the 3rd, but failed. I think the numbers were 018080192572

    hakuna matata ;)

  13. #13
    Join Date
    Feb 2006
    Location
    Amsterdam
    Posts
    6,136
    Mentioned
    28 Post(s)
    Quoted
    17 Post(s)

    Default

    Name: WT-Fakawi
    Age: 43

    Copied/pasted the script briefly looking through the code, not really trying to understand what it was all about:

    Run it...
    and was shocked at how slow I was switching to memory-mode, so before I realized what it was I was supposed to do, the number was gone Misarebly failed the first one. Got the second one though, by speaking the number out loud, therefore stimulating my auditive memory too. Failed the last, lack of concentration.....

    I wish I could see back that first number

    Hope this helps you in your investigation!
    SRL is a Library of routines made by the SRL community written for the Program Simba.
    We produce Scripts for the game Runescape.

  14. #14
    Join Date
    Sep 2006
    Location
    West U.S.
    Posts
    2,172
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    this script makes me feel dumb!

    They are sisters...
    Runescape Classic

  15. #15
    Join Date
    Feb 2007
    Posts
    22
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thanks so much for replying back. Now, if only a little bit more people contribute, I'll be able to reach my goal! Again, thanks a ton for replying back.

    EDIT: If you guys can, please also run the following script. It is a duplicate of the first one, except the time of exposure for the digits is shortened.
    Code:
    program Memorization;
    
    var
      Numbers: array[1..6] of Integer;
      s, nmb: string;
    
    const
      Msg = 'Please Remember These Numbers: ';
    
    procedure GenerateNumbers;
    var
      i: Integer;
    begin
      for i := 1 to 6 do
        Numbers[i] := Random(10);
    end;
    
    procedure GenerateNumbers2;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Numbers[i] := Random(10);
    end;
    
    procedure GenerateNumbers3;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Numbers[i] := Random(10);
    end;
    
    procedure ShowNumbers;
    var
      i: Integer;
    begin
      Cleardebug;
      for i := 1 to 6 do
        nmb := nmb + IntToStr(Numbers[i]);
      WriteLn(Msg + nmb);
      Wait(2000);
    end;
    
    procedure ShowNumbers2;
    var
       i: Integer;
    begin
       Cleardebug;
       for i := 1 to 3 do
         nmb := nmb + IntToStr(Numbers[i]);
       Writeln(Msg + nmb);
       Wait(2000)
    end;
    
    procedure ShowNumbers3;
    var
       i: Integer;
    begin
       Cleardebug;
       for i := 1 to 3 do
         nmb := nmb + IntToStr(Numbers[i]);
       Writeln(Msg + nmb);
       Wait(2000)
    end;
    
    procedure AskAnswer;
    var
      i: Integer;
    begin
      for i := 1 to 6 do
        Cleardebug;
      Wait(2000);
      s := ReadLn('Enter Previous Number Here:');
      if nmb = s then
        Writeln('You Have Entered The Correct Answer!')
      else
        Writeln('You Have Entered An Incorrect Answer!');
      Wait(2000);
    end;
    
    procedure AskAnswer2;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Cleardebug;
      Wait(2000);
      s := ReadLn('Enter Previous Number Here:');
      if nmb = s then
        Writeln('You Have Entered The Correct Answer!')
      else
        Writeln('You Have Entered the Incorrect Answer!');
      Wait(2000);
    end;
    
    procedure AskAnswer3;
    var
      i: Integer;
    begin
      for i := 1 to 3 do
        Cleardebug;
      Wait(2000);
      s := ReadLn('Enter Previous Number Here:');
      if nmb = s then
        Writeln('You Have Entered The Correct Answer!')
      else
        Writeln('You Have Entered The Incorrect Answer!');
      Wait(2000);
    end;
    
    begin
      GenerateNumbers;
      ShowNumbers;
      AskAnswer;
      GenerateNumbers2;
      ShowNumbers2;
      AskAnswer2;
      GenerateNumbers3;
      ShowNumbers3;
      AskAnswer3;
    end.
    EDIT: OK, this thread can now be closed. I have received the bare minimum of replies. I would like to thank those four who replied in the thread, and for JAD's last minute reply.
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your signature!

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Need Feedback on my first script!
    By unrealman in forum RS3 Outdated / Broken Scripts
    Replies: 7
    Last Post: 10-29-2008, 11:54 PM
  2. Could somone give me a good script to get fishing to 70
    By dertykid555 in forum RS3 Outdated / Broken Scripts
    Replies: 2
    Last Post: 03-15-2007, 07:51 PM
  3. Replies: 8
    Last Post: 04-14-2006, 10:26 AM

Posting Permissions

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