home *** CD-ROM | disk | FTP | other *** search
- property pFrame1, pFrame2
-
- on getPropertyDescriptionList
- propertyDescriptionList = [#pFrame1: [#comment: "Indicare in qual frame si trova il tasto" & RETURN & "Marker SCHEDA", #format: #boolean, #default: 0], #pFrame2: [#comment: "Marker ARTICOLO", #format: #boolean, #default: 0]]
- return propertyDescriptionList
- end
-
- on mouseUp me
- global gID, gMaxID, gQuadro, gpittore, gElencoOpere, gAccessoScheda, gScheggia
- if gElencoOpere <> 0 then
- if getOne(gElencoOpere, gQuadro) <> 0 then
- tmp = getOne(gElencoOpere, gQuadro)
- if tmp = 1 then
- tmp = count(gElencoOpere)
- else
- tmp = tmp - 1
- end if
- gQuadro = getAt(gElencoOpere, tmp)
- tema = char 1 of gQuadro
- tema = "theme" & tema
- gID = char 3 to 4 of gQuadro
- gID = integer(gID)
- go("scheda", tema)
- end if
- else
- if the doubleClick then
- exit
- end if
- if gID = 2 then
- sprite(50).visible = 0
- end if
- if gID = gMaxID then
- sprite(51).visible = 1
- end if
- gID = gID - 1
- if pFrame1 = 1 then
- preparascheda()
- go("scheda")
- end if
- if pFrame2 = 1 then
- gAccessoScheda = #normale
- go("article")
- end if
- end if
- gScheggia = "off"
- sound stop 1
- if the frame < 20 then
- sprite(43).member = member("TastiOpere5")
- end if
- end
-