Khi tạo nhân vật Dungeons & Dragons , một cách khác để ghi điểm khả năng lăn là chỉ định chúng trong ngân sách năng lượng gọi là mua điểm. Điểm số khả năng cao hơn tiêu tốn nhiều điểm hơn, đặc biệt là ở cấp trên: điểm 8 là miễn phí và tăng điểm 1 chi phí 1 điểm, ngoại trừ tăng lên 15 hoặc 16 chi phí 2 điểm và tăng lên 17 hoặc 18 chi phí 3 điểm.

+-------+------+
| Score | Cost |
+-------+------+
|     8 |    0 |
|     9 |    1 |
|    10 |    2 |
|    11 |    3 |
|    12 |    4 |
|    13 |    5 |
|    14 |    6 |
|    15 |    8 |
|    16 |   10 |
|    17 |   13 |
|    18 |   16 |
+-------+------+

Ở dạng danh sách:

[(8, 0), (9, 1), (10, 2), (11, 3), (12, 4), (13, 5), (14, 6), (15, 8), (16, 10), (17, 13), (18, 16)]

Chi phí mua điểm được tổng hợp cho tất cả sáu điểm khả năng.

Ability scores: 16   17   8  13   8  12
Point buy cost: 10 + 13 + 0 + 5 + 0 + 4  = 32

Cho sáu điểm khả năng, mỗi 8 đến 18, xuất ra tổng chi phí mua điểm. Ít byte nhất sẽ thắng.

    var QUESTION_ID=67472,OVERRIDE_USER=20260;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/67472/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

    body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

    <script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

**Leaderboard:**

JavaScript (ES7), 44 42 40 byte

^{Vượt qua 44 vẫn là thường xuyên 44 :(}

a=>a.map(s=>t+=s-9-~((s-14)**1.3),t=0)|t

Cảm ơn @apsillers đã lưu 2 byte!

Giải trình

Phần thú vị là -1-~((s-14)**1.3). (s-14)**1.3sản xuất 1, 2, 4và 6cho các giá trị 15 - 18. Bất kỳ số nào nhỏ hơn 15gây ra lỗi vì việc triển khai JavaScript theo cấp số nhân không thể hoạt động trên các giá trị âm với số mũ phân số. Về cơ bản, bất kỳ giá trị nào s < 15khiến nó quay trở lại NaN, do đó, -1-~có sẵn để chuyển nó thành một số ( 0).

a=>                       // a = input scores as an array of numbers
  a.map(s=>               // for each passed score
    t+=                   // add to the total
      s-9                 // point value = s - 8 (-1 used for next line)
      -~((s-14)**1.3),    // add extra points for scores 15 - 18
    t=0                   // t = total points (this happens BEFORE the map call)
  )
  |t                      // return the total points

Giải pháp ES6 (42 byte)

a=>a.map(s=>t+=s-9-~[1,2,4,6][s-15],t=0)|t

Kiểm tra

Thử nghiệm này sử dụng Math.powthay cho toán tử mũ ( **) để nó có thể chạy trong bất kỳ trình duyệt tiêu chuẩn nào.

var solution = a=>a.map(s=>t+=s-9-~Math.pow(s-14,1.3),t=0)|t

Scores separated by spaces = <input type="text" id="input" value="16 17 8 13 8 12" />
<button onclick="result.textContent=solution(input.value.split(' '))">Go</button>
<pre id="result"></pre>

CJam, 18 byte

l~[8EG]ff-:~0fe>:+

hoặc là

l~[8EG]m*::m0fe>:+

Kiểm tra nó ở đây.

Giải trình

Ý tưởng là phân tách chi phí điểm thành ba thành phần:

 Score: 8  9 10 11 12 13 14 15 16 17 18
        0  1  2  3  4  5  6  7  8  9 10
        0  0  0  0  0  0  0  1  2  3  4
        0  0  0  0  0  0  0  0  0  1  2
       --------------------------------
 Cost:  0  1  2  3  4  5  6  8 10 13 16

Tất cả ba thành phần có thể được tính toán thông qua một phép trừ duy nhất và giới hạn kết quả ở các giá trị không âm.

l~    e# Read and evaluate input.
[8EG] e# Push [8 14 16].
ff-   e# For each pair from the two lists, subtract one from the other. 
:~    e# Flatten the result.
0fe>  e# Clamp each difference to non-negative values.
:+    e# Sum them all up.

Bình thường, 14 byte

s>#0-M*Q+14yB8

Bộ kiểm tra

Điều này sử dụng các phương tiện tính toán cơ bản tương tự như Martin Büttner, cụ thể là:

max(n-8, 0) + max(n-14, 0) + max(n-16, 0)

Điều đó đang được nói, các phương tiện tính toán rất khác nhau. Để tạo danh sách các số cần trừ, tôi sử dụng biểu thức +14yB8. yB8có nghĩa là "Bifurcate 8 trên hàm y". y nhân đôi số, vì vậy điều này mang lại [8, 16]. Sau đó, chúng tôi thêm vào ngày 14, đưa ra danh sách [14, 8, 16].

Tiếp theo, chúng tôi lấy sản phẩm của Cartesian với đầu vào và trừ mọi cặp giá trị.

Tiếp theo, thực hiện thao tác tối đa hóa, chúng tôi chỉ đơn giản chỉ lọc các giá trị dương và tính tổng phần còn lại.

Samau , 19 byte

Không chắc chắn nếu câu hỏi được đăng sau lần cam kết cuối cùng của ngôn ngữ mới của tôi. Cả hai đều cách đây 2 giờ. Nhưng tất cả các tính năng được sử dụng ở đây đã được thêm vào trước đó.

▐[8 14 16]`-o;0>*ΣΣ

Samau sử dụng CP737 làm mã hóa ký tự mặc định.

▐[8 14 16]`-o;0>*ΣΣ
▐                      read a list of numbers
 [8 14 16]             push [8 14 16]
          `-           push the function [-]
            o          outer product
             ;         duplicate
              0>       for each element, test if it's larger than 0
                *      times
                 ΣΣ    take the sum twice because it's a 2d array

PowerShell, 48 byte

$args|%{$t+=$_-8+@{15=1;16=2;17=4;18=10}[$_]};$t

_{(Khá chắc chắn rằng điều này không tối ưu.)}

Đưa các đối số dòng lệnh đầu vào và đưa chúng vào một vòng lặp |%{...}. Mỗi lần lặp lại, chúng tôi tăng tổng số của chúng tôi $t+=với số hiện tại trừ 8 $_-8cộng với kết quả của việc lập chỉ mục thành một hàm băm cho các giá trị đắt hơn @{...}[$_]. Sau đó, chúng tôi chỉ đơn giản là đầu ra $tở cuối.

(🐂👍) Ox ++, 248 byte (62 ký tự)

🐀👉🌑👺🐁👉🌑👺😂🐀🐟🌗😂🐂👉😷😺😺😷👺🐁👉🐁👏🐂🙌🌙👏🌜🐂🐳🌒🌕🌛👥🌜🐂🙌🌒🌕🌛👏🌜🐂🐳🌒🌗🌛👥🌜🐂🙌🌒🌗🌛👺🐀👍😂👄🐁👄

Ngôn ngữ tôi đang làm việc. Dán mã vào đây .