-- This file:
--   http://anggtwu.net/SUBTITLES/2021-workshop-1.lua.html
--   http://anggtwu.net/SUBTITLES/2021-workshop-1.lua
--          (find-angg "SUBTITLES/2021-workshop-1.lua")
-- Author: Eduardo Ochs <eduardoochs@gmail.com>
--
-- (defun st () (interactive) (find-angg "SUBTITLES/2021-workshop-1.lua"))
-- Skel: (find-editeevsubtitles-links-1 "2021workshop1")
--       (find-efunction 'find-editeevsubtitles-links-1)
-- Yttr: (find-yttranscript-links       "2021workshop1" "HuqJFPD871E")
-- Info: (find-1stclassvideo-links      "2021workshop1")
-- Play: (find-2021workshop1video "0:00")
--
-- I use the code below to generate the subtitles in .vtt.
--

ee_dofile "~/LUA/Subtitles.lua" -- (find-angg "LUA/Subtitles.lua")

--[[
-- (find-angg "LUA/Subtitles.lua")

** Run the .lua and tell it to
** write the .vtt - by default in /tmp/
*
* (eepitch-lua51)
* (eepitch-kill)
* (eepitch-lua51)
dofile "2021-workshop-1.lua"
sts = Subtitles.fromsexps(subs_bigstr):addtime("2:26")
-- sts.lang = "pt-BR"
= sts
outfname = "$S/http/anggtwu.net/eev-videos/2021-workshop-1.vtt"
outfname =                           "/tmp/2021-workshop-1.vtt"
out = sts:vtt().."\n\n"
ee_writefile(outfname, out)
-- (find-fline                       "/tmp/2021-workshop-1.vtt")

** Test the .vtt
** (find-2021workshop1video "0:00")

** Select /tmp/ or ee-eevvideosdir
** (find-eevvideosfile "")
** (find-eevvideosfile ""   "2021-workshop-1.mp4")
** (find-eevvideossh0 "cp -v 2021-workshop-1.mp4 /tmp/")
** (code-video "2021workshop1video"                           "/tmp/2021-workshop-1.mp4")
** (code-video "2021workshop1video" "$S/http/anggtwu.net/eev-videos/2021-workshop-1.mp4")
** (find-2021workshop1video "0:00")

** Upload the 2021-workshop-1.vtt
** to http://anggtwu.net/eev-videos/
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
cd /tmp/
Scp-np 2021-workshop-1.vtt $TWUP/eev-videos/
Scp-np 2021-workshop-1.vtt $TWUS/eev-videos/

** Upload the subtitles to youtube
** http://www.youtube.com/watch?v=HuqJFPD871E

** Check that the "psne subtitles" thing works
** (find-1stclassvideo-links "2021workshop1")

--]]


subs_bigstr = [==[

  See: (find-saving-links-intro "5. The base cases 1 and 2")

% (find-2021workshop1video "00:00" "Hi! My name is Eduardo Ochs and this is")
% (find-2021workshop1video "00:02" "one of the very short videos that I'm")
% (find-2021workshop1video "00:04" "preparing for a workshop that I'm going")
% (find-2021workshop1video "00:06" "to give on this saturday...")
% (find-2021workshop1video "00:09" "you can find more details here...")
% (find-2021workshop1video "00:12" "and the title of this video is")
% (find-2021workshop1video "00:14" "\"The base cases 1 and 2\".")

% (find-2021workshop1video "00:16" "Let me show what are")
% (find-2021workshop1video "00:18" "the base cases 1 and 2.")
% (find-2021workshop1video "00:22" "The base case 1 is described here.")
% (find-2021workshop1video "00:24" "Suppose that we realize that this buffer,")
% (find-2021workshop1video "00:28" "this one, with this intro,")
% (find-2021workshop1video "00:31" "(find-eev-exercises-intro), is something")
% (find-2021workshop1video "00:33" "interesting, and we want to save a link")
% (find-2021workshop1video "00:35" "to this buffer to our notes.")
% (find-2021workshop1video "00:39" "The link is going to point to this")
% (find-2021workshop1video "00:41" "buffer, so this buffer is going to be")
% (find-2021workshop1video "00:43" "the target of that link...")
% (find-2021workshop1video "00:44" "so i'm going to refer to this buffer")
% (find-2021workshop1video "00:46" "here as the \"target buffer\".")
% (find-2021workshop1video "00:52" "The instructions are here, but I'm going")
% (find-2021workshop1video "00:54" "to perform them very quickly.")
% (find-2021workshop1video "00:57" "So I just need to do a `M-h M-3'")
% (find-2021workshop1video "00:59" "to create this window configuration...")
% (find-2021workshop1video "01:02" "the link that I want is this one...")
% (find-2021workshop1video "01:04" "I copy it to the kill ring with `M-w'...")
% (find-2021workshop1video "01:07" "then I go to my notes, and paste it into")
% (find-2021workshop1video "01:10" "my notes, and that's it. This is the link")
% (find-2021workshop1video "01:12" "that I want, that points to this buffer")
% (find-2021workshop1video "01:14" "here.")

% (find-2021workshop1video "01:16" "And now I can type `M-h M-1' to go")
% (find-2021workshop1video "01:18" "back to the previous window")
% (find-2021workshop1video "01:19" "configuration.")
% (find-2021workshop1video "01:21" "So this is the base case 1")

% (find-2021workshop1video "01:24" "The base case 2 is similar, but in it")
% (find-2021workshop1video "01:28" "I want a link that points to this")
% (find-2021workshop1video "01:30" "section...")
% (find-2021workshop1video "01:31" "so it's going to point to this buffer")
% (find-2021workshop1video "01:33" "and it's going to search for this")
% (find-2021workshop1video "01:36" "string here in this buffer.")
% (find-2021workshop1video "01:40" "What I need to do is slightly more")
% (find-2021workshop1video "01:42" "complex. First I need to save")
% (find-2021workshop1video "01:44" "this string in the kill ring")
% (find-2021workshop1video "01:48" "with `M-w', then i'm going to do")
% (find-2021workshop1video "01:51" "`M-h M-3'...")
% (find-2021workshop1video "01:55" "this is not yet the link that I want,")
% (find-2021workshop1video "01:57" "I need to refine it... so I do this...")
% (find-2021workshop1video "02:00" "now this is the link that I want, I")
% (find-2021workshop1video "02:02" "copy it to the kill ring, I copy it to")
% (find-2021workshop1video "02:04" "my notes, and this is the link that")
% (find-2021workshop1video "02:07" "points to this section here.")
% (find-2021workshop1video "02:10" "If I type `M-h M-1' I go back")
% (find-2021workshop1video "02:13" "to the this previous configuration")
% (find-2021workshop1video "02:15" "here - this window configuration...")
% (find-2021workshop1video "02:17" "and if I go back to my notes")
% (find-2021workshop1video "02:19" "and execute this it points")
% (find-2021workshop1video "02:22" "exactly to this section.")
% (find-2021workshop1video "02:25" "And that's it!")
]==]

unrevised_bigstr = [==[

(find-2021workshop1video "00:00" " ")
]==]

-- Local Variables:
-- coding:  utf-8-unix
-- End: