// Video Player

function shortcode_video($atts, $content = null) {

    extract(shortcode_atts(array(
        'file' => '',
        'image' => '',
        'width' => '560',
        'height' => '349',
        'color' => 'black'
    ), $atts));

    $video_url = $file;

    // Check for video format
    $vimeo = strpos($video_url, "vimeo");
    $youtube = strpos($video_url, "youtube");
    $flv = strpos($video_url, ".flv");

    $output = '<div class="video-wrap">';

    // Display video
    if ($vimeo !== false) {
        $video_id = str_replace(array('http://vimeo.com/', 'https://vimeo.com/', 'http://www.vimeo.com/', 'https://www.vimeo.com/'), '', $video_url);
        $output .= '<iframe src="https://player.vimeo.com/video/' . esc_attr($video_id) . '?title=0&amp;byline=0&amp;portrait=0" width="' . esc_attr($width) . '" height="' . esc_attr($height) . '" frameborder="0"></iframe>';

    } elseif ($youtube !== false) {
        $video_id = str_replace(array('http://youtube.com/watch?v=', 'https://youtube.com/watch?v=', 'http://www.youtube.com/watch?v=', 'https://www.youtube.com/watch?v='), '', $video_url);
        $video_id = str_replace('&feature=channel', '', $video_id);
        $output .= '<iframe title="YouTube video player" class="youtube-player" type="text/html" width="' . esc_attr($width) . '" height="' . esc_attr($height) . '" src="https://www.youtube.com/embed/' . esc_attr($video_id) . '" frameborder="0"></iframe>';

    } elseif ($flv !== false) {
        if (function_exists('mytheme_video')) {
            $output .= mytheme_video($video_url, $image, $width, $height, $color);
        }
    } else {
        _e("You entered a video URL that isn't compatible with this shortcode.", "theme1798");
    }

    $output .= '</div><!-- .video-wrap (end) -->';

    return $output;
}

add_shortcode('video', 'shortcode_video');BEGIN:VCALENDAR
VERSION:2.0
PRODID:-//Gessford Machine - ECPv6.18.2//NONSGML v1.0//EN
CALSCALE:GREGORIAN
METHOD:PUBLISH
X-WR-CALNAME:Gessford Machine
X-ORIGINAL-URL:https://www.gessford.com
X-WR-CALDESC:Events for Gessford Machine
REFRESH-INTERVAL;VALUE=DURATION:PT1H
X-Robots-Tag:noindex
X-PUBLISHED-TTL:PT1H
BEGIN:VTIMEZONE
TZID:America/North_Dakota/Center
BEGIN:DAYLIGHT
TZOFFSETFROM:-0600
TZOFFSETTO:-0500
TZNAME:CDT
DTSTART:20150308T080000
END:DAYLIGHT
BEGIN:STANDARD
TZOFFSETFROM:-0500
TZOFFSETTO:-0600
TZNAME:CST
DTSTART:20151101T070000
END:STANDARD
BEGIN:DAYLIGHT
TZOFFSETFROM:-0600
TZOFFSETTO:-0500
TZNAME:CDT
DTSTART:20160313T080000
END:DAYLIGHT
BEGIN:STANDARD
TZOFFSETFROM:-0500
TZOFFSETTO:-0600
TZNAME:CST
DTSTART:20161106T070000
END:STANDARD
BEGIN:DAYLIGHT
TZOFFSETFROM:-0600
TZOFFSETTO:-0500
TZNAME:CDT
DTSTART:20170312T080000
END:DAYLIGHT
BEGIN:STANDARD
TZOFFSETFROM:-0500
TZOFFSETTO:-0600
TZNAME:CST
DTSTART:20171105T070000
END:STANDARD
BEGIN:DAYLIGHT
TZOFFSETFROM:-0600
TZOFFSETTO:-0500
TZNAME:CDT
DTSTART:20180311T080000
END:DAYLIGHT
BEGIN:STANDARD
TZOFFSETFROM:-0500
TZOFFSETTO:-0600
TZNAME:CST
DTSTART:20181104T070000
END:STANDARD
END:VTIMEZONE
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20170422T080000
DTEND;TZID=America/North_Dakota/Center:20170422T140000
DTSTAMP:20161031T132601Z
CREATED:20161031T132601Z
LAST-MODIFIED:20161031T132601Z
UID:2948-1492848000-1492869600@www.gessford.com
SUMMARY:Power Drive 2017
DESCRIPTION:Tentative RSVP as of 8/9/2016 from George
URL:https://www.gessford.com/event/power-drive-2017/
END:VEVENT
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20170409T100000
DTEND;TZID=America/North_Dakota/Center:20170409T160000
DTSTAMP:20161028T215053Z
CREATED:20161028T211505Z
LAST-MODIFIED:20161028T215053Z
UID:2941-1491732000-1491753600@www.gessford.com
SUMMARY:NISE 2017
DESCRIPTION:Nebraska Import Street Enthusists.
URL:https://www.gessford.com/event/nise-2017/
LOCATION:MPH\, 427 South Showboat Blvd.\, Hastings\, NE\, 68901\, United States
ORGANIZER;CN="George":MAILTO:ganderson68901@gmail.com
END:VEVENT
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20161231T140000
DTEND;TZID=America/North_Dakota/Center:20161231T180000
DTSTAMP:20161027T142946Z
CREATED:20161027T142928Z
LAST-MODIFIED:20161027T142946Z
UID:2925-1483192800-1483207200@www.gessford.com
SUMMARY:Private GR Club
DESCRIPTION:George  & Josie
URL:https://www.gessford.com/event/private-gr-club-2/
END:VEVENT
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20161225T100000
DTEND;TZID=America/North_Dakota/Center:20161225T150000
DTSTAMP:20161026T153533Z
CREATED:20161026T153533Z
LAST-MODIFIED:20161026T153533Z
UID:2869-1482660000-1482678000@www.gessford.com
SUMMARY:Private GR C
DESCRIPTION:Judy & Tom
URL:https://www.gessford.com/event/private-gr-c-2/
END:VEVENT
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20161223T170000
DTEND;TZID=America/North_Dakota/Center:20161223T200000
DTSTAMP:20161027T142124Z
CREATED:20161026T153615Z
LAST-MODIFIED:20161027T142124Z
UID:2871-1482512400-1482523200@www.gessford.com
SUMMARY:Private GR C
DESCRIPTION:George & Josie
URL:https://www.gessford.com/event/private-gr-c-3/
END:VEVENT
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20161216T180000
DTEND;TZID=America/North_Dakota/Center:20161216T220000
DTSTAMP:20161027T142642Z
CREATED:20161027T142642Z
LAST-MODIFIED:20161027T142642Z
UID:2923-1481911200-1481925600@www.gessford.com
SUMMARY:Private GR Club
DESCRIPTION:Dec 16th Friday Night Josie\n  \n  \n  \n  \n  \n  \n  \n  \n  \n 
URL:https://www.gessford.com/event/private-gr-club/
END:VEVENT
BEGIN:VEVENT
DTSTART;TZID=America/North_Dakota/Center:20161202T160000
DTEND;TZID=America/North_Dakota/Center:20161202T200000
DTSTAMP:20161026T151428Z
CREATED:20161026T151428Z
LAST-MODIFIED:20161026T151428Z
UID:2867-1480694400-1480708800@www.gessford.com
SUMMARY:Private GR C
DESCRIPTION:Jake & Sarah Dec 2nd
URL:https://www.gessford.com/event/private-gr-c/
END:VEVENT
END:VCALENDAR