dopairb 0.2.0 → 0.4.0

data/lib/dopairb/gallery.rb

@@ -0,0 +1,349 @@
+# frozen_string_literal: true
+
+module Dopairb
+  # Bonus art: famous public-domain paintings, painted procedurally at any
+  # size (no bundled images). Each painter maps (u, v) in 0..1 to an RGB.
+  module Gallery
+    Piece = Struct.new(:id, :title, :artist, :year, :aspect, :painter, keyword_init: true)
+
+    module Paint
+      module_function
+
+      def mix(a, b, t) = Color.mix(a, b, t)
+      def smooth(e0, e1, x) = (t = Fx.clamp01((x - e0) / (e1 - e0))) * t * (3 - 2 * t)
+      def dist(u, v, x, y, sx = 1.0) = Math.hypot((u - x) * sx, v - y)
+
+      # Cheap deterministic value noise in 0..1.
+      def noise(x, y)
+        n = Math.sin(x * 12.9898 + y * 78.233) * 43_758.5453
+        n - n.floor
+      end
+
+      def fbm(x, y)
+        x0 = x.floor
+        y0 = y.floor
+        fx = x - x0
+        fy = y - y0
+        a = noise(x0, y0)
+        b = noise(x0 + 1, y0)
+        c = noise(x0, y0 + 1)
+        d = noise(x0 + 1, y0 + 1)
+        sx = fx * fx * (3 - 2 * fx)
+        sy = fy * fy * (3 - 2 * fy)
+        (a + (b - a) * sx) + ((c + (d - c) * sx) - (a + (b - a) * sx)) * sy
+      end
+
+      # Smooth value noise at any scale (0..1): fbm(u * 8, v * 8) for blotches.
+      def vnoise(u, v, scale = 8.0) = fbm(u * scale, v * scale)
+
+      def hsv(h, s = 1.0, v = 1.0) = Color.hsv(h, s, v)
+
+      # 0xRRGGBB -> [r, g, b]
+      def rgb(hex) = [(hex >> 16) & 255, (hex >> 8) & 255, hex & 255]
+
+      # Gradient through evenly spaced colors, t in 0..1.
+      def ramp(t, *colors)
+        t = Fx.clamp01(t)
+        return colors.last if t >= 1
+        f = t * (colors.size - 1)
+        i = f.floor
+        mix(colors[i], colors[i + 1], f - i)
+      end
+
+      # < 1 inside the ellipse (0 at the center).
+      def ellipse(u, v, cx, cy, rx, ry) = ((u - cx) / rx)**2 + ((v - cy) / ry)**2
+
+      # Point in polygon; pts = [[u, v], ...].
+      def inside?(u, v, pts)
+        hit = false
+        j = pts.size - 1
+        pts.each_with_index do |(xi, yi), i|
+          xj, yj = pts[j]
+          hit = !hit if (yi > v) != (yj > v) && u < (xj - xi) * (v - yi) / (yj - yi + 1e-12) + xi
+          j = i
+        end
+        hit
+      end
+
+      # Brush-stroke texture in -1..1 along angle (radians), freq strokes per unit.
+      def brush(u, v, angle: 0.0, freq: 40.0, wobble: 0.3)
+        x = u * Math.cos(angle) + v * Math.sin(angle)
+        y = -u * Math.sin(angle) + v * Math.cos(angle)
+        Math.sin((y + wobble * Math.sin(x * 9 + y * 3) / freq * 6) * freq * Math::PI)
+      end
+
+      # A color with a little painterly variation.
+      def jitter(color, u, v, amount = 18, scale = 30.0)
+        k = (vnoise(u, v, scale) - 0.5) * 2 * amount
+        color.map { |c| (c + k).round.clamp(0, 255) }
+      end
+
+      # Hokusai, Fine Wind, Clear Morning ("Red Fuji")
+      def red_fuji(u, v)
+        peak_u = 0.58
+        peak_v = 0.17
+        # concave slopes
+        left = peak_v + (peak_u - u) * 1.05 + (peak_u - u)**2 * -0.5
+        right = peak_v + (u - peak_u) * 0.95 + (u - peak_u)**2 * -0.3
+        slope = u < peak_u ? left : right
+        if v > 0.86
+          return mix([20, 60, 50], [10, 30, 30], (v - 0.86) / 0.14) if noise((u * 60).floor, (v * 40).floor) < 0.8
+          return [40, 90, 60]
+        end
+        if v >= slope
+          depth = (v - peak_v) / 0.7
+          if v > 0.74 + 0.03 * Math.sin(u * 30)
+            tree = noise((u * 70).floor, (v * 50).floor) > 0.55
+            return tree ? [35, 95, 60] : [25, 70, 50]
+          end
+          snow = v < peak_v + 0.13 + 0.05 * Math.sin(u * 55) * (v - peak_v) * 8
+          return mix([250, 250, 245], [210, 215, 230], depth) if snow && Math.sin(u * 90) > -0.6
+          base = mix([150, 40, 20], [205, 75, 35], depth * 1.3)
+          streak = Math.sin(u * 140 + v * 10) > 0.75 ? 0.8 : 1.0
+          return Color.scale(base, streak)
+        end
+        sky = mix([40, 80, 160], [175, 205, 230], smooth(0.0, 0.7, v))
+        # mackerel clouds: rows of puffs low in the sky
+        if v > 0.42
+          row = ((v - 0.42) * 22)
+          puff = Math.sin(u * 48 + row.floor * 1.7) * 0.5 + 0.5
+          frac = row - row.floor
+          return mix([255, 255, 250], sky, 0.25) if puff > 0.45 && frac.between?(0.15, 0.7)
+        end
+        sky
+      end
+
+      # Hokusai, The Great Wave off Kanagawa
+      def great_wave(u, v)
+        sky = mix([205, 195, 160], [235, 225, 195], v)
+        # Mount Fuji, small in the trough
+        fu = 0.64
+        fv = 0.58
+        if v > fv && v < 0.70 && (u - fu).abs < (v - fv) * 1.6
+          return v < fv + 0.035 ? [245, 245, 240] : [70, 80, 110]
+        end
+        # the big wave: a crescent between two circles, curling to the right
+        ox = (u - 0.36) * 1.2
+        oy = v - 0.62
+        outer = Math.hypot(ox, oy)
+        inner = Math.hypot((u - 0.56) * 1.2, v - 0.66)
+        if outer < 0.50 && inner > 0.30 && v < 0.80 && u < 0.78
+          edge = 0.50 - outer
+          ang = Math.atan2(oy, ox)
+          claws = Math.sin(ang * 50) > 0.1
+          return [250, 250, 245] if edge < 0.05 && (claws || edge < 0.02)
+          lip = inner - 0.30
+          return [250, 250, 245] if lip < 0.025 && v < 0.5
+          stripe = Math.sin(outer * 110 + inner * 40) > 0.6
+          base = mix([90, 135, 190], [15, 40, 105], Fx.clamp01(edge * 4))
+          return stripe ? mix(base, [235, 240, 245], 0.7) : base
+        end
+        # foam spray dots falling from the crest
+        if dist(u, v, 0.80, 0.22, 1.25) < 0.09 && noise((u * 80).floor, (v * 60).floor) > 0.72
+          return [250, 250, 245]
+        end
+        sea_v = 0.70 + 0.04 * Math.sin(u * 14)
+        if v > sea_v
+          stripe = Math.sin(v * 160 + Math.sin(u * 25) * 4) > 0.7
+          base = mix([40, 80, 140], [20, 45, 100], v)
+          # boats
+          [[0.30, 0.78], [0.62, 0.86]].each do |bx, by|
+            return [215, 195, 140] if ((u - bx) / 0.13)**2 + ((v - by) / 0.025)**2 < 1
+          end
+          # small wave at right
+          return [250, 250, 245] if dist(u, v, 0.86, 0.74, 1.4) < 0.10 && dist(u, v, 0.86, 0.74, 1.4) > 0.08
+          return stripe ? [235, 240, 245] : base
+        end
+        sky
+      end
+
+      # van Gogh, The Starry Night
+      def starry_night(u, v)
+        # cypress, a dark flame on the left
+        cyp = 0.17 + 0.09 * (v - 0.05) * 1.1 * Math.sin(v * 3) + 0.03 * Math.sin(v * 25)
+        width = (v - 0.03) * 0.13
+        if v > 0.03 && (u - cyp).abs < width
+          return Math.sin(v * 70 + u * 30) > 0.3 ? [45, 70, 40] : [20, 30, 25]
+        end
+        hill = 0.70 + 0.06 * Math.sin(u * 5 + 1) + 0.03 * Math.sin(u * 13)
+        if v > hill
+          # village: houses with lit windows and a church spire
+          return [30, 40, 70] if (u - 0.55).abs < 0.008 && v > hill - 0.18
+          if v > hill + 0.07 && v < 0.93
+            cell_x = (u * 40).floor
+            cell_y = (v * 30).floor
+            return [240, 210, 90] if noise(cell_x, cell_y) > 0.82
+            return [55, 70, 105] if noise(cell_x + 3, cell_y) > 0.45
+          end
+          return Math.sin(u * 40 + v * 20) > 0.5 ? [35, 60, 100] : [25, 45, 80]
+        end
+        # moon
+        dm = dist(u, v, 0.87, 0.13, 1.3)
+        return [255, 235, 120] if dm < 0.05
+        return [240, 200, 60] if dm < 0.075 && Math.sin(dm * 300) > 0
+        # stars with halos
+        [[0.10, 0.08], [0.30, 0.15], [0.48, 0.07], [0.66, 0.22], [0.78, 0.40], [0.40, 0.45], [0.95, 0.52], [0.22, 0.38]].each do |sx, sy|
+          d = dist(u, v, sx, sy, 1.3)
+          return [255, 250, 200] if d < 0.015
+          return [235, 215, 90] if d < 0.035
+          return [170, 190, 210] if d < 0.05 && Math.sin(d * 400) > 0.2
+        end
+        # the great swirl
+        sx = u - 0.48
+        sy = (v - 0.30) * 1.6
+        r = Math.hypot(sx, sy)
+        a = Math.atan2(sy, sx)
+        swirl = Math.sin(r * 55 - a * 2 + Math.sin(u * 7) * 2)
+        if r < 0.22 && swirl > 0.4
+          return mix([230, 225, 170], [120, 160, 210], r / 0.22)
+        end
+        stroke = Math.sin(v * 60 + Math.sin(u * 9 + v * 4) * 5)
+        base = mix([30, 60, 140], [70, 110, 180], smooth(0.0, 0.7, v))
+        stroke > 0.6 ? mix(base, [150, 180, 220], 0.45) : base
+      end
+
+      # Leonardo da Vinci, Mona Lisa
+      def mona_lisa(u, v)
+        # dark frame
+        land = mix([150, 160, 120], [90, 100, 60], v)
+        land = mix(land, [70, 90, 80], 0.4) if Math.sin(u * 20 + v * 9) > 0.6
+        fx = 0.50
+        fy = 0.30
+        face = ((u - fx) / 0.13)**2 + ((v - fy) / 0.15)**2
+        hair = ((u - fx) / 0.20)**2 + ((v - fy - 0.04) / 0.22)**2
+        if face < 1
+          skin = mix([235, 190, 120], [180, 130, 70], Fx.clamp01((u - fx + 0.13) / 0.35) * 0.6 + face * 0.3)
+          return [60, 40, 25] if (v - (fy - 0.02)).abs < 0.012 && ((u - fx).abs - 0.055).abs < 0.025 # eyes
+          return [150, 80, 50] if (v - (fy + 0.085 + 0.25 * (u - fx)**2)).abs < 0.006 && (u - fx).abs < 0.045 # the smile
+          return mix(skin, [150, 100, 55], 0.4) if (u - fx).abs < 0.008 && v > fy && v < fy + 0.05 # nose
+          return skin
+        end
+        return [50, 35, 20] if hair < 1 && v < 0.55
+        # neck and chest
+        if v > 0.43 && v < 0.62 && (u - fx).abs < 0.05 + (v - 0.43) * 0.8
+          return mix([225, 180, 115], [190, 140, 80], (v - 0.43) * 4)
+        end
+        # dress
+        if v > 0.45 && (u - fx).abs < 0.12 + (v - 0.45) * 1.1
+          # crossed hands
+          return mix([235, 190, 125], [195, 145, 85], ((u - 0.5).abs) * 4) if ((u - 0.5) / 0.20)**2 + ((v - 0.88) / 0.06)**2 < 1
+          return Math.sin(v * 90 + u * 10) > 0.8 ? [95, 70, 30] : [55, 40, 20]
+        end
+        land
+      end
+
+      # Munch, The Scream
+      def the_scream(u, v)
+        # the figure
+        hx = 0.48
+        hy = 0.62
+        head = ((u - hx) / 0.08)**2 + ((v - hy) / 0.10)**2
+        if head < 1
+          return [40, 30, 30] if ((u - hx).abs - 0.03).abs < 0.015 && (v - hy + 0.02).abs < 0.02 # eyes
+          return [40, 30, 30] if ((u - hx) / 0.015)**2 + ((v - hy - 0.05) / 0.03)**2 < 1 # mouth
+          return [215, 205, 150]
+        end
+        # hands on cheeks
+        return [200, 190, 140] if [[hx - 0.085, hy + 0.01], [hx + 0.085, hy + 0.01]].any? { |x, y| ((u - x) / 0.02)**2 + ((v - y) / 0.06)**2 < 1 }
+        body_w = 0.07 + (v - hy) * 0.35 + 0.02 * Math.sin(v * 30)
+        return Math.sin(v * 40 + u * 15) > 0.3 ? [45, 50, 70] : [25, 25, 40] if v > hy + 0.08 && (u - hx - (v - hy) * 0.1).abs < body_w
+        # the bridge railing, from the left down to the bottom right
+        rail = 0.48 + (u * 0.55)
+        if v > rail - 0.015 && v < rail + 0.015
+          return [130, 70, 40]
+        end
+        if v > rail
+          return Math.sin((u + v) * 70) > 0.4 ? [190, 120, 70] : [160, 95, 55] # deck
+        end
+        # fjord and shore
+        shore = 0.42 + 0.06 * Math.sin(u * 7)
+        if v > shore
+          return u < 0.5 + 0.1 * Math.sin(v * 10) ? mix([40, 60, 120], [70, 90, 130], Math.sin(v * 60 + u * 12) * 0.5 + 0.5) : mix([80, 100, 60], [140, 110, 60], Math.sin(u * 30 + v * 20) * 0.5 + 0.5)
+        end
+        # the blood-red sky
+        wave = Math.sin(v * 38 + Math.sin(u * 6) * 2.5)
+        if wave > 0.4 then [230, 90, 40]
+        elsif wave > -0.2 then [245, 160, 60]
+        elsif wave > -0.7 then [220, 190, 80]
+        else [190, 60, 40]
+        end
+      end
+    end
+
+    # Filled by Gallery.piece as the files below are loaded.
+    PIECES = []
+
+    module_function
+
+    # Register a painting. The block gets (u, v) and runs with Paint's helpers.
+    #   piece :the_kiss, "The Kiss", "Gustav Klimt", "1908", aspect: 1.0 do |u, v| ... end
+    def piece(id, title, artist, year, aspect:, &painter)
+      raise ArgumentError, "duplicate piece #{id}" if PIECES.any? { |p| p.id == id }
+      PIECES << Piece.new(id: id, title: title, artist: artist, year: year, aspect: aspect, painter: painter)
+    end
+
+    piece(:great_wave, "The Great Wave off Kanagawa", "Katsushika Hokusai", "c. 1831", aspect: 1.5) { |u, v| great_wave(u, v) }
+    piece(:red_fuji, "Fine Wind, Clear Morning", "Katsushika Hokusai", "c. 1831", aspect: 1.45) { |u, v| red_fuji(u, v) }
+    piece(:starry_night, "The Starry Night", "Vincent van Gogh", "1889", aspect: 1.26) { |u, v| starry_night(u, v) }
+    piece(:mona_lisa, "Mona Lisa", "Leonardo da Vinci", "c. 1503", aspect: 0.67) { |u, v| mona_lisa(u, v) }
+    piece(:the_scream, "The Scream", "Edvard Munch", "1893", aspect: 0.8) { |u, v| the_scream(u, v) }
+
+    def find(id) = PIECES.find { |p| p.id == id.to_sym }
+    def ids = PIECES.map(&:id)
+
+    # Pixel grid (rows of RGB) of w x h pixels.
+    def pixels(piece, w, h)
+      @cache ||= {}
+      @cache[[piece.id, w, h]] ||= Array.new(h) do |y|
+        Array.new(w) { |x| Paint.instance_exec((x + 0.5) / w, (y + 0.5) / h, &piece.painter) }
+      end
+    end
+
+    # Largest size that fits in cols x rows of cells (two pixels per cell, vertically).
+    # => [pixel width, pixel height]
+    def fit(piece, cols, rows)
+      h = rows * 2
+      w = (h * piece.aspect).round
+      if w > cols
+        w = cols
+        h = (w / piece.aspect).round
+      end
+      [w, h - h % 2]
+    end
+
+    # Pick a piece for a reward: one not yet collected if possible.
+    def pick(rng, owned = [])
+      fresh = PIECES.reject { |p| owned.include?(p.id) }
+      (fresh.empty? ? PIECES : fresh).sample(random: rng)
+    end
+
+    LUMA = " .:-=+*#%@"
+
+    # Draw the piece into a canvas at (x, y). reveal: 0..1 rows shown top-down
+    # (a curtain); depth :none falls back to luminance ASCII.
+    def draw(canvas, piece, x, y, w, h, reveal: 1.0, depth: :truecolor, &tweak)
+      px = pixels(piece, w, h)
+      rows = h / 2
+      shown = (rows * reveal).ceil
+      half = Term.glyph("▀", nil)
+      rows.times do |r|
+        break if r >= shown
+        w.times do |c|
+          top = px[r * 2][c]
+          bot = px[r * 2 + 1][c]
+          top, bot = tweak.(top, bot, c, r) if tweak
+          if depth == :none
+            l = Color.luminance(Color.mix(top, bot, 0.5))
+            canvas.put(x + c, y + r, LUMA[(l / 256.0 * LUMA.size).floor.clamp(0, LUMA.size - 1)])
+          elsif half
+            canvas.put(x + c, y + r, half, top, bg: bot)
+          else
+            canvas.put(x + c, y + r, " ", nil, bg: Color.mix(top, bot, 0.5))
+          end
+        end
+      end
+    end
+  end
+end
+
+Dir[File.join(__dir__, "gallery", "*.rb")].sort.each { |f| require f }

