REVO2700Swipe2@@# the event id and initial swipe time and position local sTouchId, sInitTime, sInitX # maximum swipe time in millisecs local sSwipeTime # minimum swipe distance local sSwipeDistance on openStack # set up swipe values - experiment with these for required effect put 500 into sSwipeTime put 150 into sSwipeDistance end openStack on touchMove pId, pX, pY if pId <> sTouchId then # record initial values for start of swipe put pId into sTouchId put the millisecs into sInitTime put pX into sInitX end if # check the action was fast enough for a swipe if the millisecs - sInitTime <= sSwipeTime then # check we have covered enough distance put pX - sInitX into tDistanceX if abs(tDistanceX) > sSwipeDistance then if tDistanceX < 0 then # finger is swiping left send "swipeLeft" to me in 0 millisecs else # finger is swiping right send "swipeRight" to me in 0 millisecs end if end if end if end touchMove command swipeLeft visual effect scroll left normal go prev card end swipeLeft command swipeRight visual effect scroll right normal go next card end swipeRight DR[Swipe WLucida Grande W HelveticaW Helvetica ULucida Grande WLucida Grande ULucida GrandecRevStandaloneSettings. ios,profile$A4BB75D9-9185-4C4D-9A64-0F2BFD6CFE75scriptLibrariesInternet Geometry PrintingMacOSXfalse OSX,nameSwipeUNIX,fileSelectortrueWindowsfalseWindows,LegalCopyright#2011 All rights reserved worldwideUNIX,pageSetuptrueios,bundle idcom.splash21.swipeOSX,documentTypeios,interface orientationsPortraitUpsideDown,Portrait,Linuxfalseiostrueios,status bar hiddentrueWebfalse inclusionssearchWindows,documenticonFilej/Applications/LiveCode 4.5.2.app/Contents/Tools/Runtime/Windows/x86-32/Support/Sample Icons/genericdoc.ico answerDialogtrueOSX,documentExtensionWindows,FileDescriptionSwipe 1.0.0.0 for WindowsOSX,longVersion Swipe 1.0.0.0UNIX,printerChoosertrueOSX,copyright#2011 All rights reserved worldwideOSX,identifier com..swipenameSwipeOSX,shortVersion1.0.0.0Windows,fileversion11Windows,fileversion20Windows,productversion11Windows,fileversion30Windows,productversion20Windows,fileversion40Windows,productversion30cursorsfalse errorDialogfalseWindows,productversion40 OSX,infoSwipe Version 1.0.0.0MacOSX PowerPC-32false askDialogtrueWindows,iconFilej/Applications/LiveCode 4.5.2.app/Contents/Tools/Runtime/Windows/x86-32/Support/Sample Icons/genericapp.icoOSX,signature????Windows,ProductNameSwipedefaultBuildFolder/Users/splash21/DesktopUNIX,colorChoosertrueMacOSX x86-32falseWindows,companynamecREVGeometryCachestackID1013 cREVGeneralscripteditorvscroll182breakpointconditions breakpointsbreakpointstatesstackfileversion2.7card1 @@\cREVGeometryCacheIDs12939737908521010129397280817910071293972878282100812939726724091003cREVGeometrycacheorder total4card2 @@ZcREVGeometryCacheIDs129397280817910071293972878282100812939727734771005cREVGeometrycacheorder total3Round RectangleKAffbT cREVGeneral revUniqueID 1293972672409Round RectangleKAbR cREVGeneral revUniqueID 1293972773477infoi> cREVGeneral revUniqueID 1293972878282  Label Field  1 cREVTable currentviewSwipe left or right cREVGeneral revUniqueID 1293972808179 Swipe left or right debug: cREVGeneral revUniqueID 1293974862452 Label: revOnline | RunRev