from pptx import Presentation
from pptx.util import Inches, Pt, Emu
from pptx.dml.color import RGBColor
from pptx.enum.text import PP_ALIGN, MSO_ANCHOR
from pptx.util import Inches, Pt
from io import BytesIO

# ── Colour palette (Mental Health Nursing – calm blues/teals) ──────────────
DARK_NAVY   = RGBColor(0x0A, 0x29, 0x4B)   # slide header bar
TEAL        = RGBColor(0x00, 0x7A, 0x87)   # accent / bullet markers
LIGHT_BG    = RGBColor(0xF0, 0xF7, 0xFA)   # slide background
WHITE       = RGBColor(0xFF, 0xFF, 0xFF)
DARK_TEXT   = RGBColor(0x1A, 0x1A, 0x2E)
GOLD        = RGBColor(0xD4, 0xAF, 0x37)   # source tag
LIGHT_TEAL  = RGBColor(0xCC, 0xEB, 0xEF)   # sub-header box

W = Inches(13.333)
H = Inches(7.5)

prs = Presentation()
prs.slide_width  = W
prs.slide_height = H
blank = prs.slide_layouts[6]   # fully blank

# ── Helpers ────────────────────────────────────────────────────────────────

def add_rect(slide, x, y, w, h, fill_rgb, transparency=0):
    shape = slide.shapes.add_shape(1, x, y, w, h)   # MSO_SHAPE_TYPE.RECTANGLE = 1
    shape.fill.solid()
    shape.fill.fore_color.rgb = fill_rgb
    shape.line.fill.background()
    return shape

def add_textbox(slide, text, x, y, w, h, size, bold=False, color=DARK_TEXT,
                align=PP_ALIGN.LEFT, italic=False, wrap=True):
    tb = slide.shapes.add_textbox(x, y, w, h)
    tf = tb.text_frame
    tf.word_wrap = wrap
    tf.margin_left  = Inches(0.05)
    tf.margin_right = Inches(0.05)
    tf.margin_top   = Pt(2)
    tf.margin_bottom= Pt(2)
    p = tf.paragraphs[0]
    p.alignment = align
    r = p.add_run()
    r.text = text
    r.font.size  = Pt(size)
    r.font.bold  = bold
    r.font.italic= italic
    r.font.color.rgb = color
    r.font.name  = "Calibri"
    return tb

def add_multiline_tb(slide, lines, x, y, w, h, size, color=DARK_TEXT,
                     bold=False, bullet=False, line_spacing_pt=None):
    """lines: list of str.  bullet=True prepends '  •  '"""
    tb = slide.shapes.add_textbox(x, y, w, h)
    tf = tb.text_frame
    tf.word_wrap = True
    tf.margin_left   = Inches(0.08)
    tf.margin_right  = Inches(0.05)
    tf.margin_top    = Pt(2)
    tf.margin_bottom = Pt(2)
    for i, line in enumerate(lines):
        p = tf.paragraphs[0] if i == 0 else tf.add_paragraph()
        if line_spacing_pt:
            from pptx.oxml.ns import qn
            from lxml import etree
            pPr = p._pPr
            if pPr is None:
                pPr = p._p.get_or_add_pPr()
            lnSpc = etree.SubElement(pPr, qn('a:lnSpc'))
            spcPts = etree.SubElement(lnSpc, qn('a:spcPts'))
            spcPts.set('val', str(int(line_spacing_pt * 100)))
        r = p.add_run()
        prefix = "  \u2022  " if bullet else ""
        r.text = prefix + line
        r.font.size  = Pt(size)
        r.font.bold  = bold
        r.font.color.rgb = color
        r.font.name  = "Calibri"
    return tb

def slide_bg(slide):
    add_rect(slide, 0, 0, W, H, LIGHT_BG)

def header_bar(slide, title, subtitle=None):
    add_rect(slide, 0, 0, W, Inches(1.3), DARK_NAVY)
    add_textbox(slide, title, Inches(0.4), Inches(0.1), Inches(11.5), Inches(0.75),
                size=28, bold=True, color=WHITE)
    if subtitle:
        add_textbox(slide, subtitle, Inches(0.4), Inches(0.85), Inches(11.5), Inches(0.4),
                    size=14, bold=False, color=LIGHT_TEAL)

def source_tag(slide, source_text):
    add_textbox(slide, source_text, Inches(0.3), Inches(7.05), Inches(12.5), Inches(0.35),
                size=9, italic=True, color=GOLD, align=PP_ALIGN.LEFT)