data/lib/dopairb/game.rb

@@ -9,17 +9,38 @@ module Dopairb
     COMBO_MILESTONES = [3, 5, 10, 15, 20, 30, 50, 75, 100].freeze
     COMBO_MEGA = [10, 25, 50, 100].freeze
     EVAL_MILESTONES = [10, 50, 100, 500, 1000, 5000, 10_000].freeze
+    # Typing streaks pay out at powers of two: 8, 16, 32, ... 1024.
+    TYPING_MILESTONES = (3..10).map { |n| 2**n }.freeze
+    FEVER_COMBO = 10
+    # Variable rewards: any success may crit (more likely with a full CHARGE).
+    CRIT_CHANCE = 0.10
+    CRIT_CHARGE_BONUS = 0.12
+    CRIT_MULTS = [2, 2, 2, 4, 4, 8].freeze
+    JACKPOT_CHANCE = 0.015
+    JACKPOT_MULT = 16
+    # Bonus art can also just drop (careers only: the gallery lives in the profile).
+    ART_DROP_CHANCE = 0.02
 
-    Event = Struct.new(:kind, :tier, :info, :flags, :gain, :combo, :streak, :score, keyword_init: true) do
+    Event = Struct.new(:kind, :tier, :info, :flags, :gain, :combo, :streak, :score, :mult, :level, keyword_init: true) do
       def flag?(f) = flags.include?(f)
     end
 
     attr_reader :score, :combo, :max_combo, :evals, :successes, :failures, :interrupts,
                 :charge, :error_streak, :record, :typing_combo, :started_at, :last_key_at,
