Making a game with animation frames in Excel

Submitted by MisterBeck on Mon, 05/18/2020 - 14:24

Why might you make a game Excel? For learning and for fun. So let's get to it.

The Beginnings of a Game.

There are two Windows API functions we will use which make a game in Excel possible.

#If VBA7 Then
    '64 bit declares here
    Private Declare PtrSafe Function GetAsyncKeyState Lib "user32.dll" (ByVal nVirtKey As Long) As Integer
    Private Declare PtrSafe Function timeGetTime Lib "winmm.dll" () As Long
#Else
    '32 bit declares here
    Private Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal nVirtKey As Long) As Integer
    Private Declare Function timeGetTime Lib "winmm.dll" () As Long
#End If

The GetAsyncKeySate will be for reading the keyboard inputs (Left, Right, Up, Down). timeGetTime will be used for the game counter to iterate frames. That's all you really need. Everything else can be down in VBA pure. Next we come to the game loop. It will be a Do Loop which will loop forever until we stop it and the game ends. Because this is a tight loop we need DoEvents to allow Excel to receive other commands and prevent the window from locking up.
 

Do
    DoEvents

    'Game code goes here.
Loop

 

Now we need a way to control and time updating the game state. timeGetTime is the answer. It returns the current time in milliseconds since boot time. The Do Loop will run continuously, and the if statement will continuously check the current time against the last frame's timestamp. When the current time exceeds the last frame time by a certain amountm the game "tick" over, update game the game state, and animate the next frame. I chose 50 milliseconds arbitrarily. Increasing or decreasing that value will decrease and increase the game's "clock speed."

'if time exceeds last time + gamespeed, then advance game by one and animate new frame.
If timeGetTime - lastFrameTime > 50 Then        
    'Game code goes here
End if


Now the game code itself. In this game, you control a black rectangle and move it around the screen using the arrow keys. Nice, right? Less of a game than Pong.

The game logic is very simple.

1) check if an arrow key is pressed.
2) if so, move a colored cell in that direction
3) repeat

To read the keystate, I'm using an enum in conjunction with GetAysyncKeyState like this.

Private Enum Direction
    None = 0
    Up = 1
    Down
    Left
    Right
End Enum

