GitHub Viewer

REVO5500�LiveCode Docs Editor@������Gfunction libDocumentationOldFormat pData, pFileToDirectory, pLinkLookup --libReplaceLinks rData, pFileToDirectory, pLinkLookup //if offset ("2520", rData) > 0 or offset ("2364", rData) > 0then //breakpoint //end if if offset ("", pData) > 0 then // do the glossary specific stuff else // do the dictionary specific stuff put libUpdateSyntaxExamples(pData) into pData put libUpdateObjects(pData) into pData put libUpdateReferences(pData) into pData put libUpdateClassification(pData) into pData put libUpdateHistory(pData) into pData put libUpdatePlatforms(pData) into pData put libUpdateClasses(pData) into pData put libUpdateSecurity(pData) into pData put libUpdateExampleExamples(pData) into pData put libUpdateParameters(pData) into pData put libUpdateDescription(pData) into pData put libRemoveObsolete(pData) into pData put libUpdateGeneral(pData) into pData end if return pData end libDocumentationOldFormat function libUpdateSyntaxExamples pData // updates the notation local tTextToReplace, tReplaceWith, tTextStart, tTextEnd put libGetTextLocation (pData, "", "", tTextStart, tTextEnd) into tTextToReplace if tTextToReplace is empty then breakpoint else put tTextToReplace into tReplaceWith replace "" with "

" in tReplaceWith replace "" with "

" in tReplaceWith replace "

" with "

" in tReplaceWith replace "

" with "

" in tReplaceWith replace tTextToReplace with tReplaceWith in pData end if return pData end libUpdateSyntaxExamples function libUpdateObjects pData // updates the ... notation local tTextToReplace, tReplaceWith, tTextStart, tTextEnd put libGetTextLocation (pData, "", "", tTextStart, tTextEnd) into tTextToReplace if tTextToReplace is empty then breakpoint else put "--text--" into tReplaceWith if offset ("", tTextToReplace) > 0 then replace "--text--" with "card,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "stack,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "group,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "field,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "button,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "graphic,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "scrollbar,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "player,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "image,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "iosBrowser,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "iosScroller,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "iosPlayer,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "iosTextInput,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "AndroidScroller,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "AndroidBrowser,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "AndroidPlayer,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "androidTextInput,--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--text--" with "androidMultiline,--text--" in tReplaceWith end if replace ",--text--" with "" in tReplaceWith replace "--text--" with "" in tReplaceWith replace tTextToReplace with tReplaceWith in pData end if return pData end libUpdateObjects function libUpdateReferences pData // updates the notation replace "" with "" in pData replace "" with "" in pData return pData end libUpdateReferences function libUpdateClassification pData // updates the notation replace "" with "" in pData replace "" with "" in pData return pData end libUpdateClassification function libUpdateHistory pData // updates the notation replace "" with "" in pData replace "" with "" in pData return pData end libUpdateHistory function libUpdatePlatforms pData // updates the ... notation replace "" with "" in pData replace "" with "" in pData replace "" with "" in pData replace "" with "" in pData replace "" with "" in pData replace "" with "" in pData replace "" with "" in pData return pData end libUpdatePlatforms function libUpdateClasses pData // updates the ... notation local tTextToReplace, tReplaceWith, tTextStart, tTextEnd put libGetTextLocation (pData, "", "", tTextStart, tTextEnd) into tTextToReplace if tTextToReplace is empty then breakpoint else put "--and----text--" into tReplaceWith if offset ("", tTextToReplace) > 0 then replace "--and--" with", " in tReplaceWith replace "--text--" with "--and--Desktop--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--and--" with", " in tReplaceWith replace "--text--" with "--and--Server--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--and--" with", " in tReplaceWith replace "--text--" with "--and--Web--text--" in tReplaceWith end if if offset ("", tTextToReplace) > 0 then replace "--and--" with", " in tReplaceWith replace "--text--" with "--and--Mobile--text--" in tReplaceWith end if replace ", , " with "" in tReplaceWith replace "--and----text--" with "" in tReplaceWith replace "--text--" with "" in tReplaceWith replace ", --and--" with "" in tReplaceWith replace "--and--" with " and " in tReplaceWith replace tTextToReplace with tReplaceWith in pData end if return pData end libUpdateClasses function libUpdateExampleExamples pData // updates the notation local tTextToReplace, tReplaceWith, tTextStart, tTextEnd, tCurrentExampleToReplace, tCurrentExampleToReplaceWith, tDoubleLineSpace, tExampleFound, tFirstExample put true into tFirstExample put true into tExampleFound put libGetTextLocation (pData, "", "", tTextStart, tTextEnd) into tTextToReplace if tTextToReplace is empty then breakpoint else if offset ("

", tTextToReplace) > 0 then put true into tDoubleLineSpace else put false into tDoubleLineSpace end if put tTextToReplace into tReplaceWith repeat while true put libGetTextLocation (tReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentExampleToReplace if tCurrentExampleToReplace is empty then exit repeat end if put tCurrentExampleToReplace into tCurrentExampleToReplaceWith if tDoubleLineSpace is true and tFirstExample is false then replace "" with "