-                :keystrokes, :best_typing, :comebacks
+                :keystrokes, :best_typing, :comebacks, :crits, :jackpots, :level, :xp_base, :best_combo_ever
 
-    def initialize(clock: -> { Process.clock_gettime(Process::CLOCK_MONOTONIC) })
+    # XP needed for a level doubles each time: LV2 at 512, LV3 at 1024, ...
+    def self.xp_for(level) = level <= 1 ? 0 : 2**(level + 7)
+
+    def self.level_for(xp)
+      lv = 1
+      lv += 1 while xp >= xp_for(lv + 1)
+      lv
+    end
+
+    def initialize(clock: -> { Process.clock_gettime(Process::CLOCK_MONOTONIC) }, rng: Random.new)
       @clock = clock
+      @rng = rng
       @started_at = now
       @score = 0
       @combo = 0
@@ -39,8 +60,27 @@ module Dopairb
       @typing_points = 0
       @keystrokes = 0
       @comebacks = 0
+      @crits = 0
+      @jackpots = 0
+      @xp_base = 0
+      @level = 1
+      @best_combo_ever = nil
+      @leveling = false
+      @streaks_paid = []
+    end
+
+    # Career so far (from Profile): lifetime XP before this session and the best combo ever.
+    def career(xp:, best_combo:)
+      @leveling = true
+      @xp_base = xp.to_i
+      @best_combo_ever = best_combo
+      @level = Game.level_for(@xp_base + @score)
     end
 
