Jump to content

Grab info from webpage page with parsing


Altainta
 Share

Recommended Posts

I need a Program which will do this things...(stock qoute related)

This is not related to YAHOO STOCK...this is custom trading site of my broker.

1) go to a webpage (https) (no login or other formalities required)

2) grab a piece of information from table (in NSE SECTION ONLY) LTP - ???.?? Open - ???.??? High - ???.??? Low - ???.??? Previous Close - ?????

according to the source code the value is LTP - 83.50 OPEN - 82.80 HIGH - 84.90 LOW - 82.20 Previous Close - 84.40

attached is the HTML Source code

Click here to Download Source Code txt File

I just want to parse this information & auto refresh the information every 5-15 second that's it..

I know it is very easy but i never used Autoit IE... I use Autoit on some occassion for few programs only...

some one please provide code OR try to guide me to the right direction (to read some manuals but saturated to the point where my problem is concerned).

I got some code from auto it forum...(by search the forum)

$o_object = ObjCreate("InternetExplorer.Application")
If IsObj($o_object) Then
    $o_object.visible = 0
    $o_object.navigate ("https://subdomain.somesite.com/feed/quotes.jsp?scrip=ifci")
    While $o_object.busy
        Sleep(100)
    WEnd
    
    $s_Text = $o_object.document.body.innerText
    $o_object.quit()
EndIf

MsgBox(0, 'Page Text', $s_Text)

It grabs and display only the text output doesn't parse...

Edited by Altainta
Link to comment
Share on other sites

2) grab a piece of information from table (in NSE SECTION ONLY) LTP - ???.?? Open - ???.??? High - ???.??? Low - ???.??? Previous Close - ?????

according to the source code the value is LTP - 83.50 OPEN - 82.80 HIGH - 84.90 LOW - 82.20 Previous Close - 84.40

attached is the HTML Source code

Click here to Download Source Code txt File

You (user name ) have just tried to access another KeepAndShare user's document. That user has not yet added you to the list of people who can view and/or edit this document. Contact the owner of the document and ask them to share it with you.

Can you repost code somewhere, where registraton is not required?

Link to comment
Share on other sites

Maybe...

***** not tested

#include <String.au3>

Global $Paused, $wait = 15 ; seconds

HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("{F9}", "ShowMe")

Dim $o_object = ObjCreate("InternetExplorer.Application")

$begin = TimerInit()

While Not @error
    If Int(TimerDiff($begin) / 1000) >= $wait Then

        If IsObj($o_object) Then
            $o_object.visible = 0
            $o_object.navigate ("https://subdomain.somesite.com/feed/quotes.jsp?scrip=ifci")
            While $o_object.busy
                Sleep(100)
            WEnd
            
            $s_Text = $o_object.document.body.innerText
            
            $info = _StringBetween($s_Text, "LTP - ", "Close -")
            If IsArray($info) Then ToolTip("LTP - " & $info[0], 10, 10, "Quote Machine", 1)
            
            $begin = TimerInit()
        Else
            MsgBox(0, 'Object Error', @error)
            $o_object = ""
            Exit
        EndIf
    EndIf
    Sleep(20)
WEnd

$o_object.quit ()

Func TogglePause()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        ToolTip('Script is "Paused"', 0, 0)
    WEnd
    ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
    $o_object = ""
    Exit 0
EndFunc   ;==>Terminate

Func ShowMe()
    MsgBox(4096, "Thanks", "    ...Valuater", 3)
EndFunc   ;==>ShowMe

BTW your link is dead

8)

NEWHeader1.png

Link to comment
Share on other sites

Maybe...

***** not tested

#include <String.au3>

Global $Paused, $wait = 15 ; seconds

HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("{F9}", "ShowMe")

Dim $o_object = ObjCreate("InternetExplorer.Application")

$begin = TimerInit()

