How to repeat the last random number

Hi all!

I have a timer and a random number (var myNumber: number = Math.ceil (Math.random () * 5);).

I need to repeat the last random number, for example: 3-3, 4-4, 1-1, etc.

Any suggestions?

Thank you.

use:

kglad wrote:

use:

 var myNum: Number;
  • var mySound: Sound = new Click();
  • var mySound2: Sound = new Sound2();
  • var fl_TimerInstance: timer = new Timer(1000, 30);
  • fl_TimerInstance.addEventListener (TimerEvent.TIMER, fl_TimerHandler);
  1. Count_It.addEventListener (MouseEvent.CLICK, Count_It);
  2. function Contalo(event: MouseEvent): void {}
  3. fl_TimerInstance.reset ();
  4. fl_TimerInstance.start ();
  5. }
  • function fl_TimerHandler(event: TimerEvent): void {}
  • If (event.currentCount % 2 == 1) {}
  • myNum = Math.ceil (Math.random () * 8);
  • trace (MyNum);
  • mySound.play ();
  • } else {}
  • mySound2.play ();
  • trace (MyNum);
  • }
  • }

Tags: Adobe Animate

Similar Questions

  • How to find the last pasted paragraphs FMP?

    I'm sticking FMP several objects at once in a file (a file of changes to the sections containing the changebars) in the main text flow. I want a separator line to go at the end of each pasted section, so I try to insert one after the paste operation. But instead of a line between each section, all lines are added at the end of the file, after all the sections. So if there are 3 glued sections at the end of the file are three lines. My code is below, do you know how I could fix this?

    Thank you, Mark

    function copyPasteChanges (doc, chgRange) {}

    Select the section with changebar and copy it.

    doc. TextSelection = chgRange;

    doc. Copy();

    Prepare for the changes doc and paste there the modified section.

    var firstChgPgf = changesDoc.MainFlowInDoc.FirstTextFrameInFlow.LastPgf;

    var changesTloc = new TextLoc (firstChgPgf, Constants.FV_OBJ_END_OFFSET);

    var changesTRange = new TextRange (changesTloc, changesTloc);

    changesDoc.TextSelection = changesTRange;

    changesDoc.Paste ();

    To go at the end of the file again (I think)

    var lastPgf = changesDoc.MainFlowInDoc.FirstTextFrameInFlow.LastPgf;

    var dividerPgf = changesDoc.NewSeriesPgf (lastPgf);

    var TLoc = new TextLoc (dividerPgf, 0);

    changesDoc.AddText (TLoc, '_');

    }

    Hi Mark,

    The problem is that the dough does not occur when you think. The dividing line is added at the end of the file, but are not your actions of dough. Actually, I think that maybe a little random where pasta is produced, because this line:

    var changesTloc = new TextLoc (firstChgPgf, Constants.FV_OBJ_END_OFFSET);

    .. .is does not create a valid text location. You can check this by abandoning the service after:

    changesDoc.TextSelection = changesTRange;

    .. and look at where's the insertion point. It will probably be everywhere where you left it last, because the call is not valid. I can't tell you exactly why, except that it has something to do with the fact that you are using the last paragraph in the stream. There is something weird to try to define a range of full-paragraph text with the last paragraph. I'm sure it's related to how the last TFP in a stream does not show a mark of FMP, but beyond that, I don't know how to do what you're trying to do with the last paragraph.

    Having no knowledge of how do it right, any time I need to do this, I create a paragraph "dummy" at the end of the flow to fill that space strange 'last FMP", then do the work around it. In the end, I just want to remove fake TFP. I don't know if it's a good idea or not, but it's the only way I ever get it to work and it sorts the mirror how you could do this manually in the GUI.

    With this, I modified your script as follows, and it seems to work better. Note that I also modified the logic of how to find the last paragraph of the flow by writing a separate function. Your call to the 'FirstTextFrameInFlow' is OK, unless your doc begins to span several pages and/or begins with several empty pages. The function I wrote ensures that you really the last TFP in the stream.

    I hope this helps.

    Russ

    function copyPasteChanges (doc, chgRange) {}

    Select the section with changebar and copy it.

    doc. TextSelection = chgRange;

    doc. Copy();

    Prepare for the changes doc and paste there the modified section.

    var lastPgf = getLastPgf (changesDoc);

    var dummyPgf = changesDoc.NewSeriesPgf (lastPgf);

    var changesTloc = new TextLoc (dummyPgf, 0);

    var changesTRange = new TextRange (changesTloc, changesTloc);

    changesDoc.TextSelection = changesTRange;

    changesDoc.Paste ();

    To go at the end of the file again (I think)

    Don't forget that last TFP is now fake TFP

    lastPgf = getLastPgf (changesDoc);

    var dividerPgf = changesDoc.NewSeriesPgf (lastPgf.PrevPgfInFlow);

    var TLoc = new TextLoc (dividerPgf, 0);

    changesDoc.AddText (TLoc, '_');

    dummyPgf.Delete ();

    }

    function getLastPgf (doc)

    {

    textFrame var is doc. MainFlowInDoc.LastTextFrameInFlow;

    var lastPgf = textFrame.LastPgf;

    While (! lastPgf.ObjectValid () & textFrame.ObjectValid ())

    {

    textFrame = textFrame.PrevTextFrameInFlow;

    lastPgf = textFrame.LastPgf;

    }

    Return lastPgf;

    }

  • How to get the last day of the week?

    HII

    I can get the week number of calendar for a given date using

    SELECT to_char (to_date('04/04/2011','MM/DD/YYYY'), 'WW') FROM dual

    can any body tell me, how to get the last day of the week?

    and the answer should be: 04/08/2011(8th april)
    Thank you
    San

    Published by: sandeep9 on April 4, 2011 03:50

    Perhaps this...

    SQL> select trunc(sysdate,'WW')+6 from dual;
    
    TRUNC(SYSDATE,'WW')+
    --------------------
    08-APR-2011 00:00:00
    
    SQL>
    
  • How to repeat the installation of Windows XP on my Acer Aspire One?

    How to repeat the installation of Windows XP on my Acer Aspire One? I have the key but I can see that the version of the Windows because label is damaged. They do not protect the foil label. Where can I download the windows installation? Thanks for your replies!

    Hi Luka Vetma,

    Windows XP is not available for download and it is no longer supported.

    You can contact the computer manufacturer to restore Windows XP on your computer or you can install Windows 7, for more information, see the links below

    Acer Support link

    http://support.Acer.com/us/en/default.aspx

    Purchase Windows 7

    http://www.Microsoft.com/Windows/buy/default.aspx

    10 reasons to buy Windows 7

    http://Windows.Microsoft.com/en-us/Windows7/products/10-reasons-to-buy-Windows-7

    Installation and reinstallation of Windows 7

    http://Windows.Microsoft.com/en-us/Windows7/installing-and-reinstalling-Windows-7

    Note: It is recommended to backup your important data, before performing any installation of Windows.

  • How to remove the host geniric number?

    How to remove the host geniric number?

    Hi m KUMAR,.
     
    -You receive any host related error message generic?
    -Remember you proceed with recent computer between the calendar changes when things worked fine and now?
     
    Follow the steps in the article below and check if it helps to solve this problem:
    After return with more information pertaining to the matter for us help to help you better.
  • How to get the last date of 3 days for the current month?

    Hello. Guy

    How to get the last date of 3 days for the current month?

    MY OUTPUT WOULD LOOK LIKE THIS

    JANUARY 29, 2016

    JANUARY 30, 2016

    JANUARY 31, 2016


    GUYS HELP ME / / /...

    SQL > select last_day (sysdate) - level + 1 double connect by level<= 3="" order="" by="">

    LAST_DAY)

    ---------

    29 JANUARY 16

    30 JANUARY 16

    31 JANUARY 16

  • How to take the last 7 digits of a varchar column

    How to take the last 7 digits of a varchar2 colum

    COL1

    12345678

    12345

    1234567890123

    1234567

    Out put should be as below

    COL1

    2345678

    12345

    7890123

    1234567

    everything built in function or in any other way please

    Hello

    assuming that the entry contains only numbers, as in the example, the addition of 7 spaces to the left and selecting the 7 last characters toured:

    with dataset as

    (select col1 from column_value

    table

    (dbmsoutput_linesarray

    ("12345678"

    '12345 '.

    '1234567890123'

    "1234567".

    )

    )

    )

    Select col1

    , substr (lpad (", 7,' ') | col1-7) col1_last7

    of the dataset

    /

    COL1 COL1_LAST7

    -------------------- --------------------

    12345678 2345678

    12345 12345

    1234567890123 7890123

    1234567 1234567

    Rob

  • How long is the last free trial?

    How long is the last free trial before purchising?

    The free trial for 30 days.

    Concerning

    Hervé Khare

  • How to set the 1st online number = 10 and increment 10 whenever you press the button to add a new line. Also enable users to enter the generic numbers, IE 13 and still increment of 10 23 or whatever.

    How to set the 1st online number = 10 and increment 10 whenever you press the button to add a new line. Also enable users to enter the generic numbers, IE 13 and still increment of 10 23 or whatever.

    I already have my chart updated in place with a button that will add new lines when pressed.

    Now, I want to clarify that the 1st row is 10 and all the other rows after this increase by 10. It will also allow users to enter any number they want, and the next line will increment of 10.

    Help please.

    Try changing the line button Add the following JavaScript code

    newRow var = Table1._Row1.addInstance)

    If (newRow.index > 0)

    {

    newRow.NumericField1.rawValue = newRow.resolveNode ('Row1 [-1].) NumericField1') .rawValue + 10;

    }

    You need to change this code to match your name on the form, but basically the method addInstance() returns the new row, the newRow.resolveNode ("Row1 [-1]... will get the value of the previous row and then add 10.

    Concerning

    Bruce

  • How to get the last day of a month for every 2 months for a given period?

    Hello

    Can is it some please let me know how to get the last day, last day of the week, the weekend last day, last Monday, one month for every 2 months for a given period?

    Thanks in advance.

    Try the below

    SELECT LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))) lastday.

    BOX WHEN TO_CHAR (LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))), 'DY') = 'SAT '.

    SO LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2)))-1

    WHERE TO_CHAR (LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))), 'DY') = 'Sun '.

    THEN LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2)))-2

    Of OTHER LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2)))

    END as lastweekday,

    BOX WHEN TO_CHAR (LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))), 'DY') IN ('Sam', 'SUN')

    THEN LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2)))

    Of OTHER LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2)))

    -(TO_NUMBER (TO_CHAR (LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))),' from)) - 1).

    END as lastweekendday,

    BOX WHEN TO_CHAR (LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))), 'DY') = 'MY

    THEN LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2)))

    Of OTHER NEXT_DAY (LAST_DAY (ADD_MONTHS (TRUNC(startdate,'MM'), ((LEVEL*2)-2))), "LUN")-7

    END AS lastmonday

    FROM (SELECT SYSDATE startdate,

    SYSDATE + 300 enddate

    THE DOUBLE)

    CONNECT BY LEVEL<=>

  • Win version first elements 14 rather than Mac version you downloaded. Serial number does not work. How to get the right serial number

    Win version first elements 14 rather than Mac version you downloaded. Serial number does not work. How to get the right serial number?

    It is unclear what problem you are facing... the wrong version or the wrong serial number.  The serial number is likely for the other version.  You don't want the serial number of Windows or the Mac version?

    One of the following conditions may be useful...

    You can exchange languages/platforms for a newer version product if you follow the instructions on the following link:

    l http://helpx.adobe.com/x-productkb/Policy-Pricing/Order-Product-Platform-Language-swap.htm

    To the link below, click on the still need help? the option in the blue box below and choose the option to chat...
    Make sure that you are logged on the Adobe site, having cookies enabled, clearing your cookie cache.  If it fails to connect, try to use another browser.

    Serial number and activation support (non - CC) chat
    https://helpx.Adobe.com/contact.html?step=PHSP-PHXS_downloading-installing-setting-up_lice nsing-activation_stillNeedHelp

  • My computer is dead, had to get the new computer. Installed PS CS2 and tried to activate it. Cannot call the online help desk, they sent me to you to activate my software. I have the serial number and the last activation number. T

    My computer is dead, had to get the new computer. Installed PS CS2 and tried to activate it. Cannot call the online help desk, they sent me to you to activate my software. I have the serial number and the last activation number. Thank you. Or to intervene in the forum.



    [address removed by email.. mod]


    Hi carlkent,

    Your serial for Photoshop CS2 key would not work as the activation for CS2 servers were closed.

    You must visit this link to download the version CS2 and use the key to series mentioned in this link: https://helpx.adobe.com/creative-suite/kb/cs2-product-downloads.html

  • How to find the last date of execution of the objects in database

    Hi all

    We're going for an upgrade of the database 11g and for the same thing, we want to know the last date of the following-

    Packages, Tables, views
    Conc. programs / value Sets / look up / profile options

    Is there a way we can find the same thing.
    The answers would be really useful.

    Kind regards
    Shruti

    So can you provide clues on how to find the last opportunity registration

    I don't think you can find such a script with having activated audit.

    Thank you
    Hussein

  • How to revive the last work, then from the APP? Or system restart?

    How to revive the last work, then from the APP? Or system restart?

    EIB zu ADOBE: "geht nicht mehr!  (this function is not longer possible)

  • How to get the original serial number to reload the program on the new computer?

    How to get the original serial number to reload the program on the new computer?

    Hi rehe,

    Please check the KB: quickly find your serial number to find your serial number.

    You can contact our support chat to help retrieve your serial number: serial number and activation support

    Kind regards

    Rave

Maybe you are looking for