+    def xp = @xp_base + @score
+    def fever? = @combo >= FEVER_COMBO
+    def leveling? = @leveling
+
     def now = @clock.call
 
     def multiplier(t = nil)
@@ -56,7 +96,8 @@ module Dopairb
     end
 
     # kind: :insert, :delete, :move, :bracket, :string, :block, :complete, :history, :newline, :paste
-    # Returns :resume when typing restarts after a pause, else nil.
+    # Returns :resume when typing restarts after a pause, [:streak, n] at a
+    # power-of-two typing streak, else nil.
     def key(kind, char = nil)
       t = now
       resumed = @last_key_at && t - @last_key_at > 2.0 && kind == :insert
@@ -66,6 +107,7 @@ module Dopairb
         @typing_combo = kind == :move ? 0 : 1
       end
       @best_typing = @typing_combo if @typing_combo > @best_typing
+      milestone = kind == :insert && TYPING_MILESTONES.include?(@typing_combo)
       @last_key_at = t
       @keystrokes += 1 unless kind == :paste
 
@@ -99,7 +141,14 @@ module Dopairb
         @typing_points += p
         @score += p
       end
-      resumed ? :resume : nil
+      return :resume if resumed
+      return nil unless milestone
+      # outside the per-eval typing cap, but each streak pays once per eval
+      unless @streaks_paid.include?(@typing_combo)
+        @streaks_paid << @typing_combo
+        @score += @typing_combo * 4
+      end
+      [:streak, @typing_combo]
     end
 
     def success(info, code: "", out_lines: 0)