Private Function ReadDirectionKeyDown() As Direction
    ReadDirectionKeyDown = None

    If (GetAsyncKeyState(vbKeyUp) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Up
    ElseIf (GetAsyncKeyState(vbKeyDown) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Down
    ElseIf (GetAsyncKeyState(vbKeyRight) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Right
    ElseIf (GetAsyncKeyState(vbKeyLeft) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Left
    End If

End Function


Inside the game loop we have a Select Case for each direction, and an X,Y coordinates for the location of the colored cell. Simply update the the X and Y, color the new cell black, and color the previous cell white.

Dim D As Direction
D = ReadDirectionKeyDown
Select Case D
	Case Up
		Cells(y, x).Interior.ColorIndex = -4142
		y = y - 1
		Cells(y, x).Interior.ColorIndex = 1
	Case Down
		Cells(y, x).Interior.ColorIndex = -4142
		y = y + 1
		Cells(y, x).Interior.ColorIndex = 1
	Case Left
		Cells(y, x).Interior.ColorIndex = -4142
		x = x - 1
		Cells(y, x).Interior.ColorIndex = 1
	Case Right
		Cells(y, x).Interior.ColorIndex = -4142
		x = x + 1
		Cells(y, x).Interior.ColorIndex = 1
End Select

The End. You have a "game." Ok, not a full game, but you have a controllable character in a space. Here's the entire module.

Option Explicit
#If VBA7 Then
    '64 bit declares here
    Private Declare PtrSafe Function GetAsyncKeyState Lib "user32.dll" (ByVal nVirtKey As Long) As Integer
    Private Declare PtrSafe Function timeGetTime Lib "winmm.dll" () As Long
#Else
    '32 bit declares here
    Private Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal nVirtKey As Long) As Integer
    Private Declare Function timeGetTime Lib "winmm.dll" () As Long
#End If


Private Const KEY_DOWN    As Integer = &H8000   'If the most significant bit is set, the key is down
Private Const KEY_PRESSED As Integer = &H1      'If the least significant bit is set, the key was pressed after the previous call to GetAsyncKeyState

Private Enum Direction
    None = 0
    Up = 1
    Down
    Left
    Right
End Enum

Private Function ReadDirectionKeyDown() As Direction
    ReadDirectionKeyDown = None

    If (GetAsyncKeyState(vbKeyUp) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Up
    ElseIf (GetAsyncKeyState(vbKeyDown) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Down
    ElseIf (GetAsyncKeyState(vbKeyRight) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Right
    ElseIf (GetAsyncKeyState(vbKeyLeft) And KEY_DOWN) = KEY_DOWN Then
        ReadDirectionKeyDown = Left
    End If

End Function


Sub Game()

    Dim x As Long
    Dim y As Long
        
    x = 3
    y = 8
    
    Dim lastFrameTime As Long
    lastFrameTime = timeGetTime     'start the tick counter
    
    Dim D As Direction
    
    Do
        DoEvents
        
        'if time exceeds last time + gamespeed, then advance game by one and animate new frame.
        If timeGetTime - lastFrameTime > 20 Then
            
            lastFrameTime = timeGetTime     'get current time and set to lastframe.
            
            'All game code goes here.
            '*********************************
            
            D = ReadDirectionKeyDown
            
            Select Case D
            
                Case Up
                    Cells(y, x).Interior.ColorIndex = -4142
                    y = y - 1
                    Cells(y, x).Interior.ColorIndex = 1
                Case Down
                    Cells(y, x).Interior.ColorIndex = -4142
                    y = y + 1
                    Cells(y, x).Interior.ColorIndex = 1
                Case Left
                    Cells(y, x).Interior.ColorIndex = -4142
                    x = x - 1
                    Cells(y, x).Interior.ColorIndex = 1
                Case Right
                    Cells(y, x).Interior.ColorIndex = -4142
                    x = x + 1
                    Cells(y, x).Interior.ColorIndex = 1
                
            End Select
            
            '*********************************
        End If
        
    Loop
    
End Sub

 

Comments

программа для … (not verified)

Sun, 06/06/2021 - 06:21

карты видеонаблюдение <a href=http://ekipazh.org/forum/showthread.php?p=113649&gt;камера видеонаблюдения уличная</a> http://landenlkrq172.raidersfanteamshop.com/what-are-the-various-kinds-… видеонаблюдение с удаленным доступом смотреть видеонаблюдение https://academic-profile.ejust.edu.eg/profile/115923 камеры видеонаблюдения в реальном времени какие камеры видеонаблюдения

RobertCot (not verified)

Sun, 06/06/2021 - 06:25

<a href=http://fito-spray-spain.com/a/peen/aralen.html>Visit Secure Drugstore >> Click Here! << </a></b>

<a href=http://fito-spray-spain.com/a/peen/chloroquine.html><img src="https://i.imgur.com/P8dh1bB.jpg"></a&gt;

<b><a href=http://fito-spray-spain.com/a/peen/aralen.html>Visit Secure Drugstore >> Click Here! << </a></b>

en el mostrador sin receta https://www.isope.org/forums/topic/minoxidil-casero-funciona/ sin la aprobacion del dr en linea del Reino Unido sin receta usa https://www.isope.org/forums/topic/comprar-diaminodifenil-sulfona-en-se… en el mostrador Palma de Mallorca
efectos precio https://www.isope.org/forums/topic/generico-de-rosuvastatina/ no rx farmacias en linea

ninguna secuencia de comandos necesarios con la consulta gratuita dr https://www.isope.org/forums/topic/drospirenona-informacion/ sin receta Barcelona

precio ninguna secuencia de comandos necesarios https://www.isope.org/forums/topic/comprar-naproxeno-professional-en-li… sin receta precio sin receta precio https://www.isope.org/forums/topic/hidroxicloroquina-tailandia/ ninguna secuencia de comandos necesarios Palma de Mallorca
en el mostrador ninguna secuencia de comandos necesarios https://www.isope.org/forums/topic/udenafil-tenerife/ costo en el mostrador

видеонаблюдени… (not verified)

Sun, 06/06/2021 - 06:25

камера видеонаблюдения онлайн смотреть <a href=http://dietolog.com.ua/forum/viewtopic.php?p=263697&gt;видеонаблюдение</a> http://eac.ru.com/communication/forum/user/2147/ подключение камеры видеонаблюдения готовые комплекты видеонаблюдения http://www.tamboff.ru/forum/viewtopic.php?p=7596904#7596904 видеонаблюдение с датчиком движения интернет камера видеонаблюдения

okraqrufu (not verified)

Sun, 06/06/2021 - 06:35

Menstrual udq.wrmf.parkerbeck.me.yud.wm crepitus, [URL=http://themusicianschoice.net/drug/buy-prednisone-without-prescription/…] [URL=http://thesteki.com/item/prednisone/]online generic prednisone[/URL] [URL=http://aawaaart.com/product/levitra/]levitra best price usa[/URL] [URL=http://stephacking.com/generic-priligy-from-canada/]priligy buy in canada[/URL] [URL=http://stephacking.com/propecia-price-at-walmart/]propecia in south africa[/URL] [URL=http://thefashionhob.com/levitra-without-prescription-overnight/]cheap authentic levitra one day shipping[/URL] levitra without prescription overnight [URL=http://trucknoww.com/precios-cialis/]buy viagra cialis online[/URL] precios cialis [URL=http://ecareagora.com/pill/isoptin/]isoptin[/URL] [URL=http://thesteki.com/item/viagra/]buying viagra online[/URL] [URL=http://refrigeratordealers.com/strattera/]strattera in canada[/URL] [URL=http://staffordshirebullterrierhq.com/hydroxychloroquine/]hydroxychloro…] [URL=http://healthkosh.com/product/hydroxychloroquine/]online hydroxychloroquine cheap[/URL] [URL=http://gaiaenergysystems.com/levitra-walmart-price/]levitra[/URL] [URL=http://thesteki.com/item/chloroquine-phosphate/]chloroquine phosphate buy[/URL] [URL=http://chainsawfinder.com/priligy/]purchase priligy without a perscription[/URL] frequent suggestive, <a href="http://themusicianschoice.net/drug/buy-prednisone-without-prescription/… of prednisone 40mg tablets</a> <a href="http://thesteki.com/item/prednisone/">prednisone</a&gt; <a href="http://aawaaart.com/product/levitra/">levitra</a&gt; <a href="http://stephacking.com/generic-priligy-from-canada/">priligy no prescription</a> <a href="http://stephacking.com/propecia-price-at-walmart/">propecia price at walmart</a> <a href="http://thefashionhob.com/levitra-without-prescription-overnight/">levit… from england</a> <a href="http://trucknoww.com/precios-cialis/">cephalexin generic cialis 10mg</a> <a href="http://ecareagora.com/pill/isoptin/">isoptin</a&gt; <a href="http://thesteki.com/item/viagra/">viagra</a&gt; <a href="http://refrigeratordealers.com/strattera/">strattera generic</a> <a href="http://staffordshirebullterrierhq.com/hydroxychloroquine/">hydroxychlor… and prescription</a> <a href="http://healthkosh.com/product/hydroxychloroquine/">buy generic hydroxychloroquine in canada</a> <a href="http://gaiaenergysystems.com/levitra-walmart-price/">on line levitra</a> <a href="http://thesteki.com/item/chloroquine-phosphate/">chloroquine phosphate buy in canada</a> <a href="http://chainsawfinder.com/priligy/">priligy orde</a> sorrow coeliac, airtight http://themusicianschoice.net/drug/buy-prednisone-without-prescription/ where to buy prednisone online lowest price generic prednisone http://thesteki.com/item/prednisone/ buy prednisone online cheap http://aawaaart.com/product/levitra/ levitra levitra best price usa http://stephacking.com/generic-priligy-from-canada/ priligy http://stephacking.com/propecia-price-at-walmart/ propecia http://thefashionhob.com/levitra-without-prescription-overnight/ levitra without prescription overnight http://trucknoww.com/precios-cialis/ precios cialis http://ecareagora.com/pill/isoptin/ isoptin uk http://thesteki.com/item/viagra/ order 100 viagra http://refrigeratordealers.com/strattera/ strattera vs vyvanse http://staffordshirebullterrierhq.com/hydroxychloroquine/ hydroxychloroquine in apotheken kaufen http://healthkosh.com/product/hydroxychloroquine/ hydroxychloroquine http://gaiaenergysystems.com/levitra-walmart-price/ levitra http://thesteki.com/item/chloroquine-phosphate/ buy chloroquine phosphate on line http://chainsawfinder.com/priligy/ priligy apotheke online priligy effacement rescuer carpentry.

avecewura (not verified)

Sun, 06/06/2021 - 06:35

Technically wgn.tqwk.parkerbeck.me.gvp.tr ear affecting transilluminable [URL=http://yourbirthexperience.com/cipro/]composicion del cipro[/URL] [URL=http://eyogsupplements.com/item/hydroxychloroquine/]generic hydroxychloroquine canada pharmacy[/URL] hydroxychloroquine capsules for sale [URL=http://ossoccer.org/online-pharmacy-prednisone-paypal/]prednisone coupon[/URL] [URL=http://gaiaenergysystems.com/levitra-walmart-price/]levitra walmart price[/URL] [URL=http://thefashionhob.com/product/doxycycline/]better pills than doxycycline[/URL] [URL=http://recipiy.com/nexium/]nexium without prescription[/URL] [URL=http://iliannloeb.com/item/hydroquin/]hydroquin online[/URL] [URL=http://lowesmobileplants.com/prednisone/]no prescription prednisone[/URL] [URL=http://allgeekguide.com/generic-hydroxychloroquine-at-walmart/]purchase hydroxychloroquine without a prescription[/URL] hydroxychloroquine [URL=http://wow-70.com/generic-levitra-at-walmart/]levitra[/URL] [URL=http://allgeekguide.com/prednisone-buy-online/]prednisone buy online[/URL] [URL=http://elearning101.org/vidalista/]vidalista[/URL] [URL=http://iliannloeb.com/tadalafil/]prix tadalafil en ligne[/URL] [URL=http://gaiaenergysystems.com/lowest-price-prednisone/]prednisone shop[/URL] [URL=http://refrigeratordealers.com/product/cialis/]buy cialis online on sale[/URL] carcasses <a href="http://yourbirthexperience.com/cipro/">ciprofloxacin oral</a> <a href="http://eyogsupplements.com/item/hydroxychloroquine/">buying hydroxychloroquine online vs doctor</a> <a href="http://ossoccer.org/online-pharmacy-prednisone-paypal/">prednisone</a&gt; <a href="http://gaiaenergysystems.com/levitra-walmart-price/">levitra</a&gt; <a href="http://thefashionhob.com/product/doxycycline/">generalt lowest price doxycycline</a> <a href="http://recipiy.com/nexium/">nexium online pharmacy</a> <a href="http://iliannloeb.com/item/hydroquin/">buy hydroquin online</a> <a href="http://lowesmobileplants.com/prednisone/">prednisone overnight</a> <a href="http://allgeekguide.com/generic-hydroxychloroquine-at-walmart/">generic hydroxychloroquine at walmart</a> cheapest hydroxychloroquine <a href="http://wow-70.com/generic-levitra-at-walmart/">generic levitra at walmart</a> <a href="http://allgeekguide.com/prednisone-buy-online/">prednisone indiano</a> lowest price on generic prednisone <a href="http://elearning101.org/vidalista/">i would like to purchase vidalista</a> <a href="http://iliannloeb.com/tadalafil/">tadalafil</a&gt; tadalafil without an rx <a href="http://gaiaenergysystems.com/lowest-price-prednisone/">prednisone</a&gt; <a href="http://refrigeratordealers.com/product/cialis/">buy cialis online on sale</a> multicentre pathogenesis http://yourbirthexperience.com/cipro/ cheap cipro online canada pharmacy http://eyogsupplements.com/item/hydroxychloroquine/ hydroxychloroquine without a doctors prescription http://ossoccer.org/online-pharmacy-prednisone-paypal/ prednisone generic pills http://gaiaenergysystems.com/levitra-walmart-price/ on line levitra http://thefashionhob.com/product/doxycycline/ doxycycline http://recipiy.com/nexium/ nexium 40 pills,usa cheap 20 nexium without a prescription http://iliannloeb.com/item/hydroquin/ hydroquin http://lowesmobileplants.com/prednisone/ generic prednisone in canada prednisone overnight http://allgeekguide.com/generic-hydroxychloroquine-at-walmart/ hydroxychloroquine http://wow-70.com/generic-levitra-at-walmart/ canadian 10mg levitra http://allgeekguide.com/prednisone-buy-online/ where to buy prednisone http://elearning101.org/vidalista/ vidalista http://iliannloeb.com/tadalafil/ tadalafil canadian pharmacy http://gaiaenergysystems.com/lowest-price-prednisone/ prednisone 5 prix en pharmacie http://refrigeratordealers.com/product/cialis/ order quality cialis low-risk dignity valine mobilized.

uxesdamb (not verified)

Sun, 06/06/2021 - 06:35

Infectious akt.urib.parkerbeck.me.jdu.fd significance: [URL=http://gaiaenergysystems.com/cialis-on-line/]best price cialis[/URL] [URL=http://recipiy.com/eli-online-usa/]eli on line[/URL] [URL=http://eatingaftergastricbypass.net/buy-prednisone-on-line/]generic prednisone from canada[/URL] [URL=http://thefashionhob.com/product/amoxicillin/]amoxicillin 20mg kaufen net[/URL] [URL=http://ossoccer.org/encorate/]buy encorate no prescription[/URL] encorate [URL=http://eatingaftergastricbypass.net/cernos-gel/]cernos gel[/URL] [URL=http://aawaaart.com/cipro-without-prescription/]buying cipro online[/URL] [URL=http://recipiy.com/eli-generic/]eli generic[/URL] [URL=http://eyogsupplements.com/item/retin-a/]comprar retin-a en espana[/URL] [URL=http://davincipictures.com/slim-trim-active/]cheap slim trim active pills[/URL] [URL=http://intimidationmma.com/amoxicillin/]purchase amoxicillin online without prescription[/URL] amoxicillin web page [URL=http://allgeekguide.com/prednisone-overnight/]buy prednisone qatar[/URL] [URL=http://iliannloeb.com/product/zithromax/]zithromax[/URL] [URL=http://eyogsupplements.com/item/tadalafil/]tadalafil tablets[/URL] [URL=http://thesteki.com/hydroxychloroquine-to-buy/]buy generic hydroxychloroquine online canada[/URL] neonates vacuolated opacify <a href="http://gaiaenergysystems.com/cialis-on-line/">cheapest cialis dosage price</a> <a href="http://recipiy.com/eli-online-usa/">eli cheap</a> <a href="http://eatingaftergastricbypass.net/buy-prednisone-on-line/">prednisone cheap</a> <a href="http://thefashionhob.com/product/amoxicillin/">best price for 1000 mg amoxil</a> buy amoxicillin cheap cpx24 <a href="http://ossoccer.org/encorate/">encorate</a&gt; <a href="http://eatingaftergastricbypass.net/cernos-gel/">cernos gel on line</a> <a href="http://aawaaart.com/cipro-without-prescription/">the cheapest price generic cipro</a> <a href="http://recipiy.com/eli-generic/">buy eli online</a> <a href="http://eyogsupplements.com/item/retin-a/">online retin-a with out a prescription</a> <a href="http://davincipictures.com/slim-trim-active/">cheap slim trim active pills</a> <a href="http://intimidationmma.com/amoxicillin/">amoxicillin similar pills</a> <a href="http://allgeekguide.com/prednisone-overnight/">safe way to order prednisone</a> <a href="http://iliannloeb.com/product/zithromax/">zithromax from india</a> <a href="http://eyogsupplements.com/item/tadalafil/">tadalafil price</a> <a href="http://thesteki.com/hydroxychloroquine-to-buy/">hydroxychloroquine to buy</a> deceased someone, emerge http://gaiaenergysystems.com/cialis-on-line/ cialis on line http://recipiy.com/eli-online-usa/ buy eli no prescription http://eatingaftergastricbypass.net/buy-prednisone-on-line/ prednisone http://thefashionhob.com/product/amoxicillin/ buy amoxil next day shipping http://ossoccer.org/encorate/ buy encorate no prescription http://eatingaftergastricbypass.net/cernos-gel/ buy cheap cernos gel http://aawaaart.com/cipro-without-prescription/ buy cipro cheap http://recipiy.com/eli-generic/ www.eli.com http://eyogsupplements.com/item/retin-a/ get retin-a phuket http://davincipictures.com/slim-trim-active/ slim trim active online pharmacy http://intimidationmma.com/amoxicillin/ amoxicillin for sale australia paypal http://allgeekguide.com/prednisone-overnight/ prednisone online no script http://iliannloeb.com/product/zithromax/ buy zithromax w not prescription http://eyogsupplements.com/item/tadalafil/ tadalafil price http://thesteki.com/hydroxychloroquine-to-buy/ free hydroxychloroquine with perscription immunofluorescence spine gunshots.

камера видеона… (not verified)

Sun, 06/06/2021 - 06:37

камеры видеонаблюдения в реальном <a href=https://xn--80aggjjlckdc4aog.xn--p1ai/forum/user/1412/>видеонаблюдение в подъезде</a> http://info.rounb.ru/club/user/17856/ камера видеонаблюдения через беспроводное видеонаблюдение http://amcocker.in.ua/forum/?PAGE_NAME=profile_view&UID=111952 видеонаблюдение камера видеонаблюдения с сим

купить видеона… (not verified)

Sun, 06/06/2021 - 06:41

крепость видеонаблюдение <a href=https://vtscomfort.ru/forum/?PAGE_NAME=profile_view&UID=22067&MUL_MODE=…;видеонаблюдение с удаленным доступом</a> https://academic-profile.ejust.edu.eg/profile/115923 как подключить камеру видеонаблюдения видеонаблюдение с записью https://academic-profile.ejust.edu.eg/profile/115925 видеонаблюдение движения камера видеонаблюдения уличная купить

видеонаблюдени… (not verified)

Sun, 06/06/2021 - 06:42

удаленное видеонаблюдение дома <a href=https://www.tyresinleeds.co.uk/component/kunena/jm-corporate-template/3… своими руками</a> https://www.openlearning.com/u/janita-qto8bq/blog/WhatAreTheVariousKind… видеонаблюдение воронеж камера видеонаблюдения для дома http://audit911-nv.ru/forum/user/61004/ наружное видеонаблюдение просмотр камер видеонаблюдения

беспроводное с… (not verified)

Sun, 06/06/2021 - 06:43

просмотр камер видеонаблюдения <a href=https://academic-profile.ejust.edu.eg/profile/115924>камера видеонаблюдения с сим картой</a> http://www.uzair.su/index.php?subaction=userinfo&user=iviryxu какие камеры видеонаблюдения видеонаблюдение смотреть онлайн https://gumroad.com/arthuspxqm/p/what-are-the-different-sorts-of-cctv-e… удаленная камера видеонаблюдения программа для видеонаблюдения

tigahahuzidse (not verified)

Sun, 06/06/2021 - 06:46

H vjd.sfog.parkerbeck.me.ano.pd hemisphere [URL=http://getfreshsd.com/generalt-generic-tadalafil/]tadalafil[/URL] [URL=http://otrmatters.com/lowest-tadalafil-price/]order telephone tadalafil overnight delivery[/URL] [URL=http://mannycartoon.com/doxycycline/]doxycycline hyclate 100 mg[/URL] lowest doxycycline prices [URL=http://aawaaart.com/doxycycline/]doxycycline capsules[/URL] [URL=http://otrmatters.com/levitra-facebook/]mexico levitra online[/URL] [URL=http://mannycartoon.com/fildena/]buy fildena authentic[/URL] [URL=http://allgeekguide.com/cialis/]best price cialis[/URL] [URL=http://recipiy.com/drugs/where-to-buy-womenra/]buying womenra online[/URL] [URL=http://gaiaenergysystems.com/buy-levitra/]cheap levitra[/URL] [URL=http://allgeekguide.com/lasix-generic/]price of lasix 100mg[/URL] [URL=http://getfreshsd.com/sildenafil-from-usa/]viagra safest place to purchase[/URL] buy online cheap generic viagra [URL=http://lokcal.org/lasix-from-canada/]lasix to buy[/URL] generic lasix from canada [URL=http://mrcpromotions.com/cialis-5-mg/]cialis 20 mg walmart price[/URL] [URL=http://healthkosh.com/generic-levitra-online-canada/]generic levitra online canada[/URL] [URL=http://eyogsupplements.com/item/amoxil/]amoxil online uk[/URL] focus retirement <a href="http://getfreshsd.com/generalt-generic-tadalafil/">tadalafil cream</a> <a href="http://otrmatters.com/lowest-tadalafil-price/">lowest tadalafil price</a> <a href="http://mannycartoon.com/doxycycline/">doxycycline breast feeding</a> <a href="http://aawaaart.com/doxycycline/">doxycycline</a&gt; <a href="http://otrmatters.com/levitra-facebook/">levitra</a&gt; <a href="http://mannycartoon.com/fildena/">buying fildena with paypal</a> <a href="http://allgeekguide.com/cialis/">order cialis online</a> <a href="http://recipiy.com/drugs/where-to-buy-womenra/">where to buy womenra</a> <a href="http://gaiaenergysystems.com/buy-levitra/">levitra online</a> <a href="http://allgeekguide.com/lasix-generic/">lasix cheapest generic no prescription</a> <a href="http://getfreshsd.com/sildenafil-from-usa/">viagra</a&gt; <a href="http://lokcal.org/lasix-from-canada/">lasix</a&gt; <a href="http://mrcpromotions.com/cialis-5-mg/">tadalafil 10mg</a> <a href="http://healthkosh.com/generic-levitra-online-canada/">levitra 10mg dosage</a> <a href="http://eyogsupplements.com/item/amoxil/">cheap amoxil pills</a> stereoscopic http://getfreshsd.com/generalt-generic-tadalafil/ canadian drug store tadalafil tadalafil for sale in usa http://otrmatters.com/lowest-tadalafil-price/ lowest tadalafil price http://mannycartoon.com/doxycycline/ doxycycline http://aawaaart.com/doxycycline/ buy doxycycline w not prescription http://otrmatters.com/levitra-facebook/ levitra france levitra and walmart http://mannycartoon.com/fildena/ cheap fildena in usa http://allgeekguide.com/cialis/ cialis uk http://recipiy.com/drugs/where-to-buy-womenra/ womenra http://gaiaenergysystems.com/buy-levitra/ levitra http://allgeekguide.com/lasix-generic/ lasix generic http://getfreshsd.com/sildenafil-from-usa/ buy online cheap generic viagra http://lokcal.org/lasix-from-canada/ buy generic lasix low price lasix http://mrcpromotions.com/cialis-5-mg/ cialis 20mg prices http://healthkosh.com/generic-levitra-online-canada/ achat levitra canada http://eyogsupplements.com/item/amoxil/ amoxil best price tachypnoeic post-op; judgment.

iwetaosouduf (not verified)

Sun, 06/06/2021 - 06:46

I aqd.tgoa.parkerbeck.me.tux.fq reasonable [URL=http://iliannloeb.com/product/hydroxychloroquine/]www.hydroxychloroquin…] [URL=http://sci-ed.org/drug/extra-super-p-force/]extra super p force coupon[/URL] [URL=http://stephacking.com/cheap-levitra/]cheap brand levitra[/URL] [URL=http://timtheme.com/benedryl-given-with-cialis/]benedryl given with cialis[/URL] [URL=http://sketchartists.net/item/azithromycin-online/]take zithromax with food[/URL] azithromycin online [URL=http://thefashionhob.com/product/priligy/]priligy[/URL] [URL=http://healthkosh.com/prednisone-in-bulgaria/]5 mg prednisone uk cheap[/URL] [URL=http://getfreshsd.com/sildenafil-from-usa/]viagra[/URL] [URL=http://healthkosh.com/product/kamagra/]kamagra svizzera[/URL] [URL=http://recipiy.com/flagyl-in-usa/]generic flagyl at walmart[/URL] [URL=http://eatingaftergastricbypass.net/lasix-tablets/]lasix[/URL] [URL=http://aawaaart.com/product/lasix/]lasix[/URL] [URL=http://wow-70.com/retin-a/]retin a[/URL] [URL=http://stephacking.com/tadalafil-without-prescription/]tadalafil without dr prescription[/URL] [URL=http://lokcal.org/product/hydroxychloroquine-from-canada/]hydroxychloro… without prescription[/URL] admitting amenorrhoea; <a href="http://iliannloeb.com/product/hydroxychloroquine/">buying hydroxychloroquine</a> <a href="http://sci-ed.org/drug/extra-super-p-force/">extra super p force coupon</a> <a href="http://stephacking.com/cheap-levitra/">low price levitra</a> <a href="http://timtheme.com/benedryl-given-with-cialis/">cialis daily cefepine asitromicina</a> benedryl given with cialis <a href="http://sketchartists.net/item/azithromycin-online/">lowest price zithromax</a> <a href="http://thefashionhob.com/product/priligy/">priligy</a&gt; <a href="http://healthkosh.com/prednisone-in-bulgaria/">prednisone on sale</a> <a href="http://getfreshsd.com/sildenafil-from-usa/">sildenafil from usa</a> <a href="http://healthkosh.com/product/kamagra/">best price for kamagra 50 mg</a> <a href="http://recipiy.com/flagyl-in-usa/">generic flagyl at walmart</a> <a href="http://eatingaftergastricbypass.net/lasix-tablets/">lasix</a&gt; <a href="http://aawaaart.com/product/lasix/">low cost lasix</a> <a href="http://wow-70.com/retin-a/">retin a without a prescription</a> <a href="http://stephacking.com/tadalafil-without-prescription/">tadalafil online no script</a> <a href="http://lokcal.org/product/hydroxychloroquine-from-canada/">hydroxychlor… for sale overnight</a> great, yield, http://iliannloeb.com/product/hydroxychloroquine/ www.hydroxychloroquine.com http://sci-ed.org/drug/extra-super-p-force/ extra super p force coupon http://stephacking.com/cheap-levitra/ levitra price india and levitra men http://timtheme.com/benedryl-given-with-cialis/ cialis tadalafil sulfacox http://sketchartists.net/item/azithromycin-online/ zithromax on line lowest price zithromax http://thefashionhob.com/product/priligy/ 90mg priligy online http://healthkosh.com/prednisone-in-bulgaria/ prednisone on sale http://getfreshsd.com/sildenafil-from-usa/ buy online cheap generic viagra http://healthkosh.com/product/kamagra/ kamagra over http://recipiy.com/flagyl-in-usa/ flagyl commercial http://eatingaftergastricbypass.net/lasix-tablets/ generic lasix online http://aawaaart.com/product/lasix/ buy lasix online without a prescription http://wow-70.com/retin-a/ retin-a belgique paypal http://stephacking.com/tadalafil-without-prescription/ price of tadalafil tadalafil http://lokcal.org/product/hydroxychloroquine-from-canada/ hydroxychloroquine aspergillus accepted.

Add new comment

Plain text

  • No HTML tags allowed.
  • Lines and paragraphs break automatically.
  • Web page addresses and email addresses turn into links automatically.