;;; bundle--qda.el --- Data and functions for qualitative data analysis

(defvar mk--qda/interview-questions
  ;; A list of user interview questions.
  '((general
     ((en "What does your typical weekday look like?")
      (de "Wie sieht Ihr typischer Arbeitstag aus?"))
     ((en "Tell me about your role at your company?")
      (de "Erzählen Sie mir etwas über Ihre Rolle in Ihrem Unternehmen?")))
    (task
     ((en "What’s the hardest part about [problem / task]?")
      (de "Was ist das Schwierigste an [Problem/Aufgabe]?"))
     ((en "How do you currently go about [problem / task]?")
      (de "Wie gehen Sie derzeit [Problem/Aufgabe] an?"))
     ((en "What is the biggest pain point related to [problem / task]?")
      (de "Was ist der größte Schmerzpunkt im Zusammenhang mit [Problem/Aufgabe]?")))
    (demographic
     ((en "What is the highest degree or level of education you have completed?")
      (de "Welches ist der höchste Abschluss, den Sie erworben haben?"))
     ((en "")))
    (standard
     ((en "")
      (de "")
      (fr "")
      (it "")))))

(defvar mk--qda/explain-codes
  ;; Describe codes used for thematic analysis.
  '((glossary ())
    (job (Users task))
    (activity (Someone is acting))
    (gain (Outcome that users want to achieve))
    (pain (Undesired Outcome))
    (tool (A special kind of hard- or software which supports users activity))))

(defvar mk--qda/sus-questions
  '(((en "I think that I would like to use this system frequently.")
     (de "Ich denke, dass ich dieses System häufig nutzen möchte."))
    ((en "I found the system unnecessarily complex.")
     (de "Ich fand das System unnötig komplex."))
    ((en "I thought the system was easy to use.")
     (de "Ich fand das System einfach zu bedienen."))
    ((en "I think that I would need the support of a technical person to be able to use this system.")
     (de "Ich glaube, ich bräuchte die Unterstützung einer technischen Person, um dieses System nutzen zu können."))
    ((en "I found the various functions in this system were well integrated.")
     (de "Ich fand, dass die verschiedenen Funktionen in diesem System gut integriert waren."))
    ((en "I thought there was too much inconsistency in this system.")
     (de "Ich fand, dass dieses System zu widersprüchlich war."))
    ((en "I would imagine that most people would learn to use this system very quickly.")
     (de "Ich könnte mir vorstellen, dass die meisten Menschen sehr schnell lernen würden, mit diesem System umzugehen."))
    ((en "I found the system very cumbersome to use.")
     (de "Ich fand das System sehr umständlich zu bedienen."))
    ((en "I felt very confident using the system.")
     (de "Ich fühlte mich sehr sicher im Umgang mit dem System."))
    ((en "I needed to learn a lot of things before I could get going with this system.")
     (de "Ich musste eine Menge Dinge lernen, bevor ich mit diesem System loslegen konnte."))))

(use-package subed
  :config
  ;; Disable automatic movement of point by default
  (add-hook 'subed-mode-hook 'subed-disable-sync-point-to-player)
  ;; Remember cursor position between sessions
  (add-hook 'subed-mode-hook 'save-place-local-mode)
  ;; Break lines automatically while typing
  (add-hook 'subed-mode-hook 'turn-on-auto-fill)
  ;; Break lines at 40 characters
  (add-hook 'subed-mode-hook (lambda () (setq-local fill-column 40)))
  (when (eq system-type 'windows-nt)
    (when (directory-name-p "c:/msys64/")
      (setq subed-mpv-executable "c:/msys64/mingw64/bin/mpv.exe"))))