@@ -119,6 +168,11 @@ module Dopairb
       flags << :combo_mega if COMBO_MEGA.include?(@combo)
       flags << :eval_milestone if EVAL_MILESTONES.include?(@evals)
       flags << :output_rain if out_lines >= 20
+      flags << :fever if fever?
+      flags << :fever_start if @combo == FEVER_COMBO
+      if @best_combo_ever && @best_combo_ever >= 5 && @combo == @best_combo_ever + 1
+        flags << :combo_best
+      end
 
       if (num = numeric(info))
         if @record && num > @record && num >= 100
@@ -134,12 +188,32 @@ module Dopairb
       gain += 300 if flags.include?(:new_record)
       gain += 1000 if flags.include?(:eval_milestone)
       gain += @combo * 20 if flags.include?(:combo_milestone)
+      mult = 1
+      roll = @rng.rand
+      if roll < JACKPOT_CHANCE
+        flags << :jackpot
+        mult = JACKPOT_MULT
+        @jackpots += 1
+      elsif roll < CRIT_CHANCE + CRIT_CHARGE_BONUS * @charge / CHARGE_MAX
+        flags << :critical
+        mult = CRIT_MULTS.sample(random: @rng)
+        @crits += 1
+      end
+      flags << :art_drop if @leveling && @rng.rand < ART_DROP_CHANCE
+      mult *= 2 if fever?
+      gain *= mult
       @score += gain
       @charge = 0.0
       @typing_points = 0
