Tạo một trình tải giả giống như thế này:

Thông số :

• Hiển thị loading(không gian) một trong những chu kỳ này -\|/(không gian) (bộ đếm tỷ lệ phần trăm từ 0-100) sau đó a %.
• Bộ đếm phần trăm được cho là tăng thêm 1 mỗi lần màn hình thay đổi.
• Thời gian của bộ đếm để chuyển sang lần lặp tiếp theo là ngẫu nhiên. Bất kỳ loại ngẫu nhiên nào cũng sẽ làm miễn là hàm / phương thức có khả năng tạo ra tất cả các số nguyên ngẫu nhiên có xác suất> 0 trong phạm vi 1<= ms <=750ở đây mslà thời gian tính bằng mili giây.
• Bắt đầu tại loading - 0 %.
• Kết thúc lúc loading - 100 %.
• KHÔNG CÓ ĐẦU VÀO là bắt buộc.
• gửi một chương trình đầy đủ hoặc chức năng hoặc bất cứ điều gì tương tự.

Mã mà tôi đã sử dụng:

C ++

#include<stdio.h>
#include<time.h>
#include<windows.h>

int main()
{
    srand(time(NULL));
    char a[15],b[]="-\\|/";
    int i=0,j=0,ms;
    while(j<101)
    {
        (i<3)?i++:i=0;
        wsprintf(a,"loading %c %d ",b[i],j++);
        printf(a);puts("%");
            //This part is to make the output look cool
        switch(rand()%9)
        {
            case 0:ms=1;break;
            case 1:ms=2;break;
            case 2:ms=5;break;
            case 3:ms=10;break;
            case 4:ms=15;break;
            case 5:ms=20;break;
            case 6:ms=25;break;
            case 7:ms=50;break;
            case 8:ms=500;
        }
        Sleep(ms);  //Otherwise this is supposed to be random
        if(j<101)   //like this Sleep(rand()%750+1);
        system("cls");
    }
}

Người chiến thắng

• mã có ít byte nhất sẽ thắng.

MATL , 45 byte

101:"'loading'O'-\|/'@)O@qVO37&hD750Yr100/&Xx

Ví dụ chạy trong trình biên dịch ngoại tuyến:

Hoặc dùng thử tại MATL Online!

Giải trình

101:          % Push array [1 2 ... 101]
"             % For each
  'loading'   %   Push this string
  O           %   Push 0. When converted to char it will be displayed as a space
  '-\|/'      %   Push this sring
  @)          %   Modular index into this string with iteration index
  O           %   Push 0
  @q          %   Iteration index minus 1
  V           %   Convert to string
  O           %   Push 0
  37          %   Push 37, which is ASCII for '%'
  &h          %   Concatenate horizontally into a string, Numbers are converted to char
  D           %   Display
  750Yr       %   Random integer with uniform distribution on [1 2 ... 750]
  100/        %   Divide by 100
  &Xx         %   Pause that many tenths of a second and clear screen
              % End (implicit)

Powershell, 71 68 65 byte

Tương tự như https://codegolf.stackexchange.com/a/101357/59735

Đã lưu 3 byte bằng cách không phải là một thằng ngốc (còn lại ... khi tải)

-3 cảm ơn VisualMelon

đã thay đổi 750 -> 751 để đảm bảo 750 được bao gồm.

0..100|%{cls;"loading $("|/-\"[$_%4]) $_ %";sleep -m(random 751)}

Giải trình:

0..100|%{                                  #For range 0-100...
    cls                                    #Clear Display
    "loading $("|/-\"[$_%4]) $_ %"    #Display the current string
    sleep -m(random 750)                  #Sleep random ms up to 750
}

Cập nhật gif

Python 2, 119 113 112 byte

Ban đầu tôi đã đi với số tiền ngẫu nhiên random()/.75, tuy nhiên điểm cuối sẽ không được bao gồm. Không có nhiều sự khác biệt giữa câu hỏi này với câu hỏi khác về thời gian tải vô hạn ngoại trừ tính ngẫu nhiên và thực tế là nó thực sự kết thúc.

