diff --git a/Previder-Powershell-Domain-Module.psm1 b/Previder-Powershell-Domain-Module.psm1
new file mode 100644
index 0000000..9fd8207
--- /dev/null
+++ b/Previder-Powershell-Domain-Module.psm1
@@ -0,0 +1,423 @@
+#
+# Module 'Previder-Powershell-Module'
+#
+
+$Annexus = @{
+    BaseUri = "https://portal.previder.nl";
+    Uri = "https://portal.previder.nl/api";
+    Headers = @{ };
+    LastResponseHeaders = @{ };
+    WaitForRateLimitReset = $true;
+    RateLimitWaitThreshold = 100;
+}
+
+function New-AnnexusWebRequest
+{
+    [CmdletBinding()]
+    param(
+        [parameter(Mandatory = $TRUE)]
+        [string] $Uri,
+        [string] $RequestMethod = "GET",
+        $Body
+    )
+
+    $DefaultRequestMethod = "application/json"
+
+    if ($Annexus.LastResponseHeaders -and $Annexus.LastResponseHeaders['X-Rate-Limit-Remaining'] -and $Annexus['WaitForRateLimitReset'])
+    {
+        $RateLimitRequestsRemaining = $Annexus.LastResponseHeaders['X-Rate-Limit-Remaining'] -as [int]
+        $RateLimitResetTimeUnix = $Annexus.LastResponseHeaders['X-Rate-Limit-Reset'] -As [int]
+
+        if ($null -ne $RateLimitRequestsRemaining -and $null -ne $RateLimitResetTimeUnix)
+        {
+            $RateLimitResetTime = (Get-Date "01.01.1970").AddSeconds($RateLimitResetTimeUnix)
+            $RateLimitResetTime = $RateLimitResetTime.AddSeconds((get-timezone).GetUtcOffset($RateLimitResetTime).TotalSeconds)
+
+            $RateLimitSecondsUntilReset = (New-TimeSpan -Start (get-date) -End $RateLimitResetTime).TotalSeconds
+
+            if ([int]$RateLimitRequestsRemaining -lt $Annexus['RateLimitWaitThreshold'])
+            {
+                write-warning "Waiting for rate limit expiry. Requests remaining: $RateLimitRequestsRemaining. Time remaining $RateLimitSecondsUntilReset seconds"
+                Start-Sleep -Seconds ($RateLimitSecondsUntilReset + 10)
+            }
+        }
+    }
+
+    if ($Body)
+    {
+        $Res = Invoke-WebRequest -WebSession $Annexus.Session -Headers $Annexus.Headers -Method $RequestMethod -Uri $Uri -ContentType $DefaultRequestMethod -Body $Body
+    }
+    else
+    {
+        $Res = Invoke-WebRequest -WebSession $Annexus.Session -Headers $Annexus.Headers -Method $RequestMethod -Uri $Uri -ContentType $DefaultRequestMethod
+    }
+
+
+    $Annexus.LastResponseHeaders = $Res.Headers
+
+    if ($Res.Content)
+    {
+        return $( $Res.Content | convertfrom-json )
+    }
+
+}
+
+function Connect-Annexus
+{
+    [CmdletBinding(DefaultParameterSetName = "credSet")]
+    param(
+        [parameter(ParameterSetName = "tokenSet", Mandatory = $TRUE)]
+        [string] $Token,
+        [parameter(ParameterSetName = "credSet", Mandatory = $TRUE)]
+        [string] $Accountname,
+        [parameter(ParameterSetName = "credSet", Mandatory = $TRUE)]
+        [string] $Username,
+        [parameter(ParameterSetName = "credSet", Mandatory = $TRUE)]
+        [Security.SecureString] $Password,
+        [parameter(ParameterSetName = "credSet", Mandatory = $FALSE)]
+        [string] $OTP,
+        [switch] $UseOTP,
+        [string] $Uri
+    )
+
+    If ($UseOTP -and !$OTP)
+    {
+        $OTP = Read-Host 'OTP'
+    }
+
+    If ($Uri)
+    {
+        $Annexus.Uri = $Uri
+    }
+
+    If ($Token)
+    {
+        $Annexus.Headers.Add("X-Auth-Token", $Token)
+    }
+    Else
+    {
+
+        $UnmanagedString = [System.IntPtr]::Zero
+        try
+        {
+            $UnmanagedString = [Runtime.InteropServices.Marshal]::SecureStringToGlobalAllocUnicode($Password);
+            $UnsecurePassword = [Runtime.InteropServices.Marshal]::PtrToStringUni($UnmanagedString);
+        }
+        finally
+        {
+            [Runtime.InteropServices.Marshal]::ZeroFreeGlobalAllocUnicode($UnmanagedString);
+        }
+
+        $Credentials = @{
+            "username" = "$( $Username )@$( $Accountname )";
+            "password" = $UnsecurePassword;
+            "otp" = $OTP;
+        }
+
+        $Res = Invoke-WebRequest -SessionVariable AnnexusSession -Method GET -Uri "$( $Annexus.Uri )/" -ContentType "application/json"
+
+        $Annexus.Session = $AnnexusSession
+        $Annexus.Session.Headers.Add("X-CSRF-Token", $Res.Headers["X-CSRF-Token"])
+
+        try
+        {
+            $Res = Invoke-WebRequest -WebSession $Annexus.Session -Method POST -Uri "$( $Annexus.BaseUri )/logincheck" -Body $Credentials -ContentType "application/x-www-form-urlencoded"
+        }
+        catch
+        {
+            Write-Host "Error logging in"
+            return
+        }
+
+        $Res = New-AnnexusWebRequest -Uri "$( $Annexus.Uri )/v2/core/session"
+        $Annexus.Session.Headers.Set_Item("X-CSRF-Token", $Res.Headers["X-CSRF-Token"])
+
+        Write-Host "Logged in successfully"
+        $Res
+    }
+}
+
+Function Set-AnnexusRateLimitHandling
+{
+    [CmdletBinding()]
+    param(
+        [Parameter(Mandatory = $false)]
+        [Boolean]$WaitForRateLimitReset = $null,
+        [Parameter(Mandatory = $false)]
+        [int]$RateLimitWaitThreshold = $null
+    )
+    if ($WaitForRateLimitReset -ne $null)
+    {
+        $Annexus['WaitForRateLimitReset'] = $WaitForRateLimitReset
+    }
+
+    if ($RateLimitWaitThreshold -ne $null)
+    {
+        $Annexus['RateLimitWaitThreshold'] = $RateLimitWaitThreshold
+    }
+}
+
+function Set-HandleByCustomer
+{
+    [CmdletBinding()]
+    param(
+        [string] $Id
+    )
+
+    if ( $Annexus.Headers.ContainsKey("X-CustomerId"))
+    {
+        Write-Host "Clearing handle by customer"
+        $Annexus.Headers.Remove("X-CustomerId")
+    }
+
+    if ($Id)
+    {
+        $Customer = Get-Customer -Id $Id
+        Write-Host "Handle by customer $( $Customer.name )"
+        $Annexus.Headers.Add("X-CustomerId", $Customer.id)
+    }
+}
+
+function Register-Domain
+{
+    [CmdletBinding()]
+    param(
+        [parameter(Mandatory = $TRUE)]
+        [string] $DomainName,
+        [parameter(Mandatory = $TRUE)]
+        [string] $Registrant,
+        [string] $AdministrativeContact,
+        [string] $TechnicalContact,
+        [string] $TransferToken)
+
+    $RegistrantObject = GetDomainContact -Id $Registrant
+
+    $AdminObject = {};
+    if (!$AdministrativeContact)
+    {
+        $AdministrativeContact = $Registrant
+        $AdminObject = $RegistrantObject
+    }
+    else
+    {
+        $AdminObject = GetDomainContact -Id $AdministrativeContact
+    }
+    $TechObject = {};
+    if (!$TechnicalContact)
+    {
+        $TechnicalContact = $Registrant
+        $TechObject = $registrantObject
+    }
+    else
+    {
+        $TechObject = GetDomainContact -Id $TechnicalContact
+    }
+
+
+
+    $Tld = GetTld -DomainName $DomainName
+
+    $Meta = GetTldProperties -Tld $Tld -Registrant $Registrant -AdministrativeContact $AdministrativeContact -TechnicalContact  $TechnicalContact
+
+
+    if (-not ([string]$Meta -eq {}))
+    {
+        throw "Cannot register domain $DomainName because it requires metadata. You can fix this by registering a single domain with the tld in the previder portal and saving the metadata in the given domain contacts."
+
+    }
+
+
+    CheckContacts -Tld $Tld -Registrant $RegistrantObject -AdministrativeContact $AdminObject -TechnicalContact  $TechObject
+
+
+    $DomainRegister = @{
+        domainName = $DomainName
+        registrant = $Registrant
+        techContact = $TechnicalContact
+        adminContact = $AdministrativeContact
+        transferTokenIn = $TransferToken
+    }
+
+
+    try
+    {
+        $Res = New-AnnexusWebRequest -Uri "$( $Annexus.Uri )/v2/drs/domain" -RequestMethod POST -Body (ConvertTo-Json -Depth 10 @($DomainRegister))
+        $Res
+    }
+    catch
+    {
+        $Response = $_.Exception.Response
+        if ($Response)
+        {
+            throw "Failed to register $DomainName : Response $Response"
+        }
+        throw "Failed to register $DomainName"
+    }
+
+
+}
+
+function CheckContacts
+{
+    param(
+        [parameter(Mandatory = $TRUE)]
+        [string] $Tld,
+        [parameter(Mandatory = $TRUE)]
+        [Object] $Registrant,
+        [parameter(Mandatory = $TRUE)]
+        [Object] $AdministrativeContact,
+        [parameter(Mandatory = $TRUE)]
+        [Object] $TechnicalContact
+    )
+
+    $ContactCheckArray = @($Tld)
+
+    $ContactCheckObject = @{
+        tlds = $ContactCheckArray
+    }
+
+
+    $Res = New-AnnexusWebRequest -Uri "$( $Annexus.Uri )/v2/drs/contact/allowed" -RequestMethod PUT -Body ($ContactCheckObject | ConvertTo-Json)
+
+
+    $DictConvert = @{}
+    $Res.psobject.properties | Foreach { $DictConvert[$_.Name] = $_.Value }
+
+
+    $Req = $DictConvert.Get_Item($Tld)
+
+
+    if ($Req.adminContactRequirements.organizationRequired -or !$Req.adminContactRequirements.organizationAllowed)
+    {
+        if ($AdministrativeContact.type -eq "PERSON" -and $Req.adminContactRequirements.organizationRequired)
+        {
+            throw "An organisation is required as an admin contact"
+        }
+        if ($AdministrativeContact.type -eq "COMPANY" -and !$Req.adminContactRequirements.organizationAllowed)
+        {
+            throw "A person is required as an admin contact"
+        }
+    }
+
+    if ($Req.billingContactRequirements.organizationRequired -or !$Req.billingContactRequirements.organizationAllowed)
+    {
+        if ($Registrant.type -eq "PERSON" -and $Req.billingContactRequirements.organizationRequired)
+        {
+            throw "An organisation is required as a registrant contact"
+        }
+        if ($Registrant.type -eq "COMPANY" -and !$Req.billingContactRequirements.organizationAllowed)
+        {
+            throw "A person is required as a registrant contact"
+        }
+    }
+
+    if ($Req.techContactRequirements.organizationRequired -or !$Req.techContactRequirements.organizationAllowed)
+    {
+        if ($TechnicalContact.type -eq "PERSON" -and $Req.techContactRequirements.organizationRequired)
+        {
+            throw "An organisation is required as a technical contact"
+        }
+        if ($TechnicalContact.type -eq "COMPANY" -and !$Req.techContactRequirements.organizationAllowed)
+        {
+            throw "A person is required as a technical contact"
+        }
+    }
+
+
+}
+
+
+
+
+
+function GetDomainContact
+{
+
+    [CmdletBinding()]
+    param(
+        [parameter(Mandatory = $TRUE)]
+        [string] $Id = ""
+    )
+
+
+    try
+    {
+        $Res = New-AnnexusWebRequest -Uri "$( $Annexus.Uri )/v2/drs/contact/$Id" -Body $QueryParams
+        $Res
+    }
+    catch
+    {
+        $Statuscode = $_.Exception.Response.StatusCode.value__
+        if ($Statuscode)
+        {
+            throw "Could not retrieve contact $Id : Code $Statuscode"
+        }
+        throw "Could not retrieve contact $Id"
+    }
+
+
+}
+
+function GetTldProperties
+{
+    param(
+        [parameter(Mandatory = $TRUE)]
+        [string] $Tld,
+        [parameter(Mandatory = $TRUE)]
+        [string] $Registrant,
+        [parameter(Mandatory = $TRUE)]
+        [string] $AdministrativeContact,
+        [parameter(Mandatory = $TRUE)]
+        [string] $TechnicalContact
+
+    )
+
+    $Contacts = @($Registrant, $AdministrativeContact, $TechnicalContact)
+
+    $metdataCheck = @{
+        tld = $Tld
+        contacts = $Contacts
+    }
+
+
+    try
+    {
+        $Res = New-AnnexusWebRequest -Uri "$( $Annexus.Uri )/v2/drs/domain/tld-properties" -RequestMethod PUT -Body (ConvertTo-Json -Depth 10 @($metdataCheck))
+        $Res
+    }
+    catch
+    {
+        $Statuscode = $_.Exception.Response.StatusCode.value__
+        if ($Statuscode)
+        {
+            throw "Could not retrieve info for tld $Tld : Code $Statuscode"
+        }
+        throw "Could not retrieve info for tld $Tld"
+    }
+
+
+}
+
+function GetTld
+{
+    param(
+        [parameter(Mandatory = $TRUE)]
+        [string] $DomainName
+    )
+    $TldSplit = $DomainName.split(".")
+
+    $Tld = ""
+
+    if ($TldSplit.Length -gt 1)
+    {
+
+        $Tld = $TldSplit[$TldSplit.Length - 1]
+    }
+    else
+    {
+        throw "Invalid domain name $DomainName"
+    }
+
+    $Tld
+}
+