def section_divider(slide, section_title, sub=""):
    """Full-slide section divider."""
    add_rect(slide, 0, 0, W, H, DARK_NAVY)
    # decorative teal band
    add_rect(slide, 0, Inches(3.0), W, Inches(1.5), TEAL)
    add_textbox(slide, section_title, Inches(1), Inches(3.1), Inches(11), Inches(1.1),
                size=40, bold=True, color=WHITE, align=PP_ALIGN.CENTER)
    if sub:
        add_textbox(slide, sub, Inches(1), Inches(4.3), Inches(11), Inches(0.6),
                    size=18, color=LIGHT_TEAL, align=PP_ALIGN.CENTER)
    add_textbox(slide, "Mental Health Nursing | 6th Semester B.Sc Nursing",
                Inches(0.5), Inches(6.8), Inches(12), Inches(0.5),
                size=12, color=GOLD, align=PP_ALIGN.CENTER, italic=True)

def box(slide, text, x, y, w, h, fill=TEAL, text_size=13, text_color=WHITE, bold=False):
    add_rect(slide, x, y, w, h, fill)
    add_textbox(slide, text, x, y, w, h, size=text_size, color=text_color,
                bold=bold, align=PP_ALIGN.CENTER)

# ══════════════════════════════════════════════════════════════════════
# SLIDE 1 – TITLE
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
add_rect(s, 0, 0, W, H, DARK_NAVY)
add_rect(s, 0, Inches(2.5), W, Inches(2.8), TEAL)
add_textbox(s, "INTELLIGENCE TEST", Inches(0.5), Inches(2.65), Inches(12), Inches(1.2),
            size=52, bold=True, color=WHITE, align=PP_ALIGN.CENTER)
add_textbox(s, "A Comprehensive Overview", Inches(0.5), Inches(3.85), Inches(12), Inches(0.6),
            size=20, color=LIGHT_TEAL, align=PP_ALIGN.CENTER, italic=True)
add_textbox(s, "Presented to: HODs & Tutors – Mental Health Nursing Department",
            Inches(0.5), Inches(5.1), Inches(12), Inches(0.45),
            size=15, color=GOLD, align=PP_ALIGN.CENTER)
add_textbox(s, "6th Semester | B.Sc Nursing",
            Inches(0.5), Inches(5.6), Inches(12), Inches(0.4),
            size=14, color=WHITE, align=PP_ALIGN.CENTER)

# ══════════════════════════════════════════════════════════════════════
# SLIDE 2 – OUTLINE
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Outline")
topics = [
    "1.  Introduction",
    "2.  Definition of Intelligence",
    "3.  Uses of Intelligence Tests",
    "4.  Characteristics of Intelligence Tests",
    "5.  Types – According to Administration",
    "      Individual Tests (Wechsler & Stanford-Binet)",
    "      Group Tests (Verbal & Non-verbal)",
    "6.  Types – According to Nature",
    "      Verbal Tests  |  Non-verbal Tests",
    "7.  Types – According to Specific Ability",
    "8.  Conclusion",
]
add_multiline_tb(s, topics, Inches(0.6), Inches(1.5), Inches(12), Inches(5.5),
                 size=16, color=DARK_TEXT, line_spacing_pt=22)