import time,random as r
for i in range(101):print'\rLoading','-\|/'[i%4],i,'%',;time.sleep(r.randint(1,750)/1e3)

^{cảm ơn Jonathan Allan vì đã lưu 6 byte và DJMcMayhem vì đã tiết kiệm một byte!}

Mẻ, 185 byte

@set s=-\!/
@for /l %%i in (0,1,100)do @call:l %%i
@exit/b
:l
@cls
@set c=%s:~0,1%
@set s=%s:~1%%c%
@echo Loading %c:!=^|% %1 %%
@set/aw=%random%%%751
@ping>nul 1.1 -n 1 -w %w%

Không may là thời gian khá kém, nhưng Batch không có gì tốt hơn để sử dụng ping.

*> <> (Sao biển), 86 82 byte

| v1*aoooooooo"loading K"&0"-\|/"
!0x1! +
%$<.0+af{od;?)*aa&:&Soono$&+1:&"  %"{o:}

Hãy thử nó ở đây!

Điều này có thể có thể được chơi gôn nhiều hơn, nhưng tôi không thấy bất cứ điều gì siêu rõ ràng. Nó ngủ 100ms, 400ms hoặc 700ms, nếu điều này không đủ ngẫu nhiên, hãy cho tôi biết!

Cảm ơn @TealPelican đã tiết kiệm cho tôi 4 byte và làm cho nó ngẫu nhiên hơn nhiều!

Những thách thức lớn nhất mà tôi tìm thấy (trong khi vẫn cố gắng giữ cho nó nhỏ) là sự ngẫu nhiên và thực sự xuất ra "tải - 100%" vào cuối, thay vì chỉ thoát ra một cách thuận tiện gần nhất: p.

Perl 6 , 67 byte

for |<- \ | />xx* Z 0..100 {print "\rloading $_ %";sleep .750.rand}

Mở rộng:

for

  # produce a list of all the pairs of values

  |<- \ | /> xx *   # a flat infinite list of "clock faces"
  Z                 # zipped with
  0 .. 100          # all the numbers from 0 to 100 inclusive

  # &zip / &infix:<Z> stop on the shortest list

{

  # ｢$_｣ will look something like ｢("/", 39)｣
  # when it is coerced to a Str, all of its elements
  # will be coerced to Str, and joined with spaces

  print "\rloading $_ %";

  sleep .750.rand

}

Javascript (ES6), 128 118 116 115 112 110 109 byte

Điều này dường như hoạt động hoàn toàn tốt, ngay cả với nguồn số "ngẫu nhiên" sơ sài này.

(X=_=>setTimeout(i>99||X,1+new Date%750,document.body.innerHTML=`<pre>Loading ${'-\\|/'[i%4]} ${i++}%`))(i=0)

Thay thế 1 , Javascript + HTML, 16 + 84 byte

Cái này sử dụng một yếu tố đã tồn tại để hiển thị nội dung còn lại:

(X=_=>setTimeout(i>99||X,1+new Date%750,a.innerHTML=`${'-\\|/'[i%4]} ${i++}%`))(i=0)

Loading <a id=a>

Thay thế 2 , 95 byte

Nếu tôi có thể giả sử một tab được mở và bạn đang dán nó vào bảng điều khiển:

(X=_=>setTimeout(i>99||X,1+new Date%750,document.title=`Loading ${'-\\|/'[i%4]} ${i++}%`))(i=0)

Thay vì hiển thị HTML, tiêu đề của tài liệu sẽ thay đổi.

Cảm ơn bạn @ user2428118 vì đã lưu 2 byte!

F #, 118 byte

async{let r=System.Random()
for i in 0..100 do printf"\rLoading %O %d %%""|/-\\".[i%4]i;do!Async.Sleep(r.Next(1,750))}

Để chạy đoạn mã này, hãy chuyển nó vào Async.Starthoặc Async.RunSynchronously.

PHP, 90 83 80 78 77 byte

77:

Việc đóng cửa ;là không cần thiết.

