Skip to content

Instantly share code, notes, and snippets.

View Fresheyeball's full-sized avatar

Isaac Shapira Fresheyeball

View GitHub Profile
Fresheyeball / Shpa.hs
Last active August 26, 2020 15:55 — forked from abradley2/Shpa.hs
Being silly with Shpadoinkle
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE OverloadedStrings #-}
module Main where
import Data.Text
import Shpadoinkle as S
import Shpadoinkle.Backend.ParDiff
var point, pointStartX, pointStartY, deltaX, deltaY, isHorizontal;
var scroller = new iScroll('scrollerId', {
vScroll: false,
vScrollbar: false,
hScrollbar: false,
snap: 'li',
momentum: false,
onBeforeScrollStart: function(e) {
point = e.touches[0];
pointStartX = point.pageX;