While Not @error
    If Int(TimerDiff($begin) / 1000) >= $wait Then

        If IsObj($o_object) Then
            $o_object.visible = 0
            $o_object.navigate ("https://subdomain.somesite.com/feed/quotes.jsp?scrip=ifci")
            While $o_object.busy
                Sleep(100)
            WEnd
            
            $s_Text = $o_object.document.body.innerText
            
            $info = _StringBetween($s_Text, "LTP - ", "Close -")
            If IsArray($info) Then ToolTip("LTP - " & $info[0], 10, 10, "Quote Machine", 1)
            
            $begin = TimerInit()
        Else
            MsgBox(0, 'Object Error', @error)
            $o_object = ""
            Exit
        EndIf
    EndIf
    Sleep(20)
WEnd

$o_object.quit ()

Func TogglePause()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        ToolTip('Script is "Paused"', 0, 0)
    WEnd
    ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
    $o_object = ""
    Exit 0
EndFunc   ;==>Terminate

Func ShowMe()
    MsgBox(4096, "Thanks", "    ...Valuater", 3)
EndFunc   ;==>ShowMe

BTW your link is dead

8)

Thank You for the reply guys

http://rapidshare.com/files/69389275/quotes_2_.txt.html

Re uploaded to rapidshare. it is a TXT file...

I can't check the codes which a person gaved me before my post because i have to go out... Kindly take a look at the code and you will find what i want...

I AM REALLY THANK FULL ... AND SO HAPPY that u all gaved a quick reply.. thx again..

Link to comment
Share on other sites

Well, this can be something like (tested with file only, of course):

$o_object = ObjCreate("InternetExplorer.Application")
If IsObj($o_object) Then
    $o_object.visible = 0
    $o_object.navigate ("https://subdomain.somesite.com/feed/quotes.jsp?scrip=ifci")
    While $o_object.busy
        Sleep(100)
    WEnd
    
    $s_Text = $o_object.document.body.innerText

    ; get NSE section
    $aRes = StringRegExp($s_Text, "(?s)NSE</span>(.+?)BSE</span>", 1)
    If not @error Then $s_Text = $aRes[0]

    ; retreive values
    MsgBox (0, "", GetValue($s_Text, "LT Price"))
    MsgBox (0, "", GetValue($s_Text, "Open"))
    MsgBox (0, "", GetValue($s_Text, "High"))
    MsgBox (0, "", GetValue($s_Text, "Previous Close"))

    $o_object.quit()
EndIf

Func GetValue($sText, $sValName)
    Local $cur_regexp = '(?s)(?i)<td.+'& $sValName &'.+?<td.+?(\d+\.\d+)</td>'
    Local $aResult = StringRegExp($sText, $cur_regexp, 1)
    If not @error Then Return $aResult[0]
    Return ""
EndFunc
Link to comment
Share on other sites

Using IE.au3, this piece of code will parse each lowest level table (no tables nested inside) on the page into an array and display the array contents using ArrayDisplay with a title showing the table index.

#include <IE.au3>
#include <Array.au3>

$oIE = _IEAttach("IFCI")

$oTables = _IETagNameGetCollection($oIE, "table")
$index = 0
For $oTable in $oTables
    _IETagNameGetCollection($oTable, "table")
    If Not @extended Then
        $aTable = _IETableWriteToArray($oTable, True)
        _ArrayDisplay($aTable, "Table index: " & $index)
    EndIf
    $index += 1
NextoÝ÷ ØéÜ{*.~)ݶ¢×±¡ûazÖë-«r¢ìܨ¹Æ§ºÇºÚ"µÍÌÍÛÕXHHÒQUYÓ[YQÙ]ÛÛXÝ[Û  ÌÍÛÒQK  ][ÝÝXI][ÝË  ÌÍÚ[^
BÌÍØUXHHÒQUXUÜ]UÐ^J   ÌÍØUXKYJ

And get your values from the array $aTable.

Dale

Free Internet Tools: DebugBar, AutoIt IE Builder, HTTP UDF, MODIV2, IE Developer Toolbar, IEDocMon, Fiddler, HTML Validator, WGet, curl

MSDN docs: InternetExplorer Object, Document Object, Overviews and Tutorials, DHTML Objects, DHTML Events, WinHttpRequest, XmlHttpRequest, Cross-Frame Scripting, Office object model

Automate input type=file (Related)