for(;$i<101;usleep(rand(1,75e4)))echo"\rloading ",'-\|/'[$i%4],' ',$i+++0,'%'

78:

Trong khi tìm kiếm một cách giải quyết khác để có 0 ban đầu mà không khởi tạo biến tôi đã đưa ra điều này:

for(;$i<101;usleep(rand(1,75e4)))echo"\rloading ",'-\|/'[$i%4],' ',$i+++0,'%';

Thay đổi trở lại echo để giành được một vài byte vì tôi chỉ sử dụng printf để định dạng bắt buộc như int. Bằng cách tăng $ i tăng lên 0, tôi có được một số nguyên hợp lệ. Bằng cách sử dụng các dấu ngoặc đơn làm dấu phân cách chuỗi, dấu gạch chéo ngược không cần phải thoát, dẫn đến một byte khác được giải phóng

80:

Việc tăng số tiền $ i từ phần cuối cùng sang phần prinf đã cho tôi thêm 3 lần nữa. (Xem bình luận bên dưới)

for(;$i<101;usleep(rand(1,75e4)))printf("\rloading %s %d%%","-\\|/"[$i%4],$i++);

83:

Đã xóa init của một biến với các trình nạp.

for(;$i<101;usleep(rand(1,75e4)),$i++)printf("\rloading %s %d%%","-\\|/"[$i%4],$i);

90:

Tôi đã cố gắng loại bỏ init của $ i để thu được một số byte, vì tôi phải thêm khá nhiều để kích hoạt hoạt hình của trình tải. printf thêm 2 trái ngược với echo, nhưng định dạng NULL dưới dạng số nguyên cho 0.

for($l='-\|/';$i<101;usleep(rand(0,750)*1e3),$i++)printf("\rloading %s %d%%",$l[$i%4],$i);

Groovy, 113 87 byte

-36 byte nhờ vào giải đấu

{p=-1;101.times{print"\rLoading ${"-\\|/"[p++%4]} $p%";sleep Math.random()*750as int}}​

Bash, 162 104 byte

Sửa đổi câu trả lời của Zachary cho một câu hỏi liên quan, với những cải tiến lớn bằng cách thao tác:

s='-\|/'
for x in {0..100};{
printf "\rloading ${s:x%4:1} $x %%"
sleep `printf .%03d $[RANDOM%750+1]`
}

Tôi đã phải tìm cách làm số ngẫu nhiên trong bash.

Ungolfed / Giải thích

s='-\|/'
for x in {0..100}
{
    # \r returns the carriage to the beginning of the current line.
    # ${s:x%4:1} grabs a substring from s, at index x%4, with a length of 1.
    printf "\rloading ${s:x%4:1} $x %%"

    # "$RANDOM is an internal bash function that returns
    #   a pseudorandom integer in the range 0 - 32767."
    # .%03d is a dot followed by a base-ten number formatted to 3 places,
    #   padded with zeros if needed.
    # sleep accepts a floating point number to represent milliseconds.
    sleep `printf .%03d $[RANDOM%750+1]`
}

C #, 170 149 135 byte

()=>{for(int i=0;i++<=100;System.Threading.Thread.Sleep(new Random().Next(1,750)))Console.Write($"\rloading {@"-\|/"[i % 4]} {i} %");};

Ung dung:

static void l()
{
    for (int i = 0; i <= 100; System.Threading.Thread.Sleep(new Random().Next(1, 750)))
        Console.Write($"\rloading {@"-\|/"[i % 4]} {i} %");   
}

Tôi sẽ không đảm bảo rằng mọi ký tự trong phần này đều đúng, vui lòng sửa cho tôi nếu có lỗi biên dịch. Tôi đã phải gõ toàn bộ điều trên điện thoại của mình để có thể vô tình có một số lỗi ... _ (ツ) _ / Tôi hy vọng các bạn tha thứ cho tôi rằng

Đã thử nghiệm nó trên PC của tôi, hoạt động như một bùa mê và tôi thậm chí đã lưu toàn bộ 20 byte nhờ pmbanka :)

