2015-01-29 33 views
5

Tôi đang chạy một robot Fenuc Karel để gán lớp sử dụng biến thể của Pascal, tuy nhiên robot của chúng tôi là từ 1991-1993 trước khi chúng được thêm ngẫu nhiên(). Có ai biết làm thế nào để có được một số ngẫu nhiên trên một dos thực hiện cũ của Pascal? Xin lưu ý vì tên biến số tuổi không được vượt quá 8 ký tự và số không được tính quá 255Số ngẫu nhiên vào năm 1991 Pascal

+0

Làm dos là không có lý do để không có ngẫu nhiên. Nếu bạn muốn có câu trả lời tốt hơn thì hãy thực hiện chính xác. Nhiều người sẽ có verrsions không chuẩn. Trong trường hợp khẩn cấp, bạn có thể sử dụng Mersenne Twister thực hiện Free Pascal. –

+0

Tôi đã tuyên bố phiên bản nào của pascal nó gần như tôi có thể giúp bạn là 1991-1993 KAREL, là một biến thể của pascal được tạo ra bởi FANUC để sử dụng trong robot công nghiệp của họ. Nó không có ngẫu nhiên như một thói quen định sẵn. – HDeffo

Trả lời

1

Nếu đó là phiên bản pascal borland, bạn có thể sử dụng các khối asm { … }, cho phép bạn nhận giá trị từ RTC, đủ ngẫu nhiên cho nhiều mục đích và mục đích. Cho một biến ngẫu nhiên:

asm { 
    xor ax, ax; 
    int 1ah; 
    mv random, al; 
} 

Điều này sẽ cung cấp cho bạn 8 bit cuối cùng của giá trị đồng hồ thời gian thực.

Ngoài ra, bạn có thể tìm kiếm tạo số giả ngẫu nhiên trên các máy cũ, ví dụ: C64; mặc dù bạn phải chuyển mã sang pascal.

Cập nhật: Có vẻ như, Fanuc Karel (tôi hy vọng đây là nó) có thói quen GET_TIME, mặc dù tôi không chắc chắn về điều gì sẽ trả về.

+0

Là FENUC KAREL và một biến thể của các hàm pascal không được hỗ trợ và thay vào đó nó sử dụng các thường trình. Có rất ít thói quen định sẵn và tôi không biết có thể có được đồng hồ hiện tại. Nếu bạn biết về một thói quen để có được đồng hồ trong FENUC KAREL, đây sẽ là một phương pháp hoàn hảo. – HDeffo