小编Pro*_*Ubi的帖子

我想在pascal中创建一个程序,在1到49之间选择6个随机整数.每个数字应该是唯一的,即你不能拥有'8,22'22'32'37'43'因为'22'被重复.如何我可以在Delphi中实现这个吗？

我可以使用以下代码在1 - 49之间获得6个随机数.

for i := 1 to 6 do
  begin 
    num[i] := random(49) + 1
  end
{next};

这是我的汇编程序代码,当我运行它时出现随机8,我不知道如何摆脱它.

    B main

number  DEFW    4
verse   DEFB    " men went to mow\nWent to mow a meadow\n",0
verse2  DEFB    " men," 



    ALIGN


main    ADR R0,number   ;puts address of number into R0
        SWI 4           ;prints value in number

        ADR R0,verse    
        SWI 3           ;prints verse

        ADR R0,number
        SWI 4           ;prints value number

        ADR R0,verse2   ;places the address of verse to R0
        SWI 3           ;prints verse2

        SWI 2

我创建了 4 个 c# 脚本。当我运行我的 2d unity 游戏时，我在控制台中看到了这个警告。

“Assets\Scripts\GameHandler.cs(7,34)：警告 CS0649：字段 'GameHandler.car' 永远不会分配给，并且其默认值始终为 null”

我正在创建一个类似于蛇的游戏，在 unity 2d 中使用 c# 脚本。以前没用过 unity 或 c#，这是我的第一个项目。到目前为止一切顺利，但是，我不断收到此警告，这导致我的游戏崩溃。我附上了我的 2 个脚本，第一个游戏处理程序是这个问题所在，我认为它指的Car是我在下面附上的类。这是很多代码，所以我很抱歉，我只是不知道。

public class GameHandler : MonoBehaviour
{
    [SerializeField] private Car car;

    private LevelGrid levelGrid;

    // Start is called before the first frame update
    private void Start()
    {
        Debug.Log("GameHandler.Start");

        //GameObject carHeadGameObject = new GameObject();
        //SpriteRenderer carSpriteRenderer = carHeadGameObject.AddComponent<SpriteRenderer>();
        //carSpriteRenderer.sprite = GameAssets.instance.carHeadSprite;

        levelGrid = new LevelGrid(20,20); //width,height of grid

        car.Setup(levelGrid);
        levelGrid.Setup(car);
    }


    }
--------------------------------------
    using System.Collections;
using …