C 112 103 byte

Đã lưu 9 byte nhờ @G. Sliepen. Không thú vị lắm, chỉ là một câu trả lời về câu trả lời C ++ của bạn. Cũng không phải là một chức năng ngẫu nhiên rất thú vị. Tôi nghĩ về Sleep(c[i%4]), hoặc Sleep(i)họ không ngẫu nhiên chút nào!

#import<windows.h>
i;f(){for(;i<101;printf("\rloading %c %d %%","-\\|/"[i%4],i++),Sleep(rand()%750+1));}

Ung dung:

#include <windows.h>
int i;
void f() {
  for(;i<101;) {
    printf("\rloading %c %d %%", "-\\|/"[i%4], i++);
    Sleep(rand()%750+1);
  }
}

Toán học, 133 byte

Dynamic[If[x<100,x++,,x=0];Row@{"Loading ",StringPart["-\|/",1+x~Mod~4]," ",x,"%"},
    UpdateInterval:>RandomReal@.75,TrackedSymbols:>{}]

Điều này sẽ chạy một lần, giả sử x là không xác định. Clear@xsẽ khởi động lại nó

55 ký tự gắn liền với tính dài dòng: /

R - 94 byte

for(i in 0:100){cat('\rLoading',c('-','\\','|','/')[i%%4+1],i,'%');Sys.sleep(sample(750,1)/1e3)}

Thực sự tốt đẹp đó sample(750,1) == sample(1:750,1).

HTML + JS (ES6), 16 + 87 = 103 byte

(f=_=>a.innerHTML='\\|/-'[i++%4]+` ${i<100&&setTimeout(f,Math.random()*750),i} %`)(i=0)

loading <a id=a>

PHP, 66 79 byte

for($i=-1;++$i<101;usleep(rand(1,75e4)))echo"\rloading ","-\\|/"[$i%4]," $i %";

Thật không may, tôi đã phải gán $ i để có được nó để in '0'.
Sử dụng như:

php -r 'for($i=-1;++$i<101;usleep(rand(1,75e4)))echo"\rloading ","-\\|/"[$i%4]," $i %";'

Chỉnh sửa: nhờ Titus xác nhận chính xác những gì được phép với Mukul Kumar, chúng tôi có thể lưu 3 byte với phạm vi hạn chế ít hơn, nhưng không phải tất cả 9 byte với phạm vi không giới hạn. Cũng cảm ơn vì đã chỉ ra rằng tôi đã quên nhân vật đi xe đạp và cung cấp một giải pháp đơn giản để làm điều đó.

Noodel , không biên dịch 40 byte

Chỉ cần quay lại những thử thách cũ (như trong những thử thách đã được thực hiện trước Noodel ) và cạnh tranh với Noodel để tìm ra nơi nào yếu.

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ€Ḃ

Nếu đầu ra cuối cùng không quan trọng, thì có thể lưu 2 byte.

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ

Noodel đẩy phần trên cùng của ngăn xếp vào màn hình ở cuối chương trình bằng cách thêm€Ḃ nó ngăn chặn điều đó xảy ra.

Thử nó:)

Làm thế nào nó hoạt động

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ€Ḃ # Main Noodel script.

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺                       # Creates the array ["Loading¤-¤", "Loading¤\¤", "Loading¤|¤", "Loading¤/¤"]
Loading¤                                 # Pushes the string "Loading¤"
        ”Ƈḟḋḣ                            # Pushes the array ["-", "\", "|", "/"]
             ⁺s                          # Concats "Loading¤" to each element in the array by prepending.
               ¤                         # Pushes a "¤" onto the stack.
                ṡ                        # Pushes
                 ⁺

                  Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ   # Main loop that creates the animation.
                  Ḷ101                   # Loop the following code 101 times.
                      ạ                  # Pushes on a copy of the next animation element from the array.
                       ¤%                # Pushes the string "¤%"
                         ɱ               # Pushes on the current count of the number of times that have looped (zero based).
                          Ṡ              # Swaps the two items at the bottom of the stack.
                           Ė             # Pushes the item at the bottom of the stack to the top (which will be the string selected from the array).
                            ²⁺           # Concat twice appending the loop count then the string "¤%" to the string selected from the array.
                              Ç          # Pops the string off of the stack, clears the screen, then prints the string.
                               ṛ749      # Randomly generate an integer from 0 to 749.
                                   ⁺1    # Increment the random number producing a random number from 1 - 750.
                                     ḍ   # Pop off the stack and delay for that number of milliseconds.

                                      €Ḃ # Ends the loop and prevents anything else being displayed.
                                      €  # Ends the loop (new line could be used as well)
                                       Ḃ # Destroys the current stack therein, nothing gets pushed to the screen at the end of the program.

