set SOFtemp to the name of the member of sprite the clickOn
set SOFtemp1 to the name of the member of sprite the clickOn & "_productinfo"
set the text of field "SOFtextbox" to the text of member SOFtemp1
set f to "1"
set SOFtemp2 to the name of the member of sprite the clickOn & "_prev_end"
set SOFtemp3 to the name of the member of sprite the clickOn & "_prev" & f
if the number of member SOFtemp3 = -1 then
set the member of sprite 4 to member SOFtemp2
else
set the member of sprite 4 to member SOFtemp3
end if
set the loc of sprite 4 to point(473, 155)
set VERSION1 to " "
set versionbox2 to "put the Version of the prog" & SOFx & " of " & whichsection & " into VERSION1"
do(versionbox2)
if VERSION1 = EMPTY then
set verofprog to SOFtemp
else
set verofprog to SOFtemp & " " & VERSION1
end if
set the member of sprite 40 to member "productnamebox"
set the ink of sprite 40 to 36
set the text of field "productnamebox" to verofprog
set the loc of sprite 40 to point(437, 322)
set INSTALLPLAYCOPY1 to "install1"
set INSTALLPLAYCOPY1PART2 to "inst"
set thisprog2 to "if the playinstcopy of the prog" & SOFx & " of " & whichsection & " = INSTALLPLAYCOPY1PART2 then set the member of sprite 41 to member INSTALLPLAYCOPY1"
do(thisprog2)
set INSTALLPLAYCOPY2 to "copy1"
set INSTALLPLAYCOPY2PART2 to "copy"
set thisprog3 to "if the playinstcopy of the prog" & SOFx & " of " & whichsection & " = INSTALLPLAYCOPY2PART2 then set the member of sprite 41 to member INSTALLPLAYCOPY2"
do(thisprog3)
set INSTALLPLAYCOPY3 to "play1"
set INSTALLPLAYCOPY3PART2 to "Play"
set thisprog4 to "if the playinstcopy of the prog" & SOFx & " of " & whichsection & " = INSTALLPLAYCOPY3PART2 then set the member of sprite 41 to member INSTALLPLAYCOPY3"
do(thisprog4)
set the loc of sprite 41 to point(532, 416)
set platformtext to "put the platform of the prog" & SOFx & " of " & whichsection & " into SOFty"
do(platformtext)
set the text of field "platformbox" to SOFty
set sizetext to "put the size of the prog" & SOFx & " of " & whichsection & " into SOFty"
do(sizetext)
set the text of field "sizebox" to SOFty & "MB of Hd space"
set categorytext to "put the category of the prog" & SOFx & " of " & whichsection & " into SOFty"
do(categorytext)
set the text of field "categorybox" to SOFty
set SOFinstallbutton to the name of the member of sprite 41
set SOFinstall to SOFinstallbutton & "black"
set SOFinstalldown to SOFinstallbutton & "down"
set the member of sprite 90 to member "categorybox"
set the loc of sprite 90 to point(20, 35)
set the ink of sprite 90 to 36
set the member of sprite 50 to member "screenshotstag"
set the loc of sprite 50 to point(288, 114)
set the ink of sprite 50 to 8
set the member of sprite 44 to member "platformbox"
set the loc of sprite 44 to point(437, 360)
set the ink of sprite 44 to 36
set the member of sprite 45 to member "sizebox"
set the loc of sprite 45 to point(437, 379)
set the ink of sprite 45 to 36
set the member of sprite 55 to member (SOFtemp & "_title")
set the loc of sprite 55 to point(452, 14)
set the ink of sprite 55 to 8
set SOFpreviewStart to the number of member (SOFtemp & "_prev1")
set SOFpreviewEnd to the number of member (SOFtemp & "_prev_end")
set SOFTotalAmount to SOFpreviewEnd - SOFpreviewStart + 1
if SOFTotalAmount > 0 then
if the number of member (SOFtemp & "_prev1") = -1 then
put 1 into field "TotalAmount"
else
put SOFTotalAmount into field "TotalAmount"
end if
else
put 1 into field "TotalAmount"
end if
put 1 into field "NumberOf"
set CheckFeatured to "if the featured of the prog" & SOFx & " of " & whichsection & " = 1 then SOFPutButsOn"
do(CheckFeatured)
set SOFprevsetup to 2
set the member of sprite 79 to member (whichsection & "_prod")
set the loc of sprite 79 to point(132, 273)
set the ink of sprite 79 to 36
set INSTALLPLAYCOPY1 to "soundsamplesbuttton_Light"
set INSTALLPLAYCOPY1PART2 to EMPTY
set thisprog9 to "if the sound of the prog" & SOFx & " of " & whichsection & " = INSTALLPLAYCOPY1PART2 then set the member of sprite 78 to member INSTALLPLAYCOPY1"
do(thisprog9)
set the loc of sprite 78 to point(286, 218)
set INSTALLPLAYCOPY1 to "videobutton_Light"
set INSTALLPLAYCOPY1PART2 to EMPTY
set thisprog9 to "if the video of the prog" & SOFx & " of " & whichsection & " = INSTALLPLAYCOPY1PART2 then set the member of sprite 77 to member INSTALLPLAYCOPY1"
do(thisprog9)
set the loc of sprite 77 to point(286, 259)
set the member of sprite 76 to member "red_bit_for_vids"
set the loc of sprite 76 to point(285, 230)
set the ink of sprite 76 to 36
2:
set whichonehuh to 2
end case
end
on SOFPutButsOn
set the member of sprite 70 to member "NumberOfPreviews"
set the member of sprite 71 to member "LeftBrowse"
set the member of sprite 72 to member "RightBrowse"
set the member of sprite 73 to member "TotalAmount"