" in tCurrentExampleToReplaceWith else replace "" with "

" in tCurrentExampleToReplaceWith end if replace "" with "

" in tCurrentExampleToReplaceWith replace tCurrentExampleToReplace with tCurrentExampleToReplaceWith in tReplaceWith if tFirstExample is true then put false into tFirstExample end if end repeat replace "" with "" in tReplaceWith replace "" with "" in tReplaceWith replace "

" with "

" in tReplaceWith replace "

" with "

" in tReplaceWith replace tTextToReplace with tReplaceWith in pData end if return pData end libUpdateExampleExamples function libUpdateParametersA pData // updates the // // // // // // // // // // // // local tTextToReplace , tTextToReplaceWith, tCurrentParameterToReplace, tCurrentParameterToReplaceWith, tCurrentParameterNameToReplace, tCurrentParameterNameToReplaceWith local tCurrentParameterDescriptionToReplace, tCurrentParameterDescriptionToReplaceWith, tCurrentParameterOptionsToReplace, tCurrentParameterOptionsToReplaceWith local tCurrentParameterOptionsOptionToReplace, tCurrentParameterOptionsOptionToReplaceWith local tCurrentParameterOptionsOptionItemToReplace, tCurrentParameterOptionsOptionItemToReplaceWith local tCurrentParameterOptionsOptionDescriptionToReplace, tCurrentParameterOptionsOptionDescriptionToReplaceWith local tCurrentParameterOptionsOptionValuesToReplace, tCurrentParameterOptionsOptionValuesToReplaceWith local tCurrentParameterOptionsOptionValuesValueToReplace, tCurrentParameterOptionsOptionValuesValueToReplaceWith local tCurrentParameterOptionsOptionValuesValueNameToReplace, tCurrentParameterOptionsOptionValuesValueNameToReplaceWith local tCurrentParameterOptionsOptionValuesValueDescriptionToReplace, tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith local tTextStart, tTextEnd, tStrip, tOptionsTitle, tOptionsTitleWith put libGetTextLocation (pData, "", "", tTextStart, tTextEnd) into tTextToReplace if the number of lines in tTextToReplace 0 then replace "" with "" in tCurrentParameterOptionsOptionValuesValueToReplaceWith if tCurrentParameterOptionsOptionValuesValueNameToReplace is not empty then put tCurrentParameterOptionsOptionValuesValueNameToReplace into tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "

* " in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "

" in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace tCurrentParameterOptionsOptionValuesValueNameToReplace with tCurrentParameterOptionsOptionValuesValueNameToReplaceWith in tCurrentParameterOptionsOptionValuesValueToReplaceWith end if else if tCurrentParameterOptionsOptionValuesValueNameToReplace is not empty then put tCurrentParameterOptionsOptionValuesValueNameToReplace into tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "

* " in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace tCurrentParameterOptionsOptionValuesValueNameToReplace with tCurrentParameterOptionsOptionValuesValueNameToReplaceWith in tCurrentParameterOptionsOptionValuesValueToReplaceWith end if put libGetTextLocation (tCurrentParameterOptionsOptionValuesValueToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionValuesValueDescriptionToReplace if tCurrentParameterOptionsOptionValuesValueDescriptionToReplace is not empty then put tCurrentParameterOptionsOptionValuesValueDescriptionToReplace into tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith replace "" with " - " in tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith replace "" with "

" in tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith replace tCurrentParameterOptionsOptionValuesValueDescriptionToReplace with tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith in tCurrentParameterOptionsOptionValuesValueToReplaceWith end if end if replace "" with "

" in tCurrentParameterOptionsOptionValuesValueToReplaceWith replace "" with "

" in tCurrentParameterOptionsOptionValuesValueToReplaceWith replace tCurrentParameterOptionsOptionValuesValueToReplace with tCurrentParameterOptionsOptionValuesValueToReplaceWith in tCurrentParameterOptionsOptionValuesToReplaceWith end repeat replace "" with "

" in tCurrentParameterOptionsOptionValuesToReplaceWith replace "" with "

" in tCurrentParameterOptionsOptionValuesToReplaceWith replace tCurrentParameterOptionsOptionValuesToReplace with tCurrentParameterOptionsOptionValuesToReplaceWith in tCurrentParameterOptionsToReplaceWith end if replace "" with "

" in tCurrentParameterOptionsOptionToReplaceWith replace "" with "

" in tCurrentParameterOptionsOptionToReplaceWith replace tCurrentParameterOptionsOptionToReplace with tCurrentParameterOptionsOptionToReplaceWith in tCurrentParameterOptionsToReplaceWith end repeat replace "") and tOptionsTitleWith is not empty then replace "title=" & quote with ("

") in tOptionsTitleWith replace quote & ">" with "

