mirror of
https://github.com/TomHarte/CLK.git
synced 2024-12-24 12:30:17 +00:00
Added basic Typer support for the ZX80 and '81.
This commit is contained in:
parent
f56d96267e
commit
3e5c209039
156
Machines/ZX8081/Typer.cpp
Normal file
156
Machines/ZX8081/Typer.cpp
Normal file
@ -0,0 +1,156 @@
|
|||||||
|
//
|
||||||
|
// Typer.cpp
|
||||||
|
// Clock Signal
|
||||||
|
//
|
||||||
|
// Created by Thomas Harte on 09/07/2017.
|
||||||
|
// Copyright © 2017 Thomas Harte. All rights reserved.
|
||||||
|
//
|
||||||
|
|
||||||
|
#include "ZX8081.hpp"
|
||||||
|
|
||||||
|
uint16_t *ZX8081::Machine::sequence_for_character(Utility::Typer *typer, char character) {
|
||||||
|
#define KEYS(...) {__VA_ARGS__, TerminateSequence}
|
||||||
|
#define SHIFT(...) {KeyShift, __VA_ARGS__, TerminateSequence}
|
||||||
|
#define X {NotMapped}
|
||||||
|
typedef Key KeyTable[126][3];
|
||||||
|
KeyTable zx81_key_sequences = {
|
||||||
|
/* NUL */ X, /* SOH */ X,
|
||||||
|
/* STX */ X, /* ETX */ X,
|
||||||
|
/* EOT */ X, /* ENQ */ X,
|
||||||
|
/* ACK */ X, /* BEL */ X,
|
||||||
|
/* BS */ SHIFT(Key0), /* HT */ X,
|
||||||
|
/* LF */ KEYS(KeyEnter), /* VT */ X,
|
||||||
|
/* FF */ X, /* CR */ X,
|
||||||
|
/* SO */ X, /* SI */ X,
|
||||||
|
/* DLE */ X, /* DC1 */ X,
|
||||||
|
/* DC2 */ X, /* DC3 */ X,
|
||||||
|
/* DC4 */ X, /* NAK */ X,
|
||||||
|
/* SYN */ X, /* ETB */ X,
|
||||||
|
/* CAN */ X, /* EM */ X,
|
||||||
|
/* SUB */ X, /* ESC */ X,
|
||||||
|
/* FS */ X, /* GS */ X,
|
||||||
|
/* RS */ X, /* US */ X,
|
||||||
|
/* space */ KEYS(KeySpace), /* ! */ X,
|
||||||
|
/* " */ SHIFT(KeyP), /* # */ X,
|
||||||
|
/* $ */ SHIFT(KeyU), /* % */ X,
|
||||||
|
/* & */ X, /* ' */ X,
|
||||||
|
/* ( */ SHIFT(KeyI), /* ) */ SHIFT(KeyO),
|
||||||
|
/* * */ SHIFT(KeyB), /* + */ SHIFT(KeyK),
|
||||||
|
/* , */ SHIFT(KeyDot), /* - */ SHIFT(KeyJ),
|
||||||
|
/* . */ KEYS(KeyDot), /* / */ SHIFT(KeyV),
|
||||||
|
/* 0 */ KEYS(Key0), /* 1 */ KEYS(Key1),
|
||||||
|
/* 2 */ KEYS(Key2), /* 3 */ KEYS(Key3),
|
||||||
|
/* 4 */ KEYS(Key4), /* 5 */ KEYS(Key5),
|
||||||
|
/* 6 */ KEYS(Key6), /* 7 */ KEYS(Key7),
|
||||||
|
/* 8 */ KEYS(Key8), /* 9 */ KEYS(Key9),
|
||||||
|
/* : */ SHIFT(KeyZ), /* ; */ SHIFT(KeyX),
|
||||||
|
/* < */ SHIFT(KeyN), /* = */ SHIFT(KeyL),
|
||||||
|
/* > */ SHIFT(KeyM), /* ? */ SHIFT(KeyC),
|
||||||
|
/* @ */ X, /* A */ KEYS(KeyA),
|
||||||
|
/* B */ KEYS(KeyB), /* C */ KEYS(KeyC),
|
||||||
|
/* D */ KEYS(KeyD), /* E */ KEYS(KeyE),
|
||||||
|
/* F */ KEYS(KeyF), /* G */ KEYS(KeyG),
|
||||||
|
/* H */ KEYS(KeyH), /* I */ KEYS(KeyI),
|
||||||
|
/* J */ KEYS(KeyJ), /* K */ KEYS(KeyK),
|
||||||
|
/* L */ KEYS(KeyL), /* M */ KEYS(KeyM),
|
||||||
|
/* N */ KEYS(KeyN), /* O */ KEYS(KeyO),
|
||||||
|
/* P */ KEYS(KeyP), /* Q */ KEYS(KeyQ),
|
||||||
|
/* R */ KEYS(KeyR), /* S */ KEYS(KeyS),
|
||||||
|
/* T */ KEYS(KeyT), /* U */ KEYS(KeyU),
|
||||||
|
/* V */ KEYS(KeyV), /* W */ KEYS(KeyW),
|
||||||
|
/* X */ KEYS(KeyX), /* Y */ KEYS(KeyY),
|
||||||
|
/* Z */ KEYS(KeyZ), /* [ */ X,
|
||||||
|
/* \ */ X, /* ] */ X,
|
||||||
|
/* ^ */ X, /* _ */ X,
|
||||||
|
/* ` */ X, /* a */ KEYS(KeyA),
|
||||||
|
/* b */ KEYS(KeyB), /* c */ KEYS(KeyC),
|
||||||
|
/* d */ KEYS(KeyD), /* e */ KEYS(KeyE),
|
||||||
|
/* f */ KEYS(KeyF), /* g */ KEYS(KeyG),
|
||||||
|
/* h */ KEYS(KeyH), /* i */ KEYS(KeyI),
|
||||||
|
/* j */ KEYS(KeyJ), /* k */ KEYS(KeyK),
|
||||||
|
/* l */ KEYS(KeyL), /* m */ KEYS(KeyM),
|
||||||
|
/* n */ KEYS(KeyN), /* o */ KEYS(KeyO),
|
||||||
|
/* p */ KEYS(KeyP), /* q */ KEYS(KeyQ),
|
||||||
|
/* r */ KEYS(KeyR), /* s */ KEYS(KeyS),
|
||||||
|
/* t */ KEYS(KeyT), /* u */ KEYS(KeyU),
|
||||||
|
/* v */ KEYS(KeyV), /* w */ KEYS(KeyW),
|
||||||
|
/* x */ KEYS(KeyX), /* y */ KEYS(KeyY),
|
||||||
|
/* z */ KEYS(KeyZ), /* { */ X,
|
||||||
|
/* | */ X, /* } */ X,
|
||||||
|
};
|
||||||
|
|
||||||
|
KeyTable zx80_key_sequences = {
|
||||||
|
/* NUL */ X, /* SOH */ X,
|
||||||
|
/* STX */ X, /* ETX */ X,
|
||||||
|
/* EOT */ X, /* ENQ */ X,
|
||||||
|
/* ACK */ X, /* BEL */ X,
|
||||||
|
/* BS */ SHIFT(Key0), /* HT */ X,
|
||||||
|
/* LF */ KEYS(KeyEnter), /* VT */ X,
|
||||||
|
/* FF */ X, /* CR */ X,
|
||||||
|
/* SO */ X, /* SI */ X,
|
||||||
|
/* DLE */ X, /* DC1 */ X,
|
||||||
|
/* DC2 */ X, /* DC3 */ X,
|
||||||
|
/* DC4 */ X, /* NAK */ X,
|
||||||
|
/* SYN */ X, /* ETB */ X,
|
||||||
|
/* CAN */ X, /* EM */ X,
|
||||||
|
/* SUB */ X, /* ESC */ X,
|
||||||
|
/* FS */ X, /* GS */ X,
|
||||||
|
/* RS */ X, /* US */ X,
|
||||||
|
/* space */ KEYS(KeySpace), /* ! */ X,
|
||||||
|
/* " */ SHIFT(KeyY), /* # */ X,
|
||||||
|
/* $ */ SHIFT(KeyU), /* % */ X,
|
||||||
|
/* & */ X, /* ' */ X,
|
||||||
|
/* ( */ SHIFT(KeyI), /* ) */ SHIFT(KeyO),
|
||||||
|
/* * */ SHIFT(KeyP), /* + */ SHIFT(KeyK),
|
||||||
|
/* , */ SHIFT(KeyDot), /* - */ SHIFT(KeyJ),
|
||||||
|
/* . */ KEYS(KeyDot), /* / */ SHIFT(KeyV),
|
||||||
|
/* 0 */ KEYS(Key0), /* 1 */ KEYS(Key1),
|
||||||
|
/* 2 */ KEYS(Key2), /* 3 */ KEYS(Key3),
|
||||||
|
/* 4 */ KEYS(Key4), /* 5 */ KEYS(Key5),
|
||||||
|
/* 6 */ KEYS(Key6), /* 7 */ KEYS(Key7),
|
||||||
|
/* 8 */ KEYS(Key8), /* 9 */ KEYS(Key9),
|
||||||
|
/* : */ SHIFT(KeyZ), /* ; */ SHIFT(KeyX),
|
||||||
|
/* < */ SHIFT(KeyN), /* = */ SHIFT(KeyL),
|
||||||
|
/* > */ SHIFT(KeyM), /* ? */ SHIFT(KeyC),
|
||||||
|
/* @ */ X, /* A */ KEYS(KeyA),
|
||||||
|
/* B */ KEYS(KeyB), /* C */ KEYS(KeyC),
|
||||||
|
/* D */ KEYS(KeyD), /* E */ KEYS(KeyE),
|
||||||
|
/* F */ KEYS(KeyF), /* G */ KEYS(KeyG),
|
||||||
|
/* H */ KEYS(KeyH), /* I */ KEYS(KeyI),
|
||||||
|
/* J */ KEYS(KeyJ), /* K */ KEYS(KeyK),
|
||||||
|
/* L */ KEYS(KeyL), /* M */ KEYS(KeyM),
|
||||||
|
/* N */ KEYS(KeyN), /* O */ KEYS(KeyO),
|
||||||
|
/* P */ KEYS(KeyP), /* Q */ KEYS(KeyQ),
|
||||||
|
/* R */ KEYS(KeyR), /* S */ KEYS(KeyS),
|
||||||
|
/* T */ KEYS(KeyT), /* U */ KEYS(KeyU),
|
||||||
|
/* V */ KEYS(KeyV), /* W */ KEYS(KeyW),
|
||||||
|
/* X */ KEYS(KeyX), /* Y */ KEYS(KeyY),
|
||||||
|
/* Z */ KEYS(KeyZ), /* [ */ X,
|
||||||
|
/* \ */ X, /* ] */ X,
|
||||||
|
/* ^ */ X, /* _ */ X,
|
||||||
|
/* ` */ X, /* a */ KEYS(KeyA),
|
||||||
|
/* b */ KEYS(KeyB), /* c */ KEYS(KeyC),
|
||||||
|
/* d */ KEYS(KeyD), /* e */ KEYS(KeyE),
|
||||||
|
/* f */ KEYS(KeyF), /* g */ KEYS(KeyG),
|
||||||
|
/* h */ KEYS(KeyH), /* i */ KEYS(KeyI),
|
||||||
|
/* j */ KEYS(KeyJ), /* k */ KEYS(KeyK),
|
||||||
|
/* l */ KEYS(KeyL), /* m */ KEYS(KeyM),
|
||||||
|
/* n */ KEYS(KeyN), /* o */ KEYS(KeyO),
|
||||||
|
/* p */ KEYS(KeyP), /* q */ KEYS(KeyQ),
|
||||||
|
/* r */ KEYS(KeyR), /* s */ KEYS(KeyS),
|
||||||
|
/* t */ KEYS(KeyT), /* u */ KEYS(KeyU),
|
||||||
|
/* v */ KEYS(KeyV), /* w */ KEYS(KeyW),
|
||||||
|
/* x */ KEYS(KeyX), /* y */ KEYS(KeyY),
|
||||||
|
/* z */ KEYS(KeyZ), /* { */ X,
|
||||||
|
/* | */ X, /* } */ X,
|
||||||
|
};
|
||||||
|
#undef KEYS
|
||||||
|
#undef SHIFT
|
||||||
|
#undef X
|
||||||
|
|
||||||
|
if(character > sizeof(zx81_key_sequences) / sizeof(*zx81_key_sequences)) return nullptr;
|
||||||
|
|
||||||
|
KeyTable *table = is_zx81_ ? &zx81_key_sequences : &zx80_key_sequences;
|
||||||
|
if((*table)[character][0] == NotMapped) return nullptr;
|
||||||
|
return (uint16_t *)(*table)[character];
|
||||||
|
}
|
@ -181,6 +181,8 @@ int Machine::perform_machine_cycle(const CPU::Z80::PartialMachineCycle &cycle) {
|
|||||||
default: break;
|
default: break;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if(typer_) typer_->update(cycle.length);
|
||||||
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -11,6 +11,7 @@
|
|||||||
|
|
||||||
#include "../ConfigurationTarget.hpp"
|
#include "../ConfigurationTarget.hpp"
|
||||||
#include "../CRTMachine.hpp"
|
#include "../CRTMachine.hpp"
|
||||||
|
#include "../Typer.hpp"
|
||||||
|
|
||||||
#include "../../Processors/Z80/Z80.hpp"
|
#include "../../Processors/Z80/Z80.hpp"
|
||||||
#include "../../Storage/Tape/Tape.hpp"
|
#include "../../Storage/Tape/Tape.hpp"
|
||||||
@ -36,11 +37,14 @@ enum Key: uint16_t {
|
|||||||
KeyP = 0x0500 | 0x01, KeyO = 0x0500 | 0x02, KeyI = 0x0500 | 0x04, KeyU = 0x0500 | 0x08, KeyY = 0x0500 | 0x10,
|
KeyP = 0x0500 | 0x01, KeyO = 0x0500 | 0x02, KeyI = 0x0500 | 0x04, KeyU = 0x0500 | 0x08, KeyY = 0x0500 | 0x10,
|
||||||
KeyEnter = 0x0600 | 0x01, KeyL = 0x0600 | 0x02, KeyK = 0x0600 | 0x04, KeyJ = 0x0600 | 0x08, KeyH = 0x0600 | 0x10,
|
KeyEnter = 0x0600 | 0x01, KeyL = 0x0600 | 0x02, KeyK = 0x0600 | 0x04, KeyJ = 0x0600 | 0x08, KeyH = 0x0600 | 0x10,
|
||||||
KeySpace = 0x0700 | 0x01, KeyDot = 0x0700 | 0x02, KeyM = 0x0700 | 0x04, KeyN = 0x0700 | 0x08, KeyB = 0x0700 | 0x10,
|
KeySpace = 0x0700 | 0x01, KeyDot = 0x0700 | 0x02, KeyM = 0x0700 | 0x04, KeyN = 0x0700 | 0x08, KeyB = 0x0700 | 0x10,
|
||||||
|
|
||||||
|
TerminateSequence = 0xffff, NotMapped = 0xfffe
|
||||||
};
|
};
|
||||||
|
|
||||||
class Machine:
|
class Machine:
|
||||||
public CPU::Z80::Processor<Machine>,
|
public CPU::Z80::Processor<Machine>,
|
||||||
public CRTMachine::Machine,
|
public CRTMachine::Machine,
|
||||||
|
public Utility::TypeRecipient,
|
||||||
public ConfigurationTarget::Machine {
|
public ConfigurationTarget::Machine {
|
||||||
public:
|
public:
|
||||||
Machine();
|
Machine();
|
||||||
@ -69,6 +73,11 @@ class Machine:
|
|||||||
}
|
}
|
||||||
inline void set_tape_is_playing(bool is_playing) { tape_is_playing_ = is_playing; }
|
inline void set_tape_is_playing(bool is_playing) { tape_is_playing_ = is_playing; }
|
||||||
|
|
||||||
|
// for Utility::TypeRecipient::Delegate
|
||||||
|
uint16_t *sequence_for_character(Utility::Typer *typer, char character);
|
||||||
|
int get_typer_delay() { return 7000000; }
|
||||||
|
int get_typer_frequency() { return 390000; }
|
||||||
|
|
||||||
private:
|
private:
|
||||||
std::shared_ptr<Video> video_;
|
std::shared_ptr<Video> video_;
|
||||||
std::vector<uint8_t> zx81_rom_, zx80_rom_;
|
std::vector<uint8_t> zx81_rom_, zx80_rom_;
|
||||||
|
@ -74,6 +74,7 @@
|
|||||||
4B69FB3D1C4D908A00B5F0AA /* Tape.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B69FB3B1C4D908A00B5F0AA /* Tape.cpp */; };
|
4B69FB3D1C4D908A00B5F0AA /* Tape.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B69FB3B1C4D908A00B5F0AA /* Tape.cpp */; };
|
||||||
4B69FB441C4D941400B5F0AA /* TapeUEF.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B69FB421C4D941400B5F0AA /* TapeUEF.cpp */; };
|
4B69FB441C4D941400B5F0AA /* TapeUEF.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B69FB421C4D941400B5F0AA /* TapeUEF.cpp */; };
|
||||||
4B69FB461C4D950F00B5F0AA /* libz.tbd in Frameworks */ = {isa = PBXBuildFile; fileRef = 4B69FB451C4D950F00B5F0AA /* libz.tbd */; };
|
4B69FB461C4D950F00B5F0AA /* libz.tbd in Frameworks */ = {isa = PBXBuildFile; fileRef = 4B69FB451C4D950F00B5F0AA /* libz.tbd */; };
|
||||||
|
4B6A84BC1F130DA6001F28C9 /* Typer.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B6A84BB1F130DA6001F28C9 /* Typer.cpp */; };
|
||||||
4B6C73BD1D387AE500AFCFCA /* DiskController.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B6C73BB1D387AE500AFCFCA /* DiskController.cpp */; };
|
4B6C73BD1D387AE500AFCFCA /* DiskController.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B6C73BB1D387AE500AFCFCA /* DiskController.cpp */; };
|
||||||
4B77069D1EC904570053B588 /* Z80.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B77069B1EC904570053B588 /* Z80.cpp */; };
|
4B77069D1EC904570053B588 /* Z80.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B77069B1EC904570053B588 /* Z80.cpp */; };
|
||||||
4B7913CC1DFCD80E00175A82 /* Video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B7913CA1DFCD80E00175A82 /* Video.cpp */; };
|
4B7913CC1DFCD80E00175A82 /* Video.cpp in Sources */ = {isa = PBXBuildFile; fileRef = 4B7913CA1DFCD80E00175A82 /* Video.cpp */; };
|
||||||
@ -578,6 +579,7 @@
|
|||||||
4B69FB421C4D941400B5F0AA /* TapeUEF.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = TapeUEF.cpp; sourceTree = "<group>"; };
|
4B69FB421C4D941400B5F0AA /* TapeUEF.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = TapeUEF.cpp; sourceTree = "<group>"; };
|
||||||
4B69FB431C4D941400B5F0AA /* TapeUEF.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = TapeUEF.hpp; sourceTree = "<group>"; };
|
4B69FB431C4D941400B5F0AA /* TapeUEF.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = TapeUEF.hpp; sourceTree = "<group>"; };
|
||||||
4B69FB451C4D950F00B5F0AA /* libz.tbd */ = {isa = PBXFileReference; lastKnownFileType = "sourcecode.text-based-dylib-definition"; name = libz.tbd; path = usr/lib/libz.tbd; sourceTree = SDKROOT; };
|
4B69FB451C4D950F00B5F0AA /* libz.tbd */ = {isa = PBXFileReference; lastKnownFileType = "sourcecode.text-based-dylib-definition"; name = libz.tbd; path = usr/lib/libz.tbd; sourceTree = SDKROOT; };
|
||||||
|
4B6A84BB1F130DA6001F28C9 /* Typer.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = Typer.cpp; path = ZX8081/Typer.cpp; sourceTree = "<group>"; };
|
||||||
4B6C73BB1D387AE500AFCFCA /* DiskController.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = DiskController.cpp; sourceTree = "<group>"; };
|
4B6C73BB1D387AE500AFCFCA /* DiskController.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = DiskController.cpp; sourceTree = "<group>"; };
|
||||||
4B6C73BC1D387AE500AFCFCA /* DiskController.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = DiskController.hpp; sourceTree = "<group>"; };
|
4B6C73BC1D387AE500AFCFCA /* DiskController.hpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.h; path = DiskController.hpp; sourceTree = "<group>"; };
|
||||||
4B77069B1EC904570053B588 /* Z80.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = Z80.cpp; path = Z80/Z80.cpp; sourceTree = "<group>"; };
|
4B77069B1EC904570053B588 /* Z80.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; name = Z80.cpp; path = Z80/Z80.cpp; sourceTree = "<group>"; };
|
||||||
@ -1107,6 +1109,7 @@
|
|||||||
4B1497911EE4B5A800CE2596 /* ZX8081.hpp */,
|
4B1497911EE4B5A800CE2596 /* ZX8081.hpp */,
|
||||||
4BD3A3091EE755C800B5B501 /* Video.cpp */,
|
4BD3A3091EE755C800B5B501 /* Video.cpp */,
|
||||||
4BD3A30A1EE755C800B5B501 /* Video.hpp */,
|
4BD3A30A1EE755C800B5B501 /* Video.hpp */,
|
||||||
|
4B6A84BB1F130DA6001F28C9 /* Typer.cpp */,
|
||||||
);
|
);
|
||||||
name = ZX8081;
|
name = ZX8081;
|
||||||
sourceTree = "<group>";
|
sourceTree = "<group>";
|
||||||
@ -2562,6 +2565,7 @@
|
|||||||
buildActionMask = 2147483647;
|
buildActionMask = 2147483647;
|
||||||
files = (
|
files = (
|
||||||
4B2BFC5F1D613E0200BA3AA9 /* TapePRG.cpp in Sources */,
|
4B2BFC5F1D613E0200BA3AA9 /* TapePRG.cpp in Sources */,
|
||||||
|
4B6A84BC1F130DA6001F28C9 /* Typer.cpp in Sources */,
|
||||||
4BAB62AD1D3272D200DF5BA0 /* Disk.cpp in Sources */,
|
4BAB62AD1D3272D200DF5BA0 /* Disk.cpp in Sources */,
|
||||||
4BC9DF4F1D04691600F44158 /* 6560.cpp in Sources */,
|
4BC9DF4F1D04691600F44158 /* 6560.cpp in Sources */,
|
||||||
4B59199C1DAC6C46005BB85C /* OricTAP.cpp in Sources */,
|
4B59199C1DAC6C46005BB85C /* OricTAP.cpp in Sources */,
|
||||||
|
Loading…
Reference in New Issue
Block a user