<div id="noodel" code="Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ€Ḃ" input="" cols="14" rows="2"></div>

<script src="https://tkellehe.github.io/noodel/noodel-latest.js"></script>
<script src="https://tkellehe.github.io/noodel/ppcg.min.js"></script>

C 126 121 byte

f(){i=0;char c[]="/-\\|";for(;i<101;i++){printf("\rloading %c %d %% ",c[i%4],i);fflush(stdout);usleep(1000*(rand()%75));}

Phiên bản bị đánh cắp:

 void f()
 {
  int i=0;
  char c[]="/-\\|";
  for(;i<101;i++)
  {
    printf("\rloading %c %d %% ",c[i%4], i);
    fflush(stdout);
    usleep(1000*(rand()%75));  
  }
 } 

@Carcigenicate @ Mukul Kumar Không đọc giữa dòng ở đó, Cảm ơn! :)

MATLAB, 108 byte

function k;for i=0:100;a='-\|/';pause(rand*.749+.001);clc;['loading ' a(mod(i,3)+1) ' ' num2str(i) ' %']
end

Tháng mười, 122 120 119 108 byte

Tôi đã đọc sai thử thách và tạo ra một trình tải vô hạn khởi động lại ở 0 khi nó vượt qua 100. Biến nó thành một trình tải duy nhất một lần:

a='\|/-';for i=0:100;clc;disp(['Loading ',a(1),' ',num2str(i),' %']);a=a([2:4,1]);pause(0.749*rand+.001);end

Lưu hành a, a=a([2:4,1])là ý tưởng của flawr ở đây . Ngoài ra, đã lưu 2 byte bằng cách bỏ qua dấu ngoặc đơn sau khi randnhờ MattWH.

ForceLang, 250 byte

Không soạn thảo, yêu cầu các tính năng ngôn ngữ mà hoãn câu hỏi

def D def
D w io.write
D l e+"loading"+s
D z string.char 8
D s string.char 32
D d datetime.wait 750.mult random.rand()
D e z.repeat 24
D n set i 1+i
D k s+n+s+"%"
set i -1
label 1
w l+"-"+k
if i=100
exit()
d
w l+"\"+k
d
w l+"|"+k
d
w l+"/"+k
d
goto 1

Tôi có lẽ nên sửa một số lỗi liên quan đến phân tích cú pháp chuỗi.

Vợt 110 byte