Alternative to _IECreateEmbedded? better: _IECreatePseudoEmbedded  Better Better?

IE.au3 issues with Vista - Workarounds

SciTe Debug mode - it's magic: #AutoIt3Wrapper_run_debug_mode=Y

Doesn't work needs to be ripped out of the troubleshooting lexicon. It means that what you tried did not produce the results you expected. It begs the questions 1) what did you try?, 2) what did you expect? and 3) what happened instead?

Reproducer: a small (the smallest?) piece of stand-alone code that demonstrates your trouble

Link to comment
Share on other sites

Thx for the reply

Valuater (very good program i like the timer the F9 but not working for me. I am getting \autoit3.exe" /ErrorStdOut error no output)

Lazycat (thank you very much for the code but not working on the webpage only empty message box i think regex problem)

Dalehohm (I am sorry dalehohm i am not able to understand.. But thanks you are the most senior here. that is my problem that i am not getting it !)

Here is original site link as i see all are untested...

https://strade.sharekhan.com/rmmweb/feed/quotes.jsp?scrip=ifci

in this url IFCI is a stock code i will change this many times..

"I can say that my problem is almost solved" Just little more help

Edited by Altainta
Link to comment
Share on other sites

Regarding the IE.au3 example... all you must do is have the website up already on your screen on one of the pages you are trying to parse. Run the script and I would expect it to become clear... maybe not.

Dale

Free Internet Tools: DebugBar, AutoIt IE Builder, HTTP UDF, MODIV2, IE Developer Toolbar, IEDocMon, Fiddler, HTML Validator, WGet, curl

MSDN docs: InternetExplorer Object, Document Object, Overviews and Tutorials, DHTML Objects, DHTML Events, WinHttpRequest, XmlHttpRequest, Cross-Frame Scripting, Office object model

Automate input type=file (Related)

Alternative to _IECreateEmbedded? better: _IECreatePseudoEmbedded  Better Better?

IE.au3 issues with Vista - Workarounds

SciTe Debug mode - it's magic: #AutoIt3Wrapper_run_debug_mode=Y

Doesn't work needs to be ripped out of the troubleshooting lexicon. It means that what you tried did not produce the results you expected. It begs the questions 1) what did you try?, 2) what did you expect? and 3) what happened instead?

Reproducer: a small (the smallest?) piece of stand-alone code that demonstrates your trouble

Link to comment
Share on other sites

not saying I really understand everything here but,

Heres a little help with what Dale posted. -you will need to adapt in the other stuff . . . like a real display.

maybe mix it in with Valuater's stuff . . . for now you will need to open the website first. -I have identified the table as 8 for you and removed the stuff that he used to help you find it. -I think :P

CODE
#include <IE.au3>

#include <Array.au3>

$oIE = _IEAttach("IFCI")

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

_ArrayDisplay($aTable, "Results:") ;Remove this once you understand.

MsgBox(4096, "LT Price", $aTable[0][1], 2)

MsgBox(4096, "Open", $aTable[5][1], 2)

MsgBox(4096, "High", $aTable[8][1], 2)

MsgBox(4096, "Pervious Close", $aTable[13][1], 2)

Edited by Hatcheda
Link to comment
Share on other sites

thought I would take it a bit further . . . not finished but I have to go home . . .

CODE
#include <String.au3>

#include <IE.au3>

#include <Array.au3>

Global $Paused, $wait = 15 ; seconds

HotKeySet("{PAUSE}", "TogglePause")

HotKeySet("{ESC}", "Terminate")

HotKeySet("{F9}", "ShowMe")

Dim $o_object = ObjCreate("InternetExplorer.Application")

$begin = TimerInit()

While Not @error

If Int(TimerDiff($begin) / 1000) >= $wait Then

If IsObj($o_object) Then

$o_object.visible = 0

$o_object.navigate ("https://strade.sharekhan.com/rmmweb/feed/quotes.jsp?scrip=ifci")

While $o_object.busy

Sleep(100)

WEnd

$oIE = _IEAttach("IFCI")

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

$begin = TimerInit()

Else

MsgBox(0, 'Object Error', @error)

$o_object = ""

$oIE = ""

Exit

EndIf

EndIf

Sleep(20)

WEnd

$o_object.quit ()

Func TogglePause()

$Paused = Not $Paused

While $Paused

Sleep(100)

ToolTip('Script is "Paused"', 0, 0)

WEnd

ToolTip("")

EndFunc ;==>TogglePause

Func Terminate()

$o_object = ""

Exit 0

EndFunc ;==>Terminate

Func ShowMe()

If Int(TimerDiff($begin) / 1000) <= 20 Then ;needs work to avoid error

MsgBox(4096, "Your Stock Ticker", "LT Price: " & $aTable[0][1] & " " & "Open: " & $aTable[5][1] & " " & "High: " & $aTable[8][1] & " " & "Previous Close: " & $aTable[13][1])

Else

MsgBox(4096, "Im Busy!", "Please wait 20 Sec after initial launch!")

EndIf

EndFunc ;==>ShowMe

Link to comment
Share on other sites

Lazycat (thank you very much for the code but not working on the webpage only empty message box i think regex problem)

Yeah, this because file you posted was html, but with $s_Text = $o_object.document.body.innerText you get only text without tags. Just change this line to

$s_Text = $o_object.document.body.innerHtml

and this will work.

Link to comment
Share on other sites

Thx Hatcheda n DaleHohm...

In both code i am getting this problem...

>"C:\Program Files\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Documents and Settings\Aisha\Desktop\2.au3"

C:\Documents and Settings\Aisha\Desktop\2.au3 (8) : ==> Incorrect number of parameters in function call.:

$aTable = _IETableWriteToArray($oTable, True)

$aTable = _IETableWriteToArray($oTable, ^ ERROR

Link to comment
Share on other sites

Thx Hatcheda n DaleHohm...

In both code i am getting this problem...

Upgrade AutoIt. You are running an older version.

Dale

Free Internet Tools: DebugBar, AutoIt IE Builder, HTTP UDF, MODIV2, IE Developer Toolbar, IEDocMon, Fiddler, HTML Validator, WGet, curl

MSDN docs: InternetExplorer Object, Document Object, Overviews and Tutorials, DHTML Objects, DHTML Events, WinHttpRequest, XmlHttpRequest, Cross-Frame Scripting, Office object model

Automate input type=file (Related)

Alternative to _IECreateEmbedded? better: _IECreatePseudoEmbedded  Better Better?

IE.au3 issues with Vista - Workarounds

SciTe Debug mode - it's magic: #AutoIt3Wrapper_run_debug_mode=Y

Doesn't work needs to be ripped out of the troubleshooting lexicon. It means that what you tried did not produce the results you expected. It begs the questions 1) what did you try?, 2) what did you expect? and 3) what happened instead?

Reproducer: a small (the smallest?) piece of stand-alone code that demonstrates your trouble

Link to comment
Share on other sites

Hey lazy cat ur code is working fien and yes mr DaleHohm the problem was the older version of autoit..

I forgot that i used a previous copy after virus problem...

I am very sorry for all the trouble but you guys really helped a Lot...

Cheers... Problem Solved

Also let me clear one thing more that i do not wanted to Open the page and than use the program... as this will be cluttering the desktop... which not logical... next is i will use different quotes at the same time....

Still wondering of Refreshing the rate...

What i will do is Put it in the IF or While Condition... and than refresh.. i think it might work...

I just wanted a TOOL tip or a Alert system which will come popping up in the left side of the screen (NEAR THE STATUS BAR CLOCK)

Thank you all

Biggest effort was done by Valuater & Hatcheda lots of code dude but not working for me even after upgrading the version...... (i do not know how to use.)

Edited by Altainta
Link to comment
Share on other sites

Played around a little more. Came up with this from a few snippits from others.

CODE
#include <IE.au3>

#include <Array.au3>

HotKeySet("{F9}", "PleaseWait")

HotKeySet("{ESC}", "Terminate")

$URL = "https://strade.sharekhan.com/rmmweb/feed/quotes.jsp?scrip=ifci"

$ObjIE = ObjCreate("InternetExplorer.Application")

$Ready = TimerInit()

With $ObjIE

.Visible = False

.Navigate ($URL)

Do

Sleep(50)

Until .ReadyState = 4

EndWith

$oIE = _IEAttach("IFCI")

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

;_ArrayDisplay($aTable, "Table index: ")

HotKeySet("{F9}", "ShowMe")

While 1

Sleep(7500)

_IEAction ($ObjIE, "refresh")

Sleep(7500)

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

WEnd

Func PleaseWait()

MsgBox(0, "Im Working on it!", "Please wait a few more 'Moments' :P")

EndFunc ;==>PleaseWait

Func ShowMe()

MsgBox(0, "Your Stock Ticker", "LT Price: " & $aTable[0][1] & " " & "Open: " & $aTable[5][1] & " " & "High: " & $aTable[8][1] & " " & "Previous Close: " & $aTable[13][1])

EndFunc ;==>ShowMe

Func Terminate()

$o_object = ""

$oIE = ""

$ObjIE = ""

$Ready = ""

$URL = ""

$oTable = ""

$aTable = ""

Exit 0

EndFunc ;==>Terminate

The refresh rate is located in the 'While 1' its 7.5 seconds for refresh plus 7.5 for Array load time. (totaling 15 seconds) If you want it shorter, try lowering the refresh first. If longer, raise the Array load time. ;)

I was thinking of building a gui later where you could change the stock, and maybe get allerts or auto popups if the amount falls below or rises above a given amount . . .

Just turn it on and press F9

Edited by Hatcheda
Link to comment
Share on other sites

Hey dude awesome work...

I am so glad it worked even better..

Still no auto refresh i need to click okay n than it might come again.. it is no problem dude i will study few examples and than i will try to make it happen..

thank you very much

Lots of coding again thx for the efforts...

Sorry late reply... gone out...

Edited by Altainta
Link to comment
Share on other sites

Hey, it does auto refresh. It updates the array every 15 seconds in the background. To see the results, you simply press F9. The Array holds the same info for 15 seconds so if you press it with in that time you will get the same information. Also, the site would also have to update for you to pull the new information. I added a Date/Time for you to see. Code below. I will add a GUI later that remains open and does not require the F9 function.

CODE
#include <IE.au3>

#include <Array.au3>

HotKeySet("{F9}", "PleaseWait")

HotKeySet("{ESC}", "Terminate")

$URL = "https://strade.sharekhan.com/rmmweb/feed/quotes.jsp?scrip=ifci"

$ObjIE = ObjCreate("InternetExplorer.Application")

$Ready = TimerInit()

With $ObjIE

.Visible = False

.Navigate ($URL)

Do

Sleep(50)

Until .ReadyState = 4

EndWith

$oIE = _IEAttach("IFCI")

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

HotKeySet("{F9}", "ShowMe")

While 1

Sleep(7500)

_IEAction ($ObjIE, "refresh")

Sleep(7500)

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

WEnd

Func PleaseWait()

MsgBox(0, "Im Working on it!", "Please wait a few more 'Moments' :P")

EndFunc ;==>PleaseWait

Func ShowMe()

;_ArrayDisplay($aTable, "Table index: ")

MsgBox(0, "Your Stock Ticker", "LT Price: " & $aTable[0][1] & " " & "Open: " & $aTable[5][1] & " " & "High: " & $aTable[8][1] & " " & "Previous Close: " & $aTable[13][1] & " " & "Date/Time: " & $aTable[24][1])

EndFunc ;==>ShowMe

Func Terminate()

$o_object = ""

$oIE = ""

$ObjIE = ""

$Ready = ""

$URL = ""

$oTable = ""

$aTable = ""

Exit 0

EndFunc ;==>Terminate

Link to comment
Share on other sites

Here's the newest version. In contains a GUI and the ability to change out the stock.

I have left file in and the extra bottom space for a future array to pull buttons from you 'favorite' stocks listed in a future note pad amended by the gui. WIP

CODE
#include <IE.au3>

#include <Array.au3>

#include <GuiConstants.au3>

#include <file.au3>

HotKeySet("{ESC}", "Terminate")

$Form1 = GUICreate("My Stock Ticker", 610, 300, 300, 250)

$Group1 = GUICtrlCreateGroup("Target Stock:", 24, 40, 561, 129)

$Input1 =GUICtrlCreateInput ("NSE:", 440, 20, 30, 17)

GUICtrlSetData($Input1, "ifci")

$Button1 = GUICtrlCreateButton("Update", 495, 20, 60, 17)

$Label1 = GUICtrlCreateLabel("Lt Price:", 45, 64, 85, 17)

$Label2 = GUICtrlCreateLabel("Open:", 150, 64, 85, 17)

$Label3 = GUICtrlCreateLabel("High:", 265, 64, 85, 17)

$Label4 = GUICtrlCreateLabel("Previous Close:", 380, 64, 85, 17)

$Label5 = GUICtrlCreateLabel("Date/Time:", 495, 64, 85, 17)

$Edit1 = GUICtrlCreateLabel("", 45, 88, 85, 17)

$Edit2 = GUICtrlCreateLabel("", 150, 88, 85, 17)

$Edit3 = GUICtrlCreateLabel("", 265, 88, 85, 17)

$Edit4 = GUICtrlCreateLabel("", 380, 88, 85, 17)

$Edit5 = GUICtrlCreateLabel("", 495, 88, 85, 32)

GUISetState(@SW_SHOW)

$begin = TimerInit()

$wait = 15000

While 1

$nMsg = GUIGetMsg()

Select

Case $nMsg = $GUI_EVENT_CLOSE

Exit

Case ($nMsg = $Button1) Or (TimerDiff($begin) >= $wait)

UpdateStock()

EndSelect

WEnd

Func UpdateStock()

GUICtrlSetData($Edit1, "Loading . . .")

GUICtrlSetData($Edit2, "Loading . . .")

GUICtrlSetData($Edit3, "Loading . . .")

GUICtrlSetData($Edit4, "Loading . . .")

GUICtrlSetData($Edit5, "Loading . . .")

$Stock = GUICtrlRead($Input1)

$URL = "https://strade.sharekhan.com/rmmweb/feed/quotes.jsp?scrip=" & $Stock

$ObjIE = ObjCreate("InternetExplorer.Application")

With $ObjIE

.Visible = False

.Navigate ($URL)

Do

Sleep(50)

Until .ReadyState = 4

EndWith

$oIE = _IEAttach("IFCI")

$oTable = _IETagNameGetCollection($oIE, "table", 8)

$aTable = _IETableWriteToArray($oTable, True)

GUICtrlSetData($Edit1, $aTable[0][1])

GUICtrlSetData($Edit2, $aTable[5][1])

GUICtrlSetData($Edit3, $aTable[8][1])

GUICtrlSetData($Edit4, $aTable[13][1])

GUICtrlSetData($Edit5, $aTable[24][1])

$oIE.quit ()

$begin = TimerInit()

EndFunc ;==>UpdateStock

Func Terminate()

$o_object = ""

$oIE = ""

$ObjIE = ""

$Ready = ""

$URL = ""

$oTable = ""

$aTable = ""

Exit 0

EndFunc ;==>Terminate

Link to comment
Share on other sites

Hey dude

I can't believe it..

I perfectly wanted the same thing... i am very thank full to u...

Thx dude.. Now i can concentrate on my other stock...

Thank you very much ;):P :P

Only one editing

$oIE = _IEAttach("IFCI")

$oIE = _IEAttach($Stock)

One more thing i would like to ask which will make this program more better

How can add more lines like

IFCI

RPL

REL

Suppose this are the 3 stock code which it should display on the panel... Max 5 entries.. constantly updating (15 sec)

How come we will do that as it search for the window..

I already gave u a lot of trouble i am sorry for...Still thank you dude.. :)

Edited by Altainta
Link to comment
Share on other sites

ha - I hadn't even noticed I left that out! :P For now you can just open two or more scripts at the same time and change the stock for each one. To do what you are asking with one script would only mean that you need to add new labels below the current ones and then duplicate the array and ie attach stuff over and over and repoint the lables and input box for each. should be easy. -will work on it later . . .

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...