" in tOptionsTitleWith replace tOptionsTitle with tOptionsTitleWith in tCurrentParameterOptionsToReplaceWith else replace tOptionsTitle with "
" in tCurrentParameterOptionsToReplaceWith end if repeat while true put libGetTextLocation (tCurrentParameterOptionsToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionToReplace if tCurrentParameterOptionsOptionToReplace is empty then exit repeat end if put tCurrentParameterOptionsOptionToReplace into tCurrentParameterOptionsOptionToReplaceWith put libGetTextLocation (tCurrentParameterOptionsOptionToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionItemToReplace if tCurrentParameterOptionsOptionItemToReplace is not empty then put tCurrentParameterOptionsOptionItemToReplace into tCurrentParameterOptionsOptionItemToReplaceWith replace "" with "
• " in tCurrentParameterOptionsOptionItemToReplaceWith replace "" with "
" in tCurrentParameterOptionsOptionItemToReplaceWith replace tCurrentParameterOptionsOptionItemToReplace with tCurrentParameterOptionsOptionItemToReplaceWith in tCurrentParameterOptionsOptionToReplaceWith end if put libGetTextLocation (tCurrentParameterOptionsOptionToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionDescriptionToReplace if tCurrentParameterOptionsOptionDescriptionToReplace is not empty then put tCurrentParameterOptionsOptionDescriptionToReplace into tCurrentParameterOptionsOptionDescriptionToReplaceWith replace "" with " - " in tCurrentParameterOptionsOptionDescriptionToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionDescriptionToReplaceWith replace tCurrentParameterOptionsOptionDescriptionToReplace with tCurrentParameterOptionsOptionDescriptionToReplaceWith in tCurrentParameterOptionsOptionToReplaceWith else if offset ("", tCurrentParameterOptionsOptionToReplaceWith) > 0 then replace "" with "" in tCurrentParameterOptionsOptionToReplaceWith end if end if // HANDLE VALUES put libGetTextLocation (tCurrentParameterOptionsOptionToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionValuesToReplace if tCurrentParameterOptionsOptionValuesToReplace is not empty then put tCurrentParameterOptionsOptionValuesToReplace into tCurrentParameterOptionsOptionValuesToReplaceWith repeat while true put libGetTextLocation (tCurrentParameterOptionsOptionValuesToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionValuesValueToReplace if tCurrentParameterOptionsOptionValuesValueToReplace is empty then exit repeat end if put tCurrentParameterOptionsOptionValuesValueToReplace into tCurrentParameterOptionsOptionValuesValueToReplaceWith put libGetTextLocation (tCurrentParameterOptionsOptionValuesValueToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionValuesValueNameToReplace if offset ("", tCurrentParameterOptionsOptionValuesValueToReplaceWith) > 0 then replace "" with "" in tCurrentParameterOptionsOptionValuesValueToReplaceWith if tCurrentParameterOptionsOptionValuesValueNameToReplace is not empty then put tCurrentParameterOptionsOptionValuesValueNameToReplace into tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace tCurrentParameterOptionsOptionValuesValueNameToReplace with tCurrentParameterOptionsOptionValuesValueNameToReplaceWith in tCurrentParameterOptionsOptionValuesValueToReplaceWith end if else if tCurrentParameterOptionsOptionValuesValueNameToReplace is not empty then put tCurrentParameterOptionsOptionValuesValueNameToReplace into tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionValuesValueNameToReplaceWith replace tCurrentParameterOptionsOptionValuesValueNameToReplace with tCurrentParameterOptionsOptionValuesValueNameToReplaceWith in tCurrentParameterOptionsOptionValuesValueToReplaceWith end if put libGetTextLocation (tCurrentParameterOptionsOptionValuesValueToReplaceWith, "", "", tTextStart, tTextEnd) into tCurrentParameterOptionsOptionValuesValueDescriptionToReplace if tCurrentParameterOptionsOptionValuesValueDescriptionToReplace is not empty then put tCurrentParameterOptionsOptionValuesValueDescriptionToReplace into tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith replace "" with " - " in tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith replace "" with "" in tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith replace tCurrentParameterOptionsOptionValuesValueDescriptionToReplace with tCurrentParameterOptionsOptionValuesValueDescriptionToReplaceWith in tCurrentParameterOptionsOptionValuesValueToReplaceWith end if end if replace "" with "
• " in tCurrentParameterOptionsOptionValuesValueToReplaceWith replace "" with "
" in tCurrentParameterOptionsOptionValuesValueToReplaceWith replace tCurrentParameterOptionsOptionValuesValueToReplace with tCurrentParameterOptionsOptionValuesValueToReplaceWith in tCurrentParameterOptionsOptionValuesToReplaceWith end repeat replace "" with "
" in tCurrentParameterOptionsOptionValuesToReplaceWith replace "" with "
" in tCurrentParameterOptionsOptionValuesToReplaceWith replace tCurrentParameterOptionsOptionValuesToReplace with tCurrentParameterOptionsOptionValuesToReplaceWith in tCurrentParameterOptionsToReplaceWith end if replace "" with "" in tCurrentParameterOptionsOptionToReplaceWith replace "" with "
" in tCurrentParameterOptionsOptionToReplaceWith replace tCurrentParameterOptionsOptionToReplace with tCurrentParameterOptionsOptionToReplaceWith in tCurrentParameterOptionsToReplaceWith end repeat replace "