+      @streaks_paid.clear
+      lv = @leveling ? Game.level_for(xp) : @level
+      if lv > @level
+        flags << :level_up
+        @level = lv
+      end
 
       Event.new(kind: info[:type] == :definition ? :definition : :success, tier: nil, info: info, flags: flags,
-                gain: gain, combo: @combo, streak: streak, score: @score)
+                gain: gain, combo: @combo, streak: streak, score: @score, mult: mult, level: @level)
     end
 
     def failure(info)
@@ -150,8 +224,10 @@ module Dopairb
       @combo = 0
       @charge = 0.0
       @typing_points = 0
+      @streaks_paid.clear
       flags = []
       flags << :combo_break if broken >= 3
+      flags << :fever_end if broken >= FEVER_COMBO
       flags << :eval_milestone if EVAL_MILESTONES.include?(@evals)
       Event.new(kind: :failure, tier: nil, info: info.merge(broken_combo: broken), flags: flags, gain: 0,
                 combo: 0, streak: @error_streak, score: @score)
@@ -162,6 +238,7 @@ module Dopairb
       lost = @charge
       @charge = 0.0
       @typing_points = 0
+      @streaks_paid.clear
       Event.new(kind: :interrupt, tier: nil, info: { charge: lost }, flags: [], gain: 0, combo: @combo,
                 streak: @error_streak, score: @score)
     end
@@ -171,7 +248,7 @@ module Dopairb
     def stats
       { evals: @evals, successes: @successes, failures: @failures, interrupts: @interrupts,
         max_combo: @max_combo, score: @score, comebacks: @comebacks, keystrokes: @keystrokes, best_typing: @best_typing,
-        time: elapsed }
+        crits: @crits, jackpots: @jackpots, time: elapsed }
     end
 
     private

