16数字集

zzz19760225

wps中文版的编辑器代码点阵

1. // 通用黑白格子全排列浏览器（支持 N x N）
   
2. function 显示第N个图案通用(格子大小, 序号) {
   
3.     // 格子大小：比如 3 表示 3x3，4 表示 4x4
   
4.     // 序号：从 1 开始
   
5.    
   
6.     let n = 格子大小;
   
7.     let totalCells = n * n;
   
8.    
   
9.     // 计算最大序号（2^总格子数）
   
10.     let maxSeq = Math.pow(2, totalCells);
    
11.    
    
12.     if (序号 < 1 || 序号 > maxSeq) {
    
13.         Console.log(`序号超出范围！最大序号: ${maxSeq}`);
    
14.         return false;
    
15.     }
    
16.    
    
17.     // 将序号转换为二进制
    
18.     let binary = (序号 - 1).toString(2).padStart(totalCells, '0');
    
19.    
    
20.     // 获取当前工作表
    
21.     let ws = ActiveSheet;
    
22.    
    
23.     // 清空区域
    
24.     let endCol = String.fromCharCode(64 + n);
    
25.     let range = ws.Range(`A1:${endCol}${n}`);
    
26.     range.Interior.Color = 0xFFFFFF;
    
27.    
    
28.     // 设置颜色
    
29.     for (let i = 0; i < totalCells; i++) {
    
30.         let row = Math.floor(i / n) + 1;
    
31.         let col = (i % n) + 1;
    
32.         
    
33.         if (binary[i] === '1') {
    
34.             ws.Cells(row, col).Interior.Color = 0x000000;
    
35.             ws.Cells(row, col).Value2 = "■";  // 可选
    
36.         } else {
    
37.             ws.Cells(row, col).Value2 = "□";  // 可选
    
38.         }
    
39.     }
    
40.    
    
41.     // 设置正方形格子
    
42.     ws.Rows(`1:${n}`).RowHeight = Math.floor(300 / n);
    
43.     ws.Columns(`A:${endCol}`).ColumnWidth = Math.floor(50 / n);
    
44.    
    
45.     Console.log(`=== ${n}x${n} 格子 ===`);
    
46.     Console.log(`第 ${序号} / ${maxSeq} 个图案`);
    
47.     Console.log(`二进制: ${binary}`);
    
48.    
    
49.     return true;
    
50. }
    
51. 
    
52. 
    
53. 
    
54. function 示例_5x5() {
    
55.     // 5x5 共 2^25 = 33,554,432 种，需要谨慎
    
56.     显示第N个图案通用(5, 9000);  // 第 100 万个图案
    
57. }
    

复制代码

点击运行宏按钮
立即窗口里显示

1. 第 9000 / 33554432 个图案
   
2. 二进制: 0000000000010001100100111
   

复制代码

表格上显示两个短折线图形。