(for((i 101))(printf"Loading ~a ~a % ~n"(list-ref'("-" "\\" "|" "/")(modulo i 4))i)(sleep(/(random 750)1000)))

Ung dung:

(define(f)
  (for ((i 101))
    (printf "Loading ~a ~a % ~n" (list-ref '("-" "\\" "|" "/") (modulo i 4)) i)
    (sleep (/(random 750)1000))))

Kiểm tra:

(f)

Đầu ra:

(Tệp gif này hiển thị chậm hơn so với thực tế)

107 75 Ruby

-32 nhờ thao tác

Bình thường

i=0
(0..100).each{|c|
system'clear'
puts"loading #{'\|/-'[i=-~i%4]} #{c} %"
sleep rand*(0.750-0.01)+0.01
}

Chơi gôn

101.times{|c|$><<"\rloading #{'-\|/'[c%4]} #{c} %";sleep rand*0.749+0.001}

Python 3, 149 byte

import time,random;f=0;n=0
while n<=100:
 print("Loading...","|/-\\"[f],n,"%",end="\r");f+=1
 if f>=3:f=0
 n+=1
 time.sleep(random.uniform(.25,.75))

Tương tự như Đang tải ... Mãi mãi, nhưng tôi đã phải chỉnh sửa câu trả lời của mình từ đó rất nhiều.

TI-Basic, 80 byte

For(I,0,100
For(A,0,randE2
End
Text(0,0,"loading "+sub("-\|/",1+fPart(I/4),1)+" ",I," %
End

Tính ngẫu nhiên đến từ For(vòng lặp (E là mã thông báo E khoa học) và vì TI-Basic được diễn giải nên cũng tự động có một số chi phí. Hãy nhớ rằng trong TI-Basic, các chữ cái viết thường và một số ký hiệu ASCII ít phổ biến hơn là hai byte (đặc biệt cho chương trình này, l o a d i n g sub( \ | %là các mã thông báo hai byte

Clojure, 109 byte

(doseq[[c i](map vector(cycle"\\|/-")(range 101))](print"\rloading"c i\%)(flush)(Thread/sleep(rand-int 751)))

Vòng lặp trên một danh sách phạm vi các số từ 0 đến 100, được nén với một danh sách vô hạn "\|/-"lặp lại mãi mãi.

; (map vector...) is how you zip in Clojure
;  All arguments after the first to map are lists. The function is expected to
;  take as many arguments as there are lists. vector is var-arg.
(doseq [[c i] (map vector (cycle "\\|/-") (range 101))]
  ; \r to erase the old line
  (println "\rloading" c i \%)
  (Thread/sleep (rand-int 751)))

tcl, 116

set i 0;time {lmap c {- \\ | /} {puts -nonewline stderr "\rloading $c $i%";after [expr int(187*rand())]};incr i} 100

Có thể phát trong http://www.tutorialspoint.com/execute_tcl_online.php?PID=0Bw_CjBb95KQMOXoybnVSOVJEU00

Java 8, 130 byte

()->{for(int n=0;n<101;Thread.sleep((long)(1+Math.random()*750)))System.out.print("\rloading "+"-\\|/".charAt(n%4)+" "+n+++" %");}

Giải trình:

()->{                           // Method without parameter nor return-type
  for(int n=0;n<101;            //  Loop from 0 to 100
      Thread.sleep((long)(1+Math.random()*750)))
                                //   And sleep randomly 1-750 ms 
    System.out.print(           //   Print:
      "\r                       //    Reset to the start of the line
      loading "                 //    Literal "loading "
      +"-\\|/".charAt(n%4)+" "  //    + the spinner char & a space
      +n++                      //    + the number (and increase it by 1)
      +" %");                   //    + a space & '%'
                                //  End of loop (implicit / single-line body)
}                               // End of method

Gif đầu ra:

Visual Basic, 371 byte

module m
sub main()
Dim s as Object
for i as Integer=0 to 100
Select Case new System.Random().next(0,9)
Case 0
s=1
Case 1
s=2
Case 2
s=5
Case 3
s=10
Case 4
s=15
Case 5
s=20
Case 6
s=25
Case 7
s=50
Case 8
s=500
End Select
Console.SetCursorPosition(0,0)
console.write("loading "+"-\|/"(i mod 4)+" "+i.tostring+" %")
system.threading.thread.sleep(s)
next
end sub
end module

Mở rộng:

module m
    sub main()
        Dim s as Object
        for i as Integer=0 to 100
            Select Case new System.Random().next(0,9)
                Case 0
                s=1
                Case 1
                s=2
                Case 2
                s=5
                Case 3
                s=10
                Case 4
                s=15
                Case 5
                s=20
                Case 6
                s=25
                Case 7
                s=50
                Case 8
                s=500
            End Select
            Console.SetCursorPosition(0,0)
            console.write("loading " + "-\|/"(i mod 4) + " " + i.tostring + " %")
            system.threading.thread.sleep(s)
        next
    end sub
end module