data/lib/dopairb/input_fx.rb

@@ -6,7 +6,13 @@ module Dopairb
   class InputFx
     Layout = Struct.new(:cursor_x, :cursor_row, :row_end_x, :last_row, :screen_width, :room_below, keyword_init: true)
 
-    STRIP_ROWS = 2
+    STRIP_ROWS = 3
+    # Typing streaks at powers of two get a big name.
+    STREAK_NAMES = {
+      8 => ["8-BIT", "RUSH!"], 16 => ["16-BIT", "COMBO!"], 32 => ["32-BIT", "BLAZE!!"], 64 => ["64-BIT", "OVERDRIVE!!"],
+      128 => ["128-BIT", "HYPER MODE!!"], 256 => ["0x100", "OVERFLOW!!!"], 512 => ["2^9", "GODSPEED!!!"],
+      1024 => ["1KiB", "TYPING LEGEND!!!"],
+    }.freeze
     OPEN = %i[PARENTHESIS_LEFT PARENTHESIS_LEFT_PARENTHESES BRACKET_LEFT BRACKET_LEFT_ARRAY BRACE_LEFT LAMBDA_BEGIN EMBEXPR_BEGIN].freeze
     CLOSE = %i[PARENTHESIS_RIGHT BRACKET_RIGHT BRACE_RIGHT EMBEXPR_END].freeze
     PAIRS = { "(" => ")", "[" => "]", "{" => "}", '#{' => "}" }.freeze
@@ -22,6 +28,7 @@ module Dopairb
 
     Highlight = Struct.new(:from, :to, :born, :life, :kind)
     Popup = Struct.new(:text, :x, :born, :life, :palette, :rise, :prio)
+    Streak = Struct.new(:n, :x, :born, :life)
 
     attr_reader :game
 
@@ -107,6 +114,7 @@ module Dopairb
       return true if @popups.any? { |p| t - p.born < p.life }
       return true if @inline && t - @inline.born < @inline.life + 0.1
       return true if @inserts.any? { |it| t - it < 0.4 }
+      return true if @streak && t - @streak.born < @streak.life + 0.1
       return true if hl_dirty?(t)
       hud = @config.hud ? hud_key(t) : nil
       if hud != @last_hud
@@ -126,6 +134,7 @@ module Dopairb
 
     def reset_line
       @inline = nil
+      @streak = nil
       @highlights.clear
       @inserts.clear
       @popups.clear
@@ -146,6 +155,11 @@ module Dopairb
       gauge_on = Color.mix([80, 110, 170], Color.ramp(Color::FIRE, 0.35), heat)
       c = Canvas.new(Term.str_width(text), 1)
       c.put(0, 0, text, fg, bg: bg, bold: heat > 0.5)
+      if (f = text.index("FEVER!"))
+        "FEVER!".each_char.with_index do |ch, i|
+          c.put(f + i, 0, ch, [20, 10, 30], bg: Color.rainbow(i / 6.0 - t * 2), bold: true)
+        end
+      end
       g = text.index("[")
       if g
         cells = 8
@@ -158,7 +172,7 @@ module Dopairb
     end
 
     def hud_key(t)
-      [hud_text(200, t), (@game.heat(t) * 12).round, (@game.charge / Game::CHARGE_MAX * 8).round]
+      [hud_text(200, t), (@game.heat(t) * 12).round, (@game.charge / Game::CHARGE_MAX * 8).round, @game.fever? ? (t * 15).to_i : 0]
     end
 
     def trail_render(lay, t = now)
@@ -204,9 +218,14 @@ module Dopairb
       return nil unless lively?
       @popups.reject! { |p| t - p.born > p.life }
       @parts.prune(t)
-      return nil if @popups.empty? && @parts.empty?
+      @streak = nil if @streak && t - @streak.born > @streak.life
+      return nil if @popups.empty? && @parts.empty? && @streak.nil?
       w = lay.screen_width - 1
       c = Canvas.new(w, STRIP_ROWS)
+      if @streak && draw_streak(c, w, t)
+        @parts.draw(c, t)
+        return c.render(depth)
+      end
       @parts.draw(c, t)
       @popups.each do |p|
         age = (t - p.born) / p.life
@@ -255,9 +274,11 @@ module Dopairb
       score = Fx.number_with_commas(@game.score)
       mult = @game.multiplier(t)
       m = mult > 1.04 ? format(" x%.1f", mult) : ""