source_tag(s, "Park's Textbook of Preventive & Social Medicine, 26th ed. (K. Park) | "
              "Adams & Victor's Principles of Neurology, 12th ed. | "
              "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE 3 – INTRODUCTION
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Introduction")
pts = [
    "Intelligence is one of the most studied yet complex constructs in psychology.",
    "It lies at the intersection of neuroscience, education, and clinical practice.",
    "Alfred Binet & Théodore Simon (1905) developed the first standardized intelligence test – "
    "originally to identify children needing special education.",
    "The term Intelligence Quotient (IQ) was coined by German psychologist Stern and "
    "popularised by Terman (1916).",
    "Intelligence testing is now central to psychoeducational, neuropsychological, "
    "and mental health assessments.",
    "In nursing, understanding intelligence tests helps assess cognitive functioning in "
    "psychiatric and developmental disorders.",
]
add_multiline_tb(s, pts, Inches(0.5), Inches(1.4), Inches(12.3), Inches(5.6),
                 size=15, bullet=True, color=DARK_TEXT, line_spacing_pt=24)
source_tag(s, "Adams & Victor's Principles of Neurology, 12th ed., p. 448 | "
              "Park's Textbook, p. 776")

# ══════════════════════════════════════════════════════════════════════
# SLIDE 4 – DEFINITION
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Definition of Intelligence")
# Wechsler quote box
add_rect(s, Inches(0.4), Inches(1.45), Inches(12.5), Inches(1.15), TEAL)
add_textbox(s, '"The aggregate or global capacity of an individual to act purposefully, '
               'to think rationally, and to deal effectively with his environment."',
            Inches(0.5), Inches(1.5), Inches(12.2), Inches(1.0),
            size=15, italic=True, color=WHITE, align=PP_ALIGN.CENTER)
add_textbox(s, "– David Wechsler",
            Inches(0.5), Inches(2.65), Inches(12.2), Inches(0.35),
            size=13, italic=True, color=TEAL, align=PP_ALIGN.RIGHT)
pts2 = [
    "Park (2023): 'The widely accepted definition is that intelligence is the ability to see "
    "meaningful relationships between things. It includes perceiving, knowing, reasoning, "
    "and remembering.'",
    "Kaplan & Sadock (2022): A commonsense definition includes (a) ability to learn from and "
    "adapt to the environment, and (b) ability to think abstractly and recognise patterns.",
    "Terman: 'The capacity to use abstract ideas for solving problems.'",
    "Intelligence is global – characterises behaviour as a whole; it is an aggregate of "
    "independent and qualitatively distinguishable cognitive abilities.",
    "Results from an interplay between hereditary and environmental factors "
    "(Park's Textbook, p. 776).",
]
add_multiline_tb(s, pts2, Inches(0.5), Inches(3.1), Inches(12.3), Inches(4.0),
                 size=13.5, bullet=True, color=DARK_TEXT, line_spacing_pt=22)
source_tag(s, "Park's Textbook, p. 776 | Adams & Victor's Neurology, 12th ed., p. 447 | "
              "Kaplan & Sadock's Comprehensive Textbook, 11th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE 5 – USES OF INTELLIGENCE TESTS
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Uses of Intelligence Tests")
uses = [
    ("1", "Special Education", "Children with low IQ are identified for tailored special education."),
    ("2", "Gifted Identification", "Children with very high IQ are selected for advanced education."),
    ("3", "School Readiness", "Determines the appropriate age to start formal schooling."),
    ("4", "Academic Guidance", "Helps maintain pupil–work adjustment; used in educational counselling."),
    ("5", "College & Professional Admission", "Screening of applicants for college and professional programmes."),
    ("6", "Clinical / Therapeutic Use", "Assists therapists in planning interventions in psychiatric and developmental disorders."),
    ("7", "Neuropsychological Assessment", "Identifies cognitive dysfunction in brain injuries, dementia, and psychiatric illness."),
    ("8", "Occupational Selection", "Used in military, civil services, and corporate selection processes."),
]
y_start = Inches(1.45)
row_h   = Inches(0.66)
for num, title, desc in uses:
    add_rect(s, Inches(0.35), y_start, Inches(0.55), row_h - Inches(0.06), TEAL)
    add_textbox(s, num, Inches(0.35), y_start, Inches(0.55), row_h - Inches(0.06),
                size=15, bold=True, color=WHITE, align=PP_ALIGN.CENTER)
    add_textbox(s, f"{title}: {desc}",
                Inches(1.0), y_start + Inches(0.05), Inches(11.8), row_h - Inches(0.15),
                size=13.5, color=DARK_TEXT)
    y_start += row_h
source_tag(s, "Park's Textbook of Preventive & Social Medicine, 26th ed., p. 777 | "
              "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE 6 – CHARACTERISTICS
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Characteristics of a Good Intelligence Test")
chars = [
    ("Standardisation", "Uniform administration, scoring, and interpretation procedures with established norms."),
    ("Reliability", "Consistency of results on repeated testing; IQ scores are relatively stable from age 5–7 onwards."),
    ("Validity", "The test actually measures intelligence and predicts scholastic/occupational success."),
    ("Objectivity", "Scoring is independent of the examiner's personal judgment."),
    ("Comprehensiveness", "Samples multiple cognitive abilities – verbal, non-verbal, spatial, memory."),
    ("Discrimination", "Ability to differentiate varying levels of intelligence across the population."),
    ("Economy", "Practical in terms of time, cost, and ease of administration."),
    ("Utility", "Results must be useful for educational, clinical, or occupational decisions."),
]
col1_x = Inches(0.35)
col2_x = Inches(6.8)
cw = Inches(6.1)
rh = Inches(0.72)
y0 = Inches(1.45)
for i, (title, desc) in enumerate(chars):
    if i < 4:
        xp = col1_x; yp = y0 + i * rh
    else:
        xp = col2_x; yp = y0 + (i - 4) * rh
    add_rect(s, xp, yp, cw, rh - Inches(0.06), LIGHT_TEAL)
    add_textbox(s, title, xp + Inches(0.08), yp + Inches(0.02),
                cw - Inches(0.1), Inches(0.28), size=13, bold=True, color=TEAL)
    add_textbox(s, desc, xp + Inches(0.08), yp + Inches(0.28),
                cw - Inches(0.1), Inches(0.36), size=11.5, color=DARK_TEXT)
source_tag(s, "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed. | "
              "Park's Textbook, 26th ed.")

# ══════════════════════════════════════════════════════════════════════
# SECTION DIVIDER – TYPES
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
section_divider(s, "TYPES OF INTELLIGENCE TESTS",
                "According to Administration | Nature | Specific Ability")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – ADMINISTRATION OVERVIEW
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Types: According to Administration")
# Three boxes
bw = Inches(3.8); bh = Inches(1.5)
add_rect(s, Inches(0.35), Inches(1.5), bw, bh, DARK_NAVY)
add_textbox(s, "INDIVIDUAL TESTS", Inches(0.35), Inches(1.5), bw, Inches(0.6),
            size=16, bold=True, color=GOLD, align=PP_ALIGN.CENTER)
add_textbox(s, "Administered one-to-one\nby a trained examiner.\nBetter for clinical depth.",
            Inches(0.35), Inches(2.1), bw, Inches(0.85), size=13, color=WHITE, align=PP_ALIGN.CENTER)

add_rect(s, Inches(4.75), Inches(1.5), bw, bh, TEAL)
add_textbox(s, "GROUP TESTS", Inches(4.75), Inches(1.5), bw, Inches(0.6),
            size=16, bold=True, color=WHITE, align=PP_ALIGN.CENTER)
add_textbox(s, "Administered to many subjects\nsimultaneously.\nCost-effective & time-saving.",
            Inches(4.75), Inches(2.1), bw, Inches(0.85), size=13, color=WHITE, align=PP_ALIGN.CENTER)

pts_adm = [
    "Group tests: All subjects start and finish at the same time; intelligence is measured by "
    "the amount of work successfully completed within the given time.",
    "Individual tests: Need not depend on a constant time factor; allow deeper clinical "
    "observation alongside scoring.",
    "Both types serve different purposes – group for large-scale screening; "
    "individual for clinical/guidance settings.",
]
add_multiline_tb(s, pts_adm, Inches(0.35), Inches(3.2), Inches(12.5), Inches(3.8),
                 size=14, bullet=True, color=DARK_TEXT, line_spacing_pt=26)
source_tag(s, "Park's Textbook of Preventive & Social Medicine, 26th ed., p. 776")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – INDIVIDUAL: WECHSLER SCALES
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Individual Tests – Wechsler Intelligence Scales (WAIS / WISC / WPPSI)",
           "David Wechsler (1939)")
add_rect(s, Inches(0.3), Inches(1.4), Inches(12.7), Inches(0.55), TEAL)
add_textbox(s, "Three separate instruments covering the entire lifespan. Mean IQ = 100, SD = 15.",
            Inches(0.4), Inches(1.42), Inches(12.5), Inches(0.5),
            size=13.5, bold=True, color=WHITE)

# Three sub-boxes
sub_boxes = [
    ("A. WPPSI\n(Wechsler Preschool & Primary Scale)",
     "Age: 2 yrs 6 months – 7 yrs 7 months.\nMeasures verbal, performance (non-verbal), "
     "and processing speed domains.\nUsed for young children's early cognitive assessment."),
    ("B. WAIS\n(Wechsler Adult Intelligence Scale)",
     "Age: 16 years and above.\nAssesses 4 index scores:\n"
     "• Verbal Comprehension  • Perceptual Reasoning\n"
     "• Working Memory  • Processing Speed\nIncludes Full-Scale IQ (FSIQ)."),
    ("C. WISC\n(Wechsler Intelligence Scale for Children)",
     "Age: 6 – 16 years.\nSame 4 index structure as WAIS.\n"
     "Gold standard for school-age cognitive assessment and learning disability evaluation."),
]
bw2 = Inches(4.1); bh2 = Inches(3.8); y2 = Inches(2.05)
xs = [Inches(0.3), Inches(4.6), Inches(8.9)]
for i, (title, body) in enumerate(sub_boxes):
    add_rect(s, xs[i], y2, bw2, bh2, LIGHT_TEAL)
    add_textbox(s, title, xs[i] + Inches(0.1), y2 + Inches(0.08),
                bw2 - Inches(0.15), Inches(0.75), size=12.5, bold=True, color=DARK_NAVY)
    add_textbox(s, body, xs[i] + Inches(0.1), y2 + Inches(0.8),
                bw2 - Inches(0.15), bh2 - Inches(0.9), size=12, color=DARK_TEXT, wrap=True)
source_tag(s, "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed., p. 10754 | "
              "Adams & Victor's Neurology, 12th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – INDIVIDUAL: STANFORD-BINET (5 FACTORS)
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Individual Tests – Stanford-Binet Intelligence Scales (SB5)",
           "Terman & Merrill (revised); Current: SB5 – all ages, single instrument")
add_rect(s, Inches(0.3), Inches(1.45), Inches(12.7), Inches(0.5), TEAL)
add_textbox(s, "Covers entire lifespan with one instrument. Mean IQ = 100, SD = 15. "
               "Extended score range – better for gifted or severely impaired individuals.",
            Inches(0.4), Inches(1.47), Inches(12.5), Inches(0.45),
            size=13, bold=True, color=WHITE)

factors = [
    ("1. Fluid Reasoning", "Ability to solve new problems using logic, independent of prior "
     "learning. Includes inductive & deductive reasoning tasks."),
    ("2. Knowledge", "Breadth and depth of knowledge acquired from the environment; "
     "reflects crystallised intelligence."),
    ("3. Quantitative Reasoning", "Ability to solve problems using mathematical concepts "
     "and numerical operations."),
    ("4. Visual-Spatial Processing", "Ability to perceive, analyse, and manipulate visual "
     "patterns, forms, and spatial relationships."),
    ("5. Working Memory", "Ability to hold information in short-term memory, attend to it, "
     "and transform it to solve a problem."),
]
bw3 = Inches(2.42); bh3 = Inches(2.3); y3 = Inches(2.05)
xs3 = [Inches(0.25 + i * 2.6) for i in range(5)]
fills = [DARK_NAVY, TEAL, RGBColor(0x00,0x5F,0x73), RGBColor(0x0A,0x9396), RGBColor(0x94,0xD2,0xBD)]
for i, (title, body) in enumerate(factors):
    add_rect(s, xs3[i], y3, bw3, bh3, fills[i])
    add_textbox(s, title, xs3[i] + Inches(0.07), y3 + Inches(0.08),
                bw3 - Inches(0.1), Inches(0.5), size=12, bold=True, color=WHITE)
    add_textbox(s, body, xs3[i] + Inches(0.07), y3 + Inches(0.55),
                bw3 - Inches(0.1), bh3 - Inches(0.62), size=11, color=WHITE, wrap=True)
source_tag(s, "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed., p. 10754 | "
              "Park's Textbook, 26th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – GROUP TESTS
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Group Intelligence Tests – Verbal & Non-Verbal")
add_textbox(s, "Group tests are administered simultaneously to large numbers of individuals. "
               "Time is constant; intelligence is measured by amount of work completed within the given time.",
            Inches(0.4), Inches(1.38), Inches(12.5), Inches(0.55),
            size=13.5, color=DARK_TEXT, italic=True)

# Two columns
add_rect(s, Inches(0.3), Inches(2.05), Inches(5.9), Inches(4.5), DARK_NAVY)
add_textbox(s, "A. Group Verbal Tests", Inches(0.4), Inches(2.1), Inches(5.7), Inches(0.5),
            size=17, bold=True, color=GOLD)
gv = [
    "Require reading and writing ability.",
    "Suitable for literate populations.",
    "Measure vocabulary, comprehension, reasoning, and verbal analogies.",
    "Examples: Army Alpha Test (WWI), National Intelligence Tests, "
    "Otis Group Intelligence Scale.",
    "Results may be influenced by language proficiency and educational background.",
]
add_multiline_tb(s, gv, Inches(0.4), Inches(2.65), Inches(5.7), Inches(3.75),
                 size=13, bullet=True, color=WHITE, line_spacing_pt=22)

add_rect(s, Inches(6.5), Inches(2.05), Inches(6.5), Inches(4.5), TEAL)
add_textbox(s, "B. Group Non-Verbal Tests", Inches(6.6), Inches(2.1), Inches(6.3), Inches(0.5),
            size=17, bold=True, color=WHITE)
gnv = [
    "Minimal dependence on language; use diagrams, symbols, and pictures.",
    "Suitable for illiterate, young children, or those with language barriers.",
    "Examples: Army Beta Test (WWI), Raven's Standard Progressive Matrices (Group Form).",
    "Assess abstract reasoning, pattern recognition, and spatial thinking.",
    "Reduce cultural and linguistic bias compared to verbal group tests.",
]
add_multiline_tb(s, gnv, Inches(6.6), Inches(2.65), Inches(6.3), Inches(3.75),
                 size=13, bullet=True, color=WHITE, line_spacing_pt=22)
source_tag(s, "Park's Textbook, 26th ed., p. 776 | Kaplan & Sadock's Comprehensive Textbook, 11th ed.")

# ══════════════════════════════════════════════════════════════════════
# SECTION DIVIDER – NATURE
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
section_divider(s, "TYPES: ACCORDING TO NATURE",
                "Verbal Tests  |  Non-Verbal Tests")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – VERBAL TESTS (6 subtypes)
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Verbal Intelligence Tests", "Require language ability – reading, writing, or speech")
verbal_items = [
    ("A. Vocabulary Test",
     "Measures breadth and depth of word knowledge. Subject defines or selects meaning of words. "
     "Reflects crystallised intelligence and educational exposure."),
    ("B. Memory Test",
     "Assesses short-term and working memory through digit span, sentence repetition, "
     "and story recall tasks."),
    ("C. Comprehension Test",
     "Evaluates understanding of social situations, common-sense reasoning, and "
     "interpretation of passages."),
    ("D. Information Test",
     "Tests general knowledge acquired from environment and education "
     "(e.g., 'Who wrote Hamlet?')."),
    ("E. Reasoning Test",
     "Measures ability to identify relationships, draw conclusions, and solve verbal analogies "
     "(e.g., 'Bird is to Sky as Fish is to __')."),
    ("F. Association Test",
     "Assesses speed and fluency of word associations; reveals thought patterns, "
     "emotional responses, and cognitive flexibility."),
]
bwv = Inches(3.95); bhv = Inches(1.45); y4 = Inches(1.45)
for i, (title, desc) in enumerate(verbal_items):
    row = i // 3; col = i % 3
    xv = Inches(0.3 + col * 4.35)
    yv = y4 + row * Inches(1.55)
    fill_c = DARK_NAVY if row == 0 else TEAL
    add_rect(s, xv, yv, bwv, bhv, fill_c)
    add_textbox(s, title, xv + Inches(0.1), yv + Inches(0.05),
                bwv - Inches(0.15), Inches(0.4), size=13, bold=True, color=GOLD)
    add_textbox(s, desc, xv + Inches(0.1), yv + Inches(0.42),
                bwv - Inches(0.15), bhv - Inches(0.48), size=11.5, color=WHITE, wrap=True)
source_tag(s, "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed. | "
              "Adams & Victor's Principles of Neurology, 12th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – NON-VERBAL TESTS
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Non-Verbal Intelligence Tests",
           "Minimal language requirement – suitable for all literacy levels & cross-cultural use")
nv_items = [
    ("A. Raven's Progressive Matrices (RPM)",
     "Developed by John C. Raven (1936).\n"
     "Measures fluid intelligence / abstract reasoning.\n"
     "Subject selects the missing piece to complete a visual pattern.\n"
     "Three forms: Coloured (CPM – children), Standard (SPM – adults), Advanced (APM – high ability).\n"
     "Widely used cross-culturally; considered relatively culture-fair."),
    ("B. Pattern Completion Test",
     "Requires identification and completion of visual or geometric patterns.\n"
     "Assesses perceptual organisation and inductive reasoning.\n"
     "Minimal verbal instructions needed; useful for pre-school and special populations."),
    ("C. Block Design Test",
     "Subject arranges coloured blocks to match a given pattern or design.\n"
     "Measures visual-spatial ability, constructional praxis, and perceptual reasoning.\n"
     "Subtest of both WAIS and WISC; sensitive to right parietal lobe dysfunction."),
    ("D. Picture Arrangement / Picture Completion",
     "Picture Arrangement: Subject sequences pictures to tell a coherent story – measures "
     "social intelligence & planning.\n"
     "Picture Completion: Subject identifies the missing part in a picture – measures "
     "visual alertness and attention to detail."),
]
bwnv = Inches(6.1); bhnv = Inches(2.5)
positions = [
    (Inches(0.3), Inches(1.45)),
    (Inches(6.7), Inches(1.45)),
    (Inches(0.3), Inches(4.05)),
    (Inches(6.7), Inches(4.05)),
]
fills_nv = [DARK_NAVY, TEAL, TEAL, DARK_NAVY]
for i, (title, body) in enumerate(nv_items):
    xnv, ynv = positions[i]
    add_rect(s, xnv, ynv, bwnv, bhnv, fills_nv[i])
    add_textbox(s, title, xnv + Inches(0.1), ynv + Inches(0.05),
                bwnv - Inches(0.15), Inches(0.42), size=13, bold=True, color=GOLD)
    add_textbox(s, body, xnv + Inches(0.1), ynv + Inches(0.48),
                bwnv - Inches(0.15), bhnv - Inches(0.55), size=11.5, color=WHITE, wrap=True)
source_tag(s, "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed., p. 10754-55 | "
              "Park's Textbook, 26th ed.")

# ══════════════════════════════════════════════════════════════════════
# SECTION DIVIDER – SPECIFIC ABILITY
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
section_divider(s, "TYPES: ACCORDING TO SPECIFIC ABILITY",
                "Assessing Distinct Cognitive Domains")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – SPECIFIC ABILITY TESTS
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Intelligence Tests: According to Specific Ability")
add_textbox(s, "These tests assess distinct, narrowly defined cognitive abilities rather than "
               "global intelligence. Based on Thurstone's (1938) theory of Primary Mental Abilities.",
            Inches(0.4), Inches(1.38), Inches(12.5), Inches(0.5),
            size=13.5, color=DARK_TEXT, italic=True)
spec_items = [
    ("1. Verbal Ability",
     "Measures vocabulary, reading comprehension, verbal fluency, and word knowledge.\n"
     "Tests: Verbal Analogies, Vocabulary subtests, Verbal Reasoning scales.\n"
     "Reflects crystallised intelligence; sensitive to educational background."),
    ("2. Numerical Reasoning",
     "Assesses ability to understand and solve mathematical problems.\n"
     "Tests: Number Series, Arithmetic Reasoning, Quantitative Concepts.\n"
     "Assessed in SB5 Quantitative Reasoning domain and WAIS Arithmetic subtest."),
    ("3. Spatial Ability",
     "Measures capacity to perceive, visualise, and manipulate spatial/geometric forms.\n"
     "Tests: Block Design, Mental Rotation, Spatial Visualisation tasks.\n"
     "Assessed in SB5 Visual-Spatial domain; WISC/WAIS Block Design subtest."),
    ("4. Memory",
     "Evaluates short-term, working, and long-term memory.\n"
     "Tests: Digit Span (forward & backward), Story Recall, Rey Auditory Verbal Learning Test.\n"
     "Assessed in SB5 Working Memory domain and WAIS-IV Memory Index."),
    ("5. Processing Speed",
     "Measures speed and accuracy of simple cognitive tasks under time pressure.\n"
     "Tests: Coding/Digit Symbol, Symbol Search, Reaction Time tasks.\n"
     "Assessed in WAIS-IV Processing Speed Index; sensitive to brain injury & aging."),
]
bws = Inches(2.45); bhs = Inches(3.3); y5 = Inches(2.0)
xs5 = [Inches(0.25 + i * 2.65) for i in range(5)]
fills5 = [DARK_NAVY, TEAL, RGBColor(0x00,0x5F,0x73),
          RGBColor(0x0A,0x93,0x96), RGBColor(0x00,0x6D,0x77)]
for i, (title, body) in enumerate(spec_items):
    add_rect(s, xs5[i], y5, bws, bhs, fills5[i])
    add_textbox(s, title, xs5[i] + Inches(0.08), y5 + Inches(0.08),
                bws - Inches(0.12), Inches(0.45), size=12, bold=True, color=GOLD)
    add_textbox(s, body, xs5[i] + Inches(0.08), y5 + Inches(0.5),
                bws - Inches(0.12), bhs - Inches(0.58), size=11, color=WHITE, wrap=True)
source_tag(s, "Park's Textbook, 26th ed. | Kaplan & Sadock's Comprehensive Textbook, 11th ed. | "
              "Adams & Victor's Neurology, 12th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – CONCLUSION
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "Conclusion")
conc = [
    "Intelligence is a multifaceted construct that cannot be reduced to a single number – "
    "it is global yet composite (Wechsler).",
    "Intelligence tests have evolved from Binet-Simon's (1905) single-scale approach to "
    "multidimensional batteries (WAIS-IV, SB5) assessing distinct cognitive domains.",
    "Classification by administration (individual vs. group), nature (verbal vs. non-verbal), "
    "and specific ability allows clinicians and educators to select the most appropriate tool.",
    "Wechsler scales (WPPSI, WISC, WAIS) and Stanford-Binet remain the gold-standard "
    "individual tests; Raven's Progressive Matrices is the most widely used non-verbal tool.",
    "In Mental Health Nursing, intelligence testing aids in diagnosing intellectual disability, "
    "monitoring psychiatric illness, and guiding therapeutic interventions.",
    "IQ scores must always be interpreted in context – psychiatric illness, motivation, "
    "cultural background, and educational opportunity all influence results.",
    "A thorough understanding of intelligence tests equips nurses to communicate effectively "
    "with multidisciplinary teams and advocate for patient-centred care.",
]
add_multiline_tb(s, conc, Inches(0.5), Inches(1.45), Inches(12.3), Inches(5.5),
                 size=14.5, bullet=True, color=DARK_TEXT, line_spacing_pt=23)
source_tag(s, "Park's Textbook, 26th ed. | Adams & Victor's Neurology, 12th ed. | "
              "Kaplan & Sadock's Comprehensive Textbook of Psychiatry, 11th ed.")

# ══════════════════════════════════════════════════════════════════════
# SLIDE – REFERENCES
# ══════════════════════════════════════════════════════════════════════
s = prs.slides.add_slide(blank)
slide_bg(s)
header_bar(s, "References")
refs = [
    "1.  Park K. Park's Textbook of Preventive and Social Medicine. 26th ed. "
    "Jabalpur: Banarsidas Bhanot; 2023. pp. 775-778.",
    "2.  Ropper AH, Samuels MA, Klein JP, Prasad S. Adams and Victor's Principles of Neurology. "
    "12th ed. New York: McGraw-Hill; 2023. pp. 447-452.",
    "3.  Sadock BJ, Sadock VA, Ruiz P (Eds). Kaplan & Sadock's Comprehensive Textbook of "
    "Psychiatry. 11th ed. Philadelphia: Wolters Kluwer; 2022. pp. 10752-10758.",
    "4.  Sadock BJ, Sadock VA, Ruiz P. Kaplan and Sadock's Synopsis of Psychiatry. "
    "12th ed. Philadelphia: Wolters Kluwer; 2021.",
    "5.  Wechsler D. Wechsler Adult Intelligence Scale. 4th ed. (WAIS-IV). "
    "San Antonio: Pearson; 2008.",
    "6.  Roid GH. Stanford-Binet Intelligence Scales. 5th ed. (SB5). "
    "Rolling Meadows, IL: Riverside Publishing; 2003.",
    "7.  Raven JC. Progressive Matrices: A Perceptual Test of Intelligence. "
    "London: H.K. Lewis; 1936. (Revised editions: 1947, 1998).",
    "8.  World Health Organization. The ICD-10 Classification of Mental and Behavioural "
    "Disorders. Geneva: WHO; 1992.",
]
add_multiline_tb(s, refs, Inches(0.5), Inches(1.4), Inches(12.3), Inches(5.8),
                 size=12.5, color=DARK_TEXT, line_spacing_pt=22)

# ══════════════════════════════════════════════════════════════════════
# SAVE
# ══════════════════════════════════════════════════════════════════════
out_path = "/tmp/workspace/intelligence-test-ppt/Intelligence_Test_BSc_Nursing.pptx"
buf = BytesIO()
prs.save(buf)
with open(out_path, "wb") as f:
    f.write(buf.getvalue())
print(f"Saved: {out_path}")
print(f"Total slides: {len(prs.slides)}")

Successfully replaced 1 instance(s) of the string in '/tmp/workspace/intelligence-test-ppt/build_ppt.py'