// ==UserScript==
// @name         天鳳牌理好形表示
// @name:zh      天凤牌理好形表示
// @name:zh-CN   天凤牌理好形表示
// @name:zh-TW   天鳳牌理好形表示
// @name:en      Tenhou-Pairi Kokei display
// @namespace    http://tanimodori.com/
// @version      0.1.0
// @description  天鳳牌理で一向聴の好形率を表示する
// @description:zh  在天凤牌理中显示好形率
// @description:zh-CN  在天凤牌理中显示好形率
// @description:zh-TW  在天鳳牌理中顯示好形率
// @description:en  Display Kokei percentage of ii-shan-ten in Tenhou-Pairi
// @author       Tanimodori
// @match        http://tenhou.net/2/*
// @match        https://tenhou.net/2/*
// @include      http://tenhou.net/2/*
// @include      https://tenhou.net/2/*
// @grant        none
// @license      MIT
// ==/UserScript==
(function() {
"use strict";
class MJ {
static toArray(input) {
const r###lt = [];
let head, tail;
for (head = tail = 0; head < input.length; ++head) {
if ("mpsz".indexOf(input[head]) === -1) {
continue;
}
for (; tail < head; ++tail) {
r###lt.push(input[tail] + input[head]);
}
++tail;
}
return r###lt;
}
static toAka(input, force) {
if (input[1] !== "m" && input[1] !== "p" && input[1] !== "s") {
return input;
}
if (input[0] === "0" || input[0] === "5") {
if (force === true) {
return "0" + input[1];
} else if (force === false) {
return "5" + input[1];
} else {
return "0" === input[0] ? "5" + input[1] : "0" + input[1];
}
}
return input;
}
static normalize(source) {
return source.map((x) => MJ.toAka(x, false)).sort(MJ.compareTile);
}
static compareTile(a, b) {
if (a[1] !== b[1]) {
return a[1] < b[1] ? -1 : 1;
} else {
let aNum = a.charCodeAt(0);
let bNum = b.charCodeAt(0);
if (aNum === 48) {
aNum = 53.5;
}
if (bNum === 48) {
bNum = 53.5;
}
return aNum - bNum;
}
}
static sub(source, ...tiles) {
const r###lt = [...source];
for (const tile of tiles) {
const index = r###lt.findIndex((x) => MJ.toAka(x, false) === MJ.toAka(tile, false));
if (index != -1) {
r###lt.splice(index, 1);
continue;
}
}
return r###lt;
}
static remains(source, tile) {
let r###lt = 4;
source.forEach((x) => {
if (MJ.toAka(x, false) === MJ.toAka(tile, false)) {
--r###lt;
}
});
return r###lt;
}
static is13Orphans(source) {
const orphanTiles = MJ.toArray("19m19p19s1234567z");
if (source.length !== 14) {
return false;
}
const subbed = MJ.sub(source, ...orphanTiles);
return subbed.length === 1 && orphanTiles.indexOf(subbed[0]) !== -1;
}
static is7Pairs(source) {
if (source.length !== 14) {
return false;
}
const sorted = MJ.normalize(source);
for (let i = 0; i < source.length - 1; ++i) {
if (i % 2 === 0 && sorted[i] !== sorted[i + 1]) {
return false;
}
if (i % 2 === 1 && sorted[i] === sorted[i + 1]) {
return false;
}
}
return true;
}
static splitSuits(source) {
const r###lt = {};
for (const suit of "mpsz") {
r###lt[suit] = source.filter((x) => x[1] === suit);
}
return r###lt;
}
static findSuitWithPair(suits) {
let suitWithPair = null;
for (const suit of "mpsz") {
const lengthMod3 = suits[suit].length % 3;
if (lengthMod3 === 2) {
if (!suitWithPair) {
suitWithPair = suit;
} else {
return null;
}
} else if (lengthMod3 === 1) {
return null;
}
}
return suitWithPair;
}
static _allMeldsLoop(inner, withPair) {
if (inner.length === 0) {
return true;
}
const tryComb = (comb, newWithPair = withPair) => {
const subbed = MJ.sub(inner, ...comb);
return subbed.length === inner.length - comb.length && MJ._allMeldsLoop(subbed, newWithPair);
};
if (withPair) {
if (tryComb([inner[0], inner[0]], false)) {
return true;
}
}
if (inner.length >= 3) {
if (tryComb([inner[0], inner[0], inner[0]])) {
return true;
}
if (inner[0][0] < "8" && inner[0][1] !== "z") {
const addToTile = (t, a) => String.fromCharCode(t.charCodeAt(0) + a) + t[1];
if (tryComb([inner[0], addToTile(inner[0], 1), addToTile(inner[0], 2)])) {
return true;
}
}
}
return false;
}
static allMelds(source, withPair) {
if (source.length === 0) {
return true;
}
withPair != null ? withPair : withPair = source.length % 3 === 2;
if (withPair && source.length % 3 !== 2) {
return false;
}
if (!withPair && source.length % 3 !== 0) {
return false;
}
const sorted = MJ.normalize(source);
return MJ._allMeldsLoop(sorted, withPair);
}
static isNormalWinHand(source) {
if (source.length % 3 !== 2) {
return false;
}
const suits = MJ.splitSuits(source);
const suitWithPair = MJ.findSuitWithPair(suits);
if (!suitWithPair) {
return false;
}
for (const suitType of "mpsz") {
if (!MJ.allMelds(suits[suitType], suitType === suitWithPair)) {
return false;
}
}
return true;
}
static isWinHand(source) {
return MJ.is13Orphans(source) || MJ.is7Pairs(source) || MJ.isNormalWinHand(source);
}
static findWaitingTiles(source, predicate = MJ.isWinHand) {
if (source.length % 3 !== 1)
return [];
const allTiles = MJ.toArray("123456789m123456789p123456789s1234567z");
return allTiles.filter((tile) => MJ.remains(source, tile) > 0 && predicate([...source, tile]));
}
}
const _Hand = class {
constructor(tiles, predicate = "standard") {
if (typeof tiles === "string") {
this.tiles = MJ.toArray(tiles);
} else {
this.tiles = tiles;
}
this.children = [];
this.predicate = predicate;
}
get full() {
return this.tiles.length % 3 === 2;
}
get predicateFn() {
if (typeof this.predicate === "function") {
return this.predicate;
} else if (this.predicate in _Hand.predicates) {
return _Hand.predicates[this.predicate];
} else {
throw new Error(`Unknown predicate "${this.predicate}"`);
}
}
discard(tile) {
const r###lt = new _Hand(MJ.sub(this.tiles, tile), this.predicate);
r###lt.parent = { hand: this, type: "discard", tile, tileCount: -1 };
return r###lt;
}
draw(tile) {
const r###lt = new _Hand([...this.tiles, tile], this.predicate);
r###lt.parent = { hand: this, type: "draw", tile, tileCount: -1 };
return r###lt;
}
remains(tile) {
const deck = [...this.tiles];
for (let cur = this.parent; cur; cur = cur.hand.parent) {
if (cur.type === "discard") {
deck.push(cur.tile);
}
}
const r###lt = MJ.remains(deck, tile);
if (r###lt < 0) {
throw new Error(`tile "${tile}" has more than 4 tiles`);
}
return r###lt;
}
isWinHand() {
return this.predicateFn(this.tiles);
}
uniqueTiles(normalize = false) {
const unique = (value, index, self) => self.indexOf(value) === index;
let target = this.tiles;
if (normalize) {
target = MJ.normalize(target);
}
return target.filter(unique);
}
_xShantenPartial(childPredicate) {
if (this.tiles.length % 3 !== 1) {
return [];
}
this.children = [];
for (const tile of _Hand.allTiles) {
if (this.remains(tile) <= 0) {
continue;
}
const child = this.draw(tile);
if (childPredicate.call(child)) {
this.children.push(child);
}
}
return this.children;
}
_0ShantenPartial() {
this.shanten = 0;
return this._xShantenPartial(this.isWinHand);
}
_1ShantenPartial() {
this.shanten = 1;
return this._xShantenPartial(function() {
return this._0ShantenFull().length !== 0;
});
}
_xShantenFull(childPredicate) {
if (this.tiles.length % 3 !== 2) {
return [];
}
this.children = [];
for (const tile of this.uniqueTiles(true)) {
const child = this.discard(tile);
if (childPredicate.call(child)) {
this.children.push(child);
}
}
return this.children;
}
_0ShantenFull() {
this.shanten = 0;
return this._xShantenFull(function() {
return this._0ShantenPartial().length !== 0;
});
}
_1ShantenFull() {
this.shanten = 1;
return this._xShantenFull(function() {
return this._1ShantenPartial().length !== 0;
});
}
markParentTileCount() {
for (const child of this.children) {
child.parent.tileCount = this.remains(child.parent.tile);
child.markParentTileCount();
}
}
mockShanten(shanten) {
const lengthMod3 = this.tiles.length % 3;
if (lengthMod3 === 0) {
throw new Error(`Invalid tiles length ${shanten} to have shantens`);
}
this.shanten = shanten;
if (shanten === 0) {
const r###lt = lengthMod3 === 2 ? this._0ShantenFull() : this._0ShantenPartial();
this.markParentTileCount();
return r###lt;
} else if (shanten === 1) {
const r###lt = lengthMod3 === 2 ? this._1ShantenFull() : this._1ShantenPartial();
this.markParentTileCount();
return r###lt;
} else {
return [];
}
}
};
let Hand = _Hand;
Hand.allTiles = MJ.toArray("123456789m123456789p123456789s1234567z");
Hand.predicates = {
standard: MJ.isWinHand,
normal: MJ.isNormalWinHand
};
const shantenToNumber = (text) => {
text = text.trim();
if (text.indexOf("\u8074\u724C") !== -1) {
return 0;
} else if (text.indexOf("\u548C\u4E86") !== -1) {
return -1;
} else {
const index = text.indexOf("\u5411\u8074");
if (index !== -1) {
return Number.parseInt(text.substring(0, index));
}
}
throw new Error(`"${text}" is not a valid shanten text`);
};
const getShantenInfo = () => {
const tehaiElement = document.querySelector("#tehai");
if (!tehaiElement) {
throw new Error("Cannot find #tehai element");
}
let r###lt = null;
tehaiElement.childNodes.forEach((node) => {
var _a;
if (!r###lt && node.nodeType === node.TEXT_NODE) {
const text = (_a = node.textContent) != null ? _a : "";
const pattern = /(\d向聴|聴牌|和了)/gm;
const matches = text.match(pattern);
if (matches) {
if (matches.length === 1) {
const shanten = shantenToNumber(matches[0]);
r###lt = { standard: shanten, normal: shanten };
} else if (matches.length === 2) {
const standard = shantenToNumber(matches[0]);
const normal = shantenToNumber(matches[1]);
r###lt = { standard, normal };
}
}
}
});
if (!r###lt) {
throw new Error("Cannot find shanten info");
}
return r###lt;
};
const getTiles = () => {
const pattern = /([0-9][mps]|[1-7]z).gif/;
const tiles = [];
document.querySelectorAll("div#tehai > a > img").forEach((element) => {
const match = element.src.match(pattern);
if (match) {
tiles.push(match[1]);
}
});
return tiles;
};
const getQueryType = () => {
const elementM2A = document.querySelector("#m2 > a");
if (!elementM2A) {
throw new Error("Cannot get query type");
}
const content = elementM2A.innerHTML;
if (content === "\u6A19\u6E96\u5F62") {
return "normal";
} else if (content === "\u4E00\u822C\u5F62") {
return "standard";
}
throw new Error("Cannot get query type");
};
const parseTextareaContent = (content) => {
const pattern = /([0-9]+[mps]|[1-7]+z)+/gm;
const matches = content.match(pattern);
const r###lt = {
hand: [],
waitings: []
};
if (matches) {
r###lt.hand = MJ.toArray(matches[0]);
if (content.indexOf("\u6253") !== -1) {
for (let i = 1; i < matches.length; i += 2) {
r###lt.waitings.push({ discard: matches[i], tiles: MJ.toArray(matches[i + 1]) });
}
} else {
for (let i = 1; i < matches.length; ++i) {
r###lt.waitings.push({ tiles: MJ.toArray(matches[i]) });
}
}
}
return r###lt;
};
const getTextareaTiles = () => {
var _a;
const textarea = document.querySelector("div#m2 > textarea");
if (!textarea) {
throw new Error("Cannot get textarea element");
}
const content = (_a = textarea.textContent) != null ? _a : "";
return parseTextareaContent(content);
};
const getUIInfo = () => {
const shanten = getShantenInfo();
const hand = getTiles().sort(MJ.compareTile);
const waitingInfo = getTextareaTiles();
const r###lt = {
shanten,
...waitingInfo,
hand,
query: {
type: getQueryType(),
autofill: hand.length !== waitingInfo.hand.length
}
};
return r###lt;
};
const style = ".shanten-tile {\n  position: relative;\n}\n.shanten-tile .popup {\n  display: none;\n  width: 300px;\n  background-color: #ddd;\n  color: #fff;\n  text-align: center;\n  border-radius: 6px;\n  padding: 8px 0;\n  position: absolute;\n  z-index: 1;\n  top: 125%;\n  left: 50%;\n  margin-left: -150px;\n}\n.shanten-tile .popup::before {\n  content: '';\n  position: absolute;\n  top: calc(0% - 10px);\n  left: 50%;\n  margin-left: -5px;\n  border-width: 5px;\n  border-style: solid;\n  border-color: transparent transparent #ddd transparent;\n}\n.shanten-tile .popup.show {\n  visibility: visible;\n}\n.shanten-tile .popup .popup-tile img:last-of-type {\n  margin-left: 5px;\n}\n.shanten-tile .popup table {\n  text-align: initial;\n  margin-left: auto;\n  margin-right: auto;\n}\n.shanten-tile:hover .popup {\n  display: block;\n}\n";
const injectCss = () => {
const styleSheet = document.createElement("style");
styleSheet.setAttribute("type", "text/css");
styleSheet.innerHTML = style;
document.head.appendChild(styleSheet);
};
function getElement(arg1, arg2) {
let targetDocument;
let spec;
if (arg2) {
targetDocument = arg1;
spec = arg2;
} else {
targetDocument = document;
spec = arg1;
}
return getElementInner(targetDocument, spec);
}
function getElementInner(document2, spec) {
if (typeof spec === "string") {
return document2.createTextNode(spec);
}
const isHTMLElement = (x) => {
return "tagName" in x;
};
if (isHTMLElement(spec)) {
return spec;
}
const element = document2.createElement(spec["_tag"]);
for (const key in spec) {
if (key === "_tag") {
continue;
} else if (key === "_class") {
element.className = spec[key];
} else if (key === "_innerHTML") {
element.innerHTML = spec[key];
} else if (key === "_children") {
const value = spec[key];
const children = value.map((x) => getElementInner(document2, x));
element.append(...children);
} else {
element.setAttribute(key, spec[key]);
}
}
return element;
}
function getShantenTable(config) {
config.rows.sort(compareRow);
const table = getElement({
_tag: "table",
cellpadding: "2",
cellspacing: "0",
_children: [
{
_tag: "tbody",
_children: config.rows.map(getShantenRow)
}
]
});
if (config.showHand) {
return getElement({
_tag: "div",
_class: "popup",
_children: [{ _tag: "div", _class: "popup-tile", _children: config.hand.map(getShantenRowTile) }, table]
});
} else {
return table;
}
}
function compareRow(a, b) {
const aNum = a.tiles.reduce((acc, x) => acc + x.count, 0);
const bNum = b.tiles.reduce((acc, x) => acc + x.count, 0);
if (aNum != bNum) {
return bNum - aNum;
} else {
if (a.discard && b.discard) {
return MJ.compareTile(a.discard, b.discard);
} else {
return 0;
}
}
}
function getShantenRow(config) {
const tiles = splitRowTiles(config);
const tdData = [];
if (config.discard) {
tdData.push(["\u6253"]);
tdData.push([getShantenRowTile(config.discard)]);
}
tdData.push([config.tenpai ? "\u5F85\u3061[" : "\u6478["]);
let koukeiTotalCount;
let gukeiTotalCount;
const hasKoukei = tiles.koukei.length > 0;
const hasGukei = tiles.gukei.length > 0;
if (hasKoukei || hasGukei) {
if (hasKoukei) {
tdData.push(tiles.koukei.map(getShantenRowTile));
koukeiTotalCount = tiles.koukei.reduce((a, x) => a + x.count, 0);
tdData.push([`\u597D\u5F62${koukeiTotalCount}\u679A`]);
} else {
koukeiTotalCount = 0;
tdData.push([]);
tdData.push([]);
}
tdData.push([hasKoukei && hasGukei ? "+" : ""]);
if (hasGukei) {
tdData.push(tiles.gukei.map(getShantenRowTile));
gukeiTotalCount = tiles.gukei.reduce((a, x) => a + x.count, 0);
tdData.push([`\u611A\u5F62${gukeiTotalCount}\u679A`]);
} else {
gukeiTotalCount = 0;
tdData.push([]);
tdData.push([]);
}
tdData.push(["="]);
}
const hasOther = tiles.other.length > 0;
if (hasOther) {
tdData.push(tiles.other.map(getShantenRowTile));
}
const totalCount = config.tiles.reduce((a, x) => a + x.count, 0);
tdData.push([`${totalCount}\u679A`]);
if (koukeiTotalCount !== void 0) {
const ratio = Math.round(100 * koukeiTotalCount / totalCount);
tdData.push([`\uFF08\u597D\u5F62\u7387${ratio}%\uFF09`]);
}
tdData.push(["]"]);
return getElement({
_tag: "tr",
_children: tdData.map((x) => ({
_tag: "td",
_children: x
}))
});
}
function splitRowTiles(config) {
const koukei = [];
const gukei = [];
const other = [];
for (const tile of config.tiles) {
if (tile.type === "koukei") {
koukei.push(tile);
} else if (tile.type === "gukei") {
gukei.push(tile);
} else {
other.push(tile);
}
}
return { koukei, gukei, other };
}
function getShantenRowTile(config) {
if (typeof config === "string") {
return getElement({
_tag: "img",
src: `https://cdn.tenhou.net/2/a/${config}.gif`,
border: "0",
class: "D"
});
} else {
const r###lt = getElement({
_tag: "span",
_class: "shanten-tile",
_children: [
{
_tag: "a",
href: config.url,
_children: [getShantenRowTile(config.tile)]
}
]
});
if (config.child) {
const childTable = getShantenTable(config.child);
r###lt.appendChild(childTable);
}
return r###lt;
}
}
const getTotalTileCounts = (children) => {
return children.reduce((a, x) => a + x.parent.tileCount, 0);
};
const isKoukei = (hand) => {
for (const child of hand.children) {
const waitingCount = getTotalTileCounts(child.children);
if (waitingCount > 4) {
return true;
}
}
return false;
};
const getHandUrl = (hand) => {
const queryType = hand.predicateFn === Hand.predicates.standard ? "q" : "p";
const queryStr = hand.tiles.join("");
return `https://tenhou.net/2/?${queryType}=${queryStr}`;
};
const getRowConfigFromHand = (hand) => {
const tiles = [];
for (const child of hand.children) {
let tileType = null;
if (hand.shanten === 1) {
tileType = isKoukei(child) ? "koukei" : "gukei";
}
const tileConfig = {
type: tileType,
tile: child.parent.tile,
count: child.parent.tileCount,
url: getHandUrl(child)
};
if (hand.shanten === 1) {
const table = getTableConfigFromHand(child);
table.showHand = true;
tileConfig.child = table;
}
tiles.push(tileConfig);
}
return { discard: hand.parent.tile, tiles, tenpai: hand.shanten === 0 };
};
const getTableConfigFromHand = (hand) => {
const config = {
hand: hand.tiles,
showHand: false,
rows: hand.children.map(getRowConfigFromHand)
};
return config;
};
const run = () => {
let uiInfo;
try {
uiInfo = getUIInfo();
} catch (e) {
return;
}
const queryType = uiInfo.query.type;
if (uiInfo.shanten[queryType] !== 1) {
return;
}
if (uiInfo.hand.length % 3 !== 2) {
return;
}
const originalTable = document.querySelector("#m2 > table");
if (!originalTable) {
return;
}
injectCss();
const hand = new Hand(uiInfo.hand, queryType);
hand.mockShanten(1);
const tableConfig = getTableConfigFromHand(hand);
const table = getShantenTable(tableConfig);
originalTable.after(table);
originalTable.remove();
};
run();
})();