-      full = " COMBO #{format('%02d', @game.combo)}  SCORE #{score}  [#{' ' * 8}]#{m} "
+      fever = @game.fever? ? " FEVER!" : ""
+      lv = @game.leveling? ? " LV#{@game.level} " : ""
+      full = "#{fever}#{lv} COMBO #{format('%02d', @game.combo)}  SCORE #{score}  [#{' ' * 8}]#{m} "
       return full if Term.str_width(full) <= space
-      short = " C#{format('%02d', @game.combo)} #{score} "
+      short = "#{fever} C#{format('%02d', @game.combo)} #{score} "
       Term.str_width(short) <= space ? short : nil
     end
 
@@ -313,10 +334,15 @@ module Dopairb
       elsif recovering
         pop("RECOVERY", cur_x - 4, t, Color::TOXIC, life: 0.55)
       end
-      streak = @game.typing_combo
-      if [20, 50, 100, 200].include?(streak)
-        pop("STREAK #{streak}!", cur_x - 5, t, streak >= 100 ? Color::NEON : Color::GOLD, life: 0.9, rise: true, prio: 3)
-        @parts.burst(cur_x, 0.5, 30, at: t, speed: 40, life: 0.6, palette: Color::GOLD, gravity: 12) if full?
+      if Array === resumed && resumed[0] == :streak
+        n = resumed[1]
+        sfx(:bits)
+        if full?
+          @streak = Streak.new(n, cur_x, t, 1.3 * @config.duration)
+          @parts.burst(cur_x, 1.0, 40, at: t, speed: 46, life: 0.6, palette: n >= 64 ? Color::NEON : Color::GOLD, gravity: 12)
+        else
+          pop("#{STREAK_NAMES[n]&.join(' ') || "STREAK #{n}"}", cur_x - 5, t, Color::GOLD, life: 0.9, rise: true, prio: 3)
+        end
       end
       syntax_moment(ch, off, new, cur_x, t)
     end
@@ -471,6 +497,34 @@ module Dopairb
       pop("PASTE x#{n}", (cur_x || 0) - 6, t, Color::NEON, life: 0.8, rise: true) if lively?
     end
 
+    # Big "64-BIT OVERDRIVE!!" in the strip. False when it cannot be drawn big.
+    def draw_streak(c, w, t)
+      s = @streak
+      big, tag = STREAK_NAMES[s.n] || [s.n.to_s, "STREAK!"]
+      bw = Font.width(big)
+      sub = "TYPING x#{s.n}  +#{s.n * 4}"
+      total = bw + 2 + [tag.size, sub.size].max
+      return false if total > w
+      age = (t - s.born) / s.life
+      x = (s.x - total / 2).clamp(0, w - total)
+      slide = ((1 - Fx.ease_out(age / 0.12)) * 12).round
+      c.tint_bg([255, 255, 255], 0.6 * (1 - age / 0.1), [x - 1, 0].max, 0, total + 2, STRIP_ROWS) if age < 0.1 && @config.flash != :off
+      pal = s.n >= 64 ? Color::NEON : Color::GOLD
+      sweep = (age * 3) % 1.4 - 0.2
+      drawn = Fx.half_text(c, big, x + slide, 0, lambda { |_cx, _r, f|
+        base = s.n >= 128 ? Color.rainbow(f - t * 2) : Color.ramp(pal, 0.1 + f * 0.3)
+        (f - sweep).abs < 0.08 ? [255, 255, 255] : base
+      })
+      return false unless drawn
+      tx = x + bw + 2 + slide
+      tag.each_char.with_index do |ch, i|
+        col = (t * 16 + i).to_i.even? ? [255, 255, 255] : Color.rainbow(i / 10.0 - t)
+        c.put(tx + i, 0, ch, age > 0.7 ? Color.ramp(pal, age) : col, bold: true)
+      end
+      c.put(tx, 2, sub, Color.ramp(pal, 0.2 + age * 0.5), bold: age < 0.6)
+      true
+    end
+
     def sfx(name)
       @sound.call(name)
     rescue StandardError => e

data/lib/dopairb/irb_adapter.rb

@@ -28,6 +28,14 @@ module Dopairb
         @installed = true
       end
 
+      # Is the current session one that binding.irb opened?
+      def from_binding?
+        ctx = IRB.conf[:MAIN_CONTEXT]
+        ctx.respond_to?(:from_binding?) && ctx.from_binding? ? true : false
+      rescue StandardError
+        false
+      end
+
       def expression?(statement)
         defined?(IRB::Statement::Expression) && IRB::Statement::Expression === statement
       end