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);
- Count_It.addEventListener (MouseEvent.CLICK, Count_It);
- function Contalo(event: MouseEvent): void {}
- fl_TimerInstance.reset ();
- fl_TimerInstance.start ();
- }
- 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:50Perhaps 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.
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?
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. 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
ShrutiSo 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
-
Apple TV 9.2 using the keyboard to type the first few letters in library home sharing
Hello community, Someone managed to use the keyboard to type the first letters of a movie/tv/music show in their home sharing library? I was able to do this on the old ATV but can't make it work on the new ATV.
-
If I want to temporarily delete an app like c if then can restore how to thank you
Please see above
-
Hi all My old iMac (core duo Intel) refuses to start, even after her trying everything I could find on this forum. Safe mode barely fills one third of the status bar before leaving. Apple Hardware Test says the disc works perfectly, as do the Single
-
When I start to use the mail, suddenly the server is changed and I can not change because that it is disabled (in gray). What happens after instal El Capitan, when my Exchange account. Is an Enterprise Server (mail.megasuper.com) I need to change,
-
Hey, recently I downloaded the application of 360 Security, after what happened, it's photos of the app from my phone album became invisible... Although they are still on my sd card and in this album app, when I